Wäre eine Möglichkeit,
wobei ich natürlich von dem Thema der Batchdatei nicht wegkomme. Gibt es nicht einen Möglichkeit z.B. über ShellExecute verschieden Daten an die cmd Eingabeaufforderung zu senden. So das man z.B. Passwort und Benutzer direkt aus Delphi senden würde.
Also irgendwie so in dieser Richtung...
Delphi-Quellcode:
procedure Tform1.btnSaveTestClick(Sender: TObject);
var
cmdString :
String;
begin
cmdString := '
/c dir C:\Programme\Firebird\Firebird_2_1\bin\gbak.exe '+
'
-b -v -user SYSDBA -pas masterkey localhost:"C:\ProgramData\hu\db\MeineDB.fdb" '+
'
"C:\ProgramData\hu\db\MeineDB.bak"';
ShellExecute(
Handle,'
open','
cmd.exe',PAnsiChar(cmdString),
nil,SW_SHOW);
end;
Gruß Jens