Forum: Object-Pascal / Delphi-Language
by DeddyH,
17. Apr 2015
Ja, aber Du musst doch noch einmal casten, Parent ist per se erst einmal ein TWinControl, Beispiele siehe oben.
Forum: Object-Pascal / Delphi-Language
by DeddyH,
17. Apr 2015
Oder in der ganz langen (vorsichtigen) Form:
var
Label: TLabel;
Panel: TMyPanel;
begin
if Sender is TLabel then
begin
Label := TLabel(Sender);
if Assigned(Label.Parent) and (Label.Parent is TMyPanel) then
begin
Forum: Object-Pascal / Delphi-Language
by DeddyH,
17. Apr 2015
Überleg doch mal: Sender ist ein Label, dessen Parent (evtl.) ein Panel.
Forum: Object-Pascal / Delphi-Language
by DeddyH,
17. Apr 2015
Wenn man das Label erwischt, dürfte dessen Parent ja dann ein Panel sein. IMO könnte man auch da ansetzen.
Forum: Object-Pascal / Delphi-Language
by DeddyH,
17. Apr 2015
Hä? Du weist Deinen Labels einen ClickHandler zu, den Panels auch, wenn also ein Label geklickt wird, wird dessen Handler ausgeführt, bei einem Panel eben dessen. Was ist denn nun das Problem?