[Delphi] Tworzenie tabSheet'a nie działa


(system) #1

Witam. Mam problem. Otóż, piszę sobie program. I chcę zrobić tworzenie TabSheet'a po naciśnięciu przycisku. No mam na formie Buttona i PageControl. I do butona piszę kod:

var nowaKarta : TTabSheet;

begin

nowaKarta:=TTabSheet.Create(self);

nowakarta.Show;

end;

Jednak gdy nacisnę przycisk, nic się nie dzieje. Po prostu nie pokazuje się nowa karta. Co robię źle. Proszę pomóżcie :slight_smile:


(Mahsoft) #2

moze zanim wywolasz metode show powinienes okreslic wspolrzedne gdzie ma sie pojawic


(system) #3

Nie, to nie to. Według mnie to chyba błąd jest tutaj

nowaKarta:=TTabSheet.Create([b]self[/b]);

Tylko nie wiem, co zamiast self dać. Bo self chyba do formy jest, nie?


(system) #4

Już mam rozwiązanie. Po prostu nie odniosłem się do komponentu, jaki miał być. Temat do zamknięcia. Kod potrzebował tylko jednej linijki:

var nowaKarta :TTabSheet;

begin

nowaKarta:=TTabSheet.Create(self);

nowaKarta.PageControl := PageControl1;

nowaKarta.show;

end;