Функція ParamCount в Delphiвидає кількість параметрів переданої поточній програмі.
System unit
function ParamCount : Integer;
Функція ParamCount повертає кількість параметрів командного рядка, які використовуються для виклику даної програми, що виконується.
Примітка.
Пов'язана функція ParamStr повертає ці параметри як значення індексів 1, 2 і т.д.
Функція 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
Подібні функції, процедури та команди
CmdLine — містить текст, що використовується при запуску поточної програми.
FindCmdLineSwitch — визначає, чи було передано деякий параметр вимикач.
ParamStr — повертається один із параметрів, які використовуються для запуску поточної програми.
