WM_SETFOCUS abfangen

[geskill]

hi,
dass habe ich gerade selber gebraucht:

bischen googlen dann findet man meistens immer was :)

http://www.swissdelphicenter.ch/en/showcode.php?id=1775

Delphi-Quellcode:

type
   //...
  private
    { Private declarations }
    procedure WMNCACTIVATE(var M: TWMNCACTIVATE); message WM_NCACTIVATE;
  end;


implementation

//...

procedure TForm1.WMNCACTIVATE(var M: TWMNCACTIVATE);
begin
  inherited;
  if M.Active then
    caption:='Form active'
  else caption:='Form not active' ;
end;

Am besten du lässt die Abfage weg
if M.Active then und führst sofort dein Befehl aus, denn diese Abfrage dauert extrem lange...

Aso und für OnEnter würde auch ne Message nehmen:
http://delphi.about.com/cs/adptips20...ltip0703_5.htm

Und hier noch was eigenes.
http://www.delphipraxis.net/internal...534cf5fe10b022