MyCity » Pascal -> Lazarus » TPageControl

TPageControl

Napisano na dan: 23.3.2010

TPageControl

Idi na vrh

Poslao: 23 Mar 2010 16:23
Idi na vrh
offline
  • burzza 
  • Novi MyCity građanin
  • Pridružio: 22 Mar 2010
  • Poruke: 2

Kako uraditi kontrolu stranica.Početnik sam u Lazarus-u,a znam nešto maloDelphi.Kontrola stranica u Delphi:

Kod:
procedure TForm2.Racunaj1Click(Sender: TObject);
begin
...........................
Unit1.ActivePageIndex:=1;
end;
procedure TForm2.Nazad1Click(Sender: TObject);
begin

Unit1.ActivePageIndex:=0;

end;
procedure TForm2.Izlaz1Click(Sender: TObject);
begin
if Unit1.ActivePageIndex=1 then begin
Unit1.ActivePageIndex:=0;
end;
Close;
Form1.Close;
end;
end.

Kako ovo napisati za Lazarus.
Pozdrav svima i hvala



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Poslao: 23 Mar 2010 22:34
Idi na vrh
offline
  • Pridružio: 15 Maj 2006
  • Poruke: 333
  • Gde živiš: Babušnica

PageControl1.PageIndex:=1;
umesto 1 sta ti treba naravno



Poslao: 25 Mar 2010 15:01
Idi na vrh
offline
  • burzza 
  • Novi MyCity građanin
  • Pridružio: 22 Mar 2010
  • Poruke: 2

Zahvaljujem se na pomoći.Jednostavno samo se treba setiti.

MyCity » Pascal -> Lazarus » TPageControl

Ko je trenutno na forumu
 

Ukupno su 1086 korisnika na forumu :: 27 registrovanih, 6 sakrivenih i 1053 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: babaroga, Bluper, bojank, cemix, dragoljub11987, FOX, goxin, Kaplar2, kubura91, Lucije Kvint, mačković, mikrimaus, milenko crazy north, Milometer, milutin134, nebojsag, pein, samsung, sasa87, Singidunumac, stegonosa, Tila Painen, vladas87, YugoSlav, zbazin, zdrebac, Zoca