Старый 07.03.2006, 17:30   #1   
Форумец
 
Аватар для Арх
 
Сообщений: 265
Регистрация: 28.04.2004

Арх вне форума Не в сети
Question Вопрос по Delphi

Какая комманда в Delphi 6 запускает комманды коммандной строки? :-)
Например надо выполнить Format c: :-)
  Ответить с цитированием
Старый 07.03.2006, 18:32   #2   
Кэп Улитка
 
Аватар для Yandex
 
Сообщений: 8,067
Регистрация: 04.05.2005
Возраст: 43

Yandex вне форума Не в сети
Выбирай на вкус.
Код:
uses ShellAPI;
...
  ShellExecute 
или  
  WinExec 
...
// на чистом API
//Создает процесс, определяемый командной строкой CommandLine
//Ограничение: длина CommandLine не может превосходить 256 символов!
procedure Execute(CommandLine: String);
var
  SI : TStartUpInfo;
  P : TProcessInformation;
begin
if CommandLine='' then exit;

FillChar( SI, SizeOf(SI),0);

SI.cb := SizeOf( Si);
SI.dwFlags := startf_UseShowWindow;
SI.wShowWindow := SW_HIDE;  //не показывать окно процесса

CreateProcess(nil,PChar(CommandLine),nil,nil,False,CREATE_DEFAULT_ERROR_MODE,nil,nil,SI,P);

WaitForSingleObject(P.hProcess, Infinite);

CloseHandle(P.hProcess);
CloseHandle(P.hThread);
end;
  Ответить с цитированием
Поиск в теме: 



Быстрый переход:

  Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения
BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. Перевод: zCarot
Support by DrIQ & Netwind