Du kan vel bruge denne kode?
procedure CloseNotepad;
var
Handle : HWND;
begin
Handle := FindWindow('Notepad',nil);
SendMessage(Handle,WM_Close,0,0);
end;
Mvh.
Rune Jensen
---------------------------------------------------------------------------
##The one who laugh last is the one who think slowest!##
---------------------------------------------------------------------------