|
Registriert seit: 5. Mai 2008
Ort: Oberschwaben
1.275 Beiträge
Delphi 11 Alexandria
|
AW: onclick des TPanel
17. Apr 2015, 10:48
Delphi-Quellcode:
if Sender.InheritsFrom(TLabel) then
begin
Sender := TLabel(Sender).Parent;
end;
If Sender.InheritsFrom(TMyPanel) then
begin
// ...
end;
Hinter dir gehts abwärts und vor dir steil bergauf ! (Wolfgang Ambros)
|