Ĺadny brzuch
Jak rozpoznać kto jest Sender'em, bo potrzebuje info w TComponent, a Sender podaje tylko TObject. Jak dokonać konwersji lub jak sprawdzić jaki komponent jest Sender'em?
Chodzi tu o PopMenu na kilku powiedzmy TPanel'ach i np. w zależności od tego, na który panel sie kliknie to ma znaczenie np. żeby zmienić jego Width.
Lub jak to zrobić inaczej przy pomocy PopMenu lub MainMenu?
olej sendery :D Tag rlz :D właśnie do tego jest stworzona ta właściwość:D
Użytkownik Bełdzio edytował ten post 07 marzec 2005, 09:42
if(Sender is TPanel) then
ShowMessage(TPanel(Sender).Name);
Oczywiście zamiast wyświetlać nazwe w okienku możesz dać kolejnego ifa żęby sprawdzic czy name się zgadza :)
TComponent *mycomp = (TComponent *)Sender;
Jesli chcesz znac tylko rodzaj komponentu to faktycznie najlepiej przez Name
TComponent *mycomp = (TComponent *)Sender;
Jesli chcesz znac tylko rodzaj komponentu to faktycznie najlepiej przez Name
var cname:string; begin cname:=tcomponent(sender).Name;
Hmmm... to ma byc w delphi wiec badz tak mily i tlumacz na skladnie d :)
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
Chodzi tu o PopMenu na kilku powiedzmy TPanel'ach i np. w zależności od tego, na który panel sie kliknie to ma znaczenie np. żeby zmienić jego Width.
Lub jak to zrobić inaczej przy pomocy PopMenu lub MainMenu?
olej sendery :D Tag rlz :D właśnie do tego jest stworzona ta właściwość:D
Użytkownik Bełdzio edytował ten post 07 marzec 2005, 09:42
if(Sender is TPanel) then
ShowMessage(TPanel(Sender).Name);
Oczywiście zamiast wyświetlać nazwe w okienku możesz dać kolejnego ifa żęby sprawdzic czy name się zgadza :)
TComponent *mycomp = (TComponent *)Sender;
Jesli chcesz znac tylko rodzaj komponentu to faktycznie najlepiej przez Name
TComponent *mycomp = (TComponent *)Sender;
Jesli chcesz znac tylko rodzaj komponentu to faktycznie najlepiej przez Name
var cname:string; begin cname:=tcomponent(sender).Name;
Hmmm... to ma byc w delphi wiec badz tak mily i tlumacz na skladnie d :)