Описание

function ParamCount : Integer;

Функция ParamCount возвращает число параметров командной строки, используемых для вызова данной выполняемой программы.

Пример кода

var
cmd : string;
i : Integer;

begin
// Перед выполнением этого кода, используйте опцию меню Run/parameters
// для установки следующих параметров командной строки: -parm1 -parm2
cmd := CmdLine;
ShowMessage(cmd);     // Показ выполняемой команды + параметры

// Сколько параметров было передано?
ShowMessage(IntToStr(ParamCount)+' параметров');

// Показ этих параметров - обратите внимание, что 0-ой параметр это
// выполняемая команда в Windows
for i := 0 to ParamCount do
ShowMessage('Параметр '+IntToStr(i)+' = '+ParamStr(i));
end;

"C:\Program files\Borland\Delphi7\Projects\Project1.exe" -parm1 -parm2
2 параметра
Параметр 0 = C:\PROGRAM FILES\BORLAND\DELPHI7\PROJECTS\PROJECT1.EXE
Параметр 1 = -parm1
Параметр 2 = -parm2

Примечание

Связанная функция ParamStr возвращает эти параметры как значения индексов 1, 2 и т.д.