Функция FindCmdLineSwitch – визначає, чи було передано певний перемикач параметрів

Функція FindCmdLineSwitch в Delphi визначає, чи було передано певний перемикач параметрів.

Функція FindCmdLineSwitch: Пошук параметрів програми для 3 перемикачів

begin
  // Перед виконанням цього коду скористайтеся опцією меню Run/parameters
  // для встановлення наступних параметрів командного рядка: /def abc /ghi
  ShowMessage(CmdLine);     // Показ команди, що виконується + параметри

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

  // Сканування на параметри parm1, parm2 та parm3
  if FindCmdLineSwitch('abc')
  then ShowMessage('abc знайдено')
  else ShowMessage('abc НЕ знайдено');

  if FindCmdLineSwitch('def')
  then ShowMessage('def знайдено')
  else ShowMessage('def НЕ знайдено');

  if FindCmdLineSwitch('ghi')
  then ShowMessage('ghi знайдено')
  else ShowMessage('ghi НЕ знайдено');
end;