Einzelnen Beitrag anzeigen

Benutzerbild von baumina
baumina

Registriert seit: 5. Mai 2008
Ort: Oberschwaben
1.275 Beiträge
 
Delphi 11 Alexandria
 
#13

AW: onclick des TPanel

  Alt 17. Apr 2015, 09: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)
  Mit Zitat antworten Zitat