Показать сообщение отдельно
  #1  
Старый 15.10.2019, 11:58
Gribok4321 Gribok4321 вне форума
Прохожий
 
Регистрация: 15.10.2019
Сообщения: 2
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию Запуск команды CMD

Столкнулся с проблемой
Есть строка которую запускаю в CMD
Код:
"C:\Program Files (x86)\pgAdmin III\1.16\\pg_dump.exe" --host "192.168.15.52"  --port 5432 --username "postgres" --role "postgres" --no-password --format custom --blobs --section pre-data --section data --section post-data --encoding UTF8 --verbose --file "D:\old.backup" "gilev"
Все работает

Пишу тоже самую строку - генерирую ее
в Делфи
Код:
var
start:string; 
RC: Cardinal;
 WorkDir :String;
 start1,mycommand:string; 
start:=('"C:\Program Files (x86)\pgAdmin III\1.16\\pg_dump.exe" --host '+'"'+host.Text+'" '+' --port '+port.Text+' --username '+'"'+username.Text+'"'
+' --role '+'"'+role.Text+'"'+' --no-password --format custom --blobs --section pre-data --section data --section post-data --encoding UTF8 --verbose --file '+
 '"'+SaveToFile.Text+ '" '+ '"'+BD.Text+'"');      
Все норм
Далее хочу запустить
Код:
  WorkDir := ExtractFilePath(Application.ExeName);
  Memo1.Lines.ADD (GetDosOutput( 'cmd /c '+Edit1.Text, WorkDir, Rc ));

Вываливает кракозябры

При этом если строку запуска обрезать до
Код:
"C:\Program Files (x86)\pgAdmin III\1.16\\pg_dump.exe" 
то все запускается норм
Изображения
Тип файла: jpg 1.JPG (63.7 Кбайт, 0 просмотров)
Тип файла: jpg 2.JPG (47.4 Кбайт, 0 просмотров)
Ответить с цитированием