ďťż

Ładny brzuch

Do czego służy ta deklaracja wewnątrz jakiejkolwiek procedury wygenerowanej automatycznie przez Delphi: Sender: TObject.



Mówiąc najogólniej Sender jest to wskaźnik to obiektu, który wywołał daną procedurę. Np (tak chyba było w jakimś kursie Delphi) umieść Button i Label, w zdarzeniu onclick dla Buttona napisz:

if Sender is TButton then    ShowMessage('Tak to jest komponent Button'); if Sender is TLabel then    ShowMessage('To jest komponent Label');

Teraz zaznacz labela i na zakładce events przypisz mu procedurę onclick komponentu Button.
W tym przykładzie jest sprawdzane czy procedura onclick jest wywołana poprzez komponent Label lub Button.


Mówiąc najogólniej Sender jest to wskaźnik to obiektu, który wywołał daną procedurę. Np (tak chyba było w jakimś kursie Delphi) umieść Button i Label, w zdarzeniu onclick dla Buttona napisz:

if Sender is TButton then    ShowMessage('Tak to jest komponent Button'); if Sender is TLabel then    ShowMessage('To jest komponent Label');

Teraz zaznacz labela i na zakładce events przypisz mu procedurę onclick komponentu Button.
W tym przykładzie jest sprawdzane czy procedura onclick jest wywołana poprzez komponent Label lub Button.

Można:

if Sender = Label1 then ShowMessage('kliknales w label1');

  • zanotowane.pl
  • doc.pisz.pl
  • pdf.pisz.pl
  • zsf.htw.pl
  •