Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var
wndMain, wndChild: HWND;
begin
wndMain := FindWindow('AutoIt v3','AutoIt v3');
if wndMain <> 0 then
begin
wndChild := FindWindowEx(wndMain, 0, 'Edit', nil);
if wndChild <> 0 then
begin
ShowMessage('65702' + IntToStr(wndChild));
FlashControl(wndChild); // internal function
SendMessage('65702') SC_CLOSE,0,0):
end;
end;
end;
end.
so müsste das doch okay sein oder?
65702 ist das
handle des programmes sagt mit WinSpy
FlashControl und SC_CLOSE,0,0; und das semikolon beim 3. end von unten wird mir rot unterstrichen ;-(
Why?