Delphi-Quellcode:
procedure TForm1.FormShow(Sender: TObject);
begin
ShellExecute(hInstance, 'open', 'cmd.exe',
'/c ping "www.delphipraxis.net && '+
'ping www.ottifant.de"', nil, SW_SHOW); // SW_SHOW, SW_HIDE oder SW_MINIMIZE
end;
Windowshilfe
Zitat:
cmd.exe /c Zeichenfolge - Führt den durch Zeichenfolge angegebenen Befehl aus und wird dann beendet.
Sie können in Zeichenfolge mehrere Befehle angeben. Dazu ist es aber erforderlich, dass Sie Zeichenfolge in Anführungszeichen setzen und die Befehle durch das Befehlstrennzeichen && trennen (Beispiel: "Befehl&&Befehl&&Befehl").