Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi Sender überprüfen (https://www.delphipraxis.net/23565-sender-ueberpruefen.html)

orakel 5. Jun 2004 10:30
Sender überprüfen
 
Hi,
gibt es sowas wie :

Code:
If Sender=TMemo then...

Danke, Andi

Sharky 5. Jun 2004 10:35
Re: Sender überprüfen
 
Hai orakel,

ja gibt es fast. Nur anstelle von = muss es IS heissen ;-)

Delphi-Quellcode:
procedure TForm1.Memo1DblClick(Sender: TObject);
begin
  If (Sender IS TMemo) then ShowMessage ('Memo');
  If (Sender IS TLabel) then ShowMessage ('Label');
  If (Sender IS TEdit) then ShowMessage ('Edit');
end;

orakel 5. Jun 2004 10:58
Re: Sender überprüfen
 
Danke :dancer:


Alle Zeitangaben in WEZ +1. Es ist jetzt 03:43 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz