Den "X" - Button simulieren

[LkZ]

Hi...

also wenn ein programm läuft und man auf das "X" oben rechts klickt, dann ist es doch selbstverständlich, dass dieses programm beendet wird.

kann ich dieses klickes des "X" von einem anderen (also von mir entwickelten) programm simulieren. das heisst, mein programm beendet dieses programm...

eine variante ist, dass ich die liste aller prozesse bekomme und wenn das programm, was ich beenden will, in der liste ist, dann wird es gekillt. <- sowas will ich nicht machen!

vielleicht habt ihr ja ne idee und hoffe ihr habs verstanden, was ich meine...

mfg

[Pr0g]

Kleines Beispiel um ein Notepad Fenster zu schließen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  lWnd: HWND;
begin
  lWnd := FindWindow('notepad', nil);
  SendMessage(lWnd, WM_CLOSE, 0, 0);
end;