Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Получить результат выполнения команды консоли? [D7, 2003]

Страницы: < 1 2
Vyacheslav © (2011-11-26 05:03:00)
Здравствуйте.
Хотелось бы не просто запустить консольное приложение на выполнение, например:

dir:=ExtractFilePath(ParamStr(0))+'ffmpeg.exe';
params:=' -i test.flv';
ShellExecute(Handle, PWideChar('open'), PWideChar(dir), Pwidechar(params), PWideChar(''), SW_SHOW);

но и получить результат работы консоли, например в TMemo..
Может кто-то подскажет как это реализовать?

Vyacheslav (2011-11-26 15:47:00) [21]
Может есть какая-то особенность Win7, но поскольку я для себя пишу, нужно хотябы для конкретной оси попробовать поправить..

Vyacheslav (2011-11-26 15:42:00) [22]
Windows 7 64 bit
cmd есть, проверил

sniknik (2011-11-26 13:32:00) [23]
а том вообще cmd есть? может уже что-то другое в качестве консоли.

p.s. в XP приведенный код по ссылке работает. правда почему то нормально закрыть программу не дает, не охота разбираться почему, но ошибок на старте нет.

Омлет (2011-11-26 12:46:00) [24]
Может, какие-то особенности 2003 винды.. В ХР работает без ошибок.
На какой строке вылетает?

Vyacheslav (2011-11-26 12:22:00) [25]
Пробую разобраться с
http://delphimaster.ru/cgi-bin/forum.pl?id=1321913659&n=5
точнее http://www.koders.com/delphi/fidDB05C6361540F62D532FC7C960D4111CE3AAEDB3.aspx

procedure TForm1.Button2Click(Sender: TObject);
begin
ExecuteConsoleApp('cmd', '', Memo1.Lines);
end;

Access violation at address 7519B763 in module 'kernell32.dll'. Write of address 0051578A.

Омлет (2011-11-26 11:13:00) [26]
http://delphimaster.ru/cgi-bin/forum.pl?id=1321913659&n=5
см. сообщение 9.

MBo (2011-11-26 07:52:00) [27]
http://www.sources.ru/cpp/using_anonymous_pipes.shtml
и др. по теме - перехват вывода на консоль

Страницы: < 1 2

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »