"OnShowForm" på et komponent

den sag vil jeg se lidt nærmere på senere :)

vh troxa

Hmm, vist noget med message-hooks. Har nok en tekst om det hjemme... Så får vi se om jeg husker det :)

>lrj

Har du fundet noget?

Jeg har nu selv fundet noget der virker:

Private sektionen af komponenten:

    fHWnd:HWND;
    Procedure WndProc(var Msg:TMessage);


I Komponentens.Create:

  if not (csDesigning in ComponentState) then
    FHWnd := AllocateHWnd(WndProc);

I Komponentens.Destroy:

  if not (csDesigning in ComponentState) then
    DeallocateHWnd(FHwnd);

Og så i komponent.WndProc

  If msg.msg=[hvad det nu skal være] Then begin
    [Gør hvad der skulle gøres]
  end;