Разработка прикладных программ для ОС WINDOWS с помощью интегрированных сред Delphi / C++Builder. Баканов В.М. - 67 стр.

                                   - 67 -




9.2. ПРИЕМЫ РАБОТЫ С КОМАНДНОЙ СТРОКОЙ И
    ПРОЦЕССАМИ-ПОТОМКАМИ

   Стандарты языка Object Pascal 8.0 системы Delphi и языка C++ пакета
С++Builder позволяют создавать программное обеспечение не только при-
кладного, но и системного уровня; некоторые из этих возможностей будут
продемонстрированы ниже на примерах обработки параметров командной
строки и управления процессами-потомками.
   Число параметров командной строки может быть прочитано из перемен-
ной ParamCount, причем доступ к i-тому параметру командной строки осу-
ществляется как ParamStr(i), где i=0 ÷ ParamCount-1.
   Нижеследующий фрагмент Pascal-кода заносит в компонент Memo1 со-
держимое параметров командной строки

Memo1.Clear; { очистка Memo1 }
{ заполнение списка Memo1 параметрами командной строки }
for i := 1 to ParamCount do
  Memo1.Lines.Add(ParamStr(I));

   C++Builder. Аналогичный пример С-кода приведен ниже

Memo1->Clear(); // очистка Memo1
// заполнение списка Memo1 параметрами командной строки
for (i=0; i <= ParamCount(); i++)
  Memo1->Lines->Add(ParamStr(i));

Memo2->Clear();// очистка Memo2
// заполнение списка Memo2 переменными среды Windows
i=0;
 while (_environ[i])
  Memo2->Lines->Add(_environ[i++]);

   Процесс в WINDOWS’9x и WINDOWS’NT запускается с помощью сис-
темной функции CreateProcess; с помощью этой функции можно запустить
как 32-, так и 16-тиразрядные приложения WINDOWS, а также программы
MS-DOS и 16-тиразрядные консольные приложения OS/2. Для инициализа-
ции процесса-потомка может быть использована нижеприведенная Pascal-
процедура RunExternal, основой которой является как раз функция Create-
Process

procedure TForm1.RunExternal(CommandLine: string;
                             RuleParent,Priority: byte;
                             RuleMessage: boolean);
{ пытается стартовать процесс-потомок согласно командной строкe