anderes .exe programm mittels OnClick beenden

**marco1204**

Hallo alle zusammen.
Ich bin ein rellativer Delphi anfänger.
Ich will ein Programm, bei dem ich auf "blabla.exe starten" drücke, und somit dieses programm startet. Ich will es nutzen als zusammenstellung von Keybindern.
da hat mir google schon geholfen, das funktioniert auch
es erscheint ein Panel auf dem ich dann Informationen schreibe zu den Keybindern.
auf diesem Panel soll dann wieder ein Button sein mit dem ich dieses Programm "blabla.exe" wieder schließe.
aber wie mache ich das? google hat mich irgendwie nicht schlau gemacht.

Hier mein bissheriger Quelltext mit Rechner als Beispielprogramm:

zusammenfalten · markieren

Delphi-Quellcode:

			unit Unit1;

interface

uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, ShellApi, ExtCtrls, StdCtrls;

type

  TForm1 = class(TForm)

    Button1: TButton;

    Panel1: TPanel;

    Button2: TButton;

    procedure Button2Click(Sender: TObject);

    procedure Button1Click(Sender: TObject);

  private

    { Private-Deklarationen }

  public

    { Public-Deklarationen }

  end;

var

  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

begin

  ShellExecute(Application.Handle,'open','calc.exe',''{Parameter},'c:\WinNT\System32',SW_SHOW);

  Panel1.Visible:=true

end;

procedure TForm1.Button2Click(Sender: TObject);

begin

?

?

?

?

end;

end.

Die Fragezeichen sind halt das wo ich nicht weiter weiß.
hoffe ihr könnt helfen
danke im Vorraus

anderes .exe programm mittels OnClick beenden

anderes .exe programm mittels OnClick beenden

Forumregeln