Gibts nen Fehler oder passiert einfach garnichts? Wenn die cmd.exe nichts macht, könnte es helfen, vor den Befehl ein /K zu sezten:
Zitat von
1753:
Delphi-Quellcode:
interface
{$APPTYPE CONSOLE}
procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(0, '
open', PChar('
C:\Windows\System32\cmd.exe'),
'
/K mysqldump -uuser -ppasswort --databases mysql > /mysql.sql',
nil, SW_SHOWNORMAL);
end;