Lukke to programmer samtidig?

Jeg har et program hvor der når man trykker på en knap starter et nyt program op. I det nye program er der en luk knap, og der ville jeg gerne at det dkulle lukke begge programmer. Kan det lad sig gøre?


Mvh
Jesper

procedure TForm1.Button1Click(Sender: TObject);
var
H : THandle;
begin
H := FindWindow(nil, 'Titel på program');
if H <> 0 then
PostMessage(H, WM_QUIT, 0, 0);
Close;
end;

Emil Melgaard
emil.melgaard@private.dk

Dobbeltklik på LUK-knappen og skriv denne kode.

Form2.close;
Form1.close;


Crissi(o:

Dobbeltklik på LUK-knappen og skriv denne kode.

Form2.close;
Form1.close;


Crissi(o:

Det er to .exe filer den skal lukke. Kan man godt det med den kode der?

Mvh
Jesper

Dobbeltklik på LUK-knappen og skriv denne kode.

Form2.close;
Form1.close;


Crissi(o:

Det er to .exe filer den skal lukke. Kan man godt det med den kode der?

Mvh
Jesper

nej det kan du ikke... den der kode er hvis det er 2 forms i samme exe fil.. jeg kende desvære ikke lige svare på hvordan du kan lukke sådan en extern exe fil via dit eget program

Humans are slow, inaccurate, and brilliant. Computers are fast, acurrate, and dumb. Together they are unbeatable

Kunne du ikke prøve dig frem med API-calls fra ShellAPI ?

Jeg ved det ikke, men jeg vil tro at der er en kommando til det !

Hilsen Allan Iversen