|
| Get and use Sender properties, typecast it | 
|
|---|
| Typecasting Sender as Tbutton and more | Product: Delphi all versions | Category: Object Pascal | Skill Level:
 | Scoring:  | Last Update: 03/20/2003 | Search Keys: delphi delphi3000 article borland vcl code-snippet Sender Properties Typecast Events | Times Scored: 5 | Visits: 2219 | Uploader: Nino Arndt Company: TopNordic | Reference: N/A | | | Question/Problem/Abstract:
How do I Use the Senders Properties.
Could be useful if more than one button uses the same Click-Event. | Answer:
If you have more then one Button using the same Click Event And you need to access the Properties of the Button(Sender) that is pressed then this does the trick :
procedure TForm1.Button1Click(Sender: TObject);
begin
with Sender as Tbutton do
Begin
Label1.Caption := Caption ;
Label1.left := Left ;
EnD;
end;
This code Sets a Label1.Caption to the caption of the button that calls the procedure above(Procedure TForm1.Button1Click). This can be done with other Tcompunents as well.
In the Above Procedure a good idea would be to Make a check on the senders class type before typecasting it or check if it should be NIL etc
|
|
|
| |
Sign up to consume product discounts for Bronze memberships !
|
|
| |
Community Ad of A. B. Talal |
|
| |
|
|
|