GetArgCo.PAS

Язык:
Русский
English


 { Пример программы для функции GetArgCount }

uses Dos;

var
  TheArgCount : Integer;

begin
  TheArgCount := GetArgCount;
 WriteLn('При запуске программы было передано ', TheArgCount,
         ' параметров в командной строке.');
 WriteLn('(Не считая имени программы)');
end.
Тэги:
| G+
Код для вставки: :: :: :: ::
Поделиться: // //