Eigene Komponente - Focus

[Neutral General]

Hi,

Hab ne Komponente von TCustomControl abgeleitet. Jetzt würde ich gerne mitbekommen wenn man außerhalb der Komponente geklickt hat. Hab leider grad keine Ahnung weil WM_KILLFOCUS nicht funktioniert.
Was kann ich denn da machen?

Gruß
Neutral General

[1234588]

WM_KILLFOCUS wird gesendet, wenn der caret (der text cursor) das control gewechselt hat. was dir helfen wird ist die WM_ACTIVATE message

[Neutral General]

Hi,

Habs jetzt so gemacht, funktioniert aber nicht...

Delphi-Quellcode:

// Verkürzt
TMeineComponente = class
protected
  procedure Activate(var Msg: TMessage); message WM_ACTIVATE;
end;

procedure TMeineComponente.Activate(var Msg: TMessage);
begin
  inherited;
  if Msg.WParamLo = WA_INACTIVE then
    Focused := -1;
end;

[Neutral General]

Hat jemand vielleicht noch ne Idee ? :| Wäre ganz nett... :)