Kurcze siedze nad tym GG i nie wiem juz sam :|
Taki problem znalazlem uchwyt Okna "Status opisowy" ... ale !!!
Wszystko jest OK jak okno jest otwarte bo jak go zamkne to pobierajac nawet Caption okna nie mam juz "Status opisoty" tylko ... "KerioPersonalFirewallMainWindow" :(
To sie uchwyty zmieniaja jak minimalizuje ono czy zamykam :/ ???
var
Form1: TForm1;
GGH : THandle;
Bufor: Array [0..255] of Char;
implementation
{$R *.dfm}
procedure TForm1.Button3Click(Sender: TObject);
begin
GGH := FindWindow('#32770', nil); //uchwyt okna StatusOpisowy - NIBY !!!
if GGH = 0 then Caption := 'Nie' else Caption := 'Tak';
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
GetWindowtext(GGH, Bufor, SizeOf(Bufor));
Edit1.Text := Bufor;
ShowWindow(GGH, SW_HIDE);
end;
Moze ktos wie o co tu chodzi ... bo ja sie nie znam na tym za dobrze 8-|