Zła klasa czy coś

[pioncz]

Witam,
Mam taki o to programik, i podając prawidłową klasę okna lub troche zmieniam kod i podaje prawidłowy nagłówek okna ale zmienia się tylko mój program, stworzony przeze mnie.

procedure TForm1.Button1Click(Sender: TObject);

var result:THandle;

begin

Result:= FindWindow(PChar(Edit1.text), nil);

SetWindowText(Handle,PChar(Edit2.text));

end;

A chciałbym np zeminić napis na gg.

 

[PaPaDo]

procedure TForm1.Button1Click(Sender: TObject);

var result:THandle;

begin

Result:= FindWindow(nil,PChar(Edit1.text));

SetWindowText(Result,PChar(Edit2.text));

end;

Pomyliłeś zmienne i nil miał byc na pierwszym parametrze funkcji FindWindow