Справочник функций и процедур Delphi: FindCmdLineSwitch

  Навигация по первой букве:

A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z

  Навигация по категории:

Compiler directives, Directives, Keywords / Types, Variables, Constants / Functions, Procedures

  Реклама:

 

FindCmdLineSwitch
Функция
Определяет, был передан некоторый параметр выключатель SysUtils unit
  
1 function FindCmdLineSwitch ( const SwitchValue : string ) : Boolean;

2 function FindCmdLineSwitch ( const SwitchValue : string; IgnoreCase : Boolean ) : Boolean;

3 function FindCmdLineSwitch ( const SwitchValue : string; SwitchChars : TSysCharSet; IgnoreCase : Boolean ) : Boolean;

Google  
 
Описание
Функция FindCmdLineSwitch просматривает командную строку (программа + параметры испольльзуются для вызова текущей программы) для данного параметра выключателя.

Выключатели - дополнительные параметры, предустановленные:

/ для Windows - для Linux

но может быть определен в SwitchChars в 3 Версии функции.

SwitchValue следует за этим префиксным символом, и является значением просмотриваемым в командной строке этой функцией.

Параметр IgnoreCase в 2, 3 Версиях функции определяет, игнорирует ли просмотр регистр SwitchValue. Значение по умолчанию Истинно.
Похожие команды
CmdLine  Содержит выполняемый текст используемый при запуске текущей программы

ParamCount  Выдает число параметров переданной текущей программе

ParamStr  Возвращается один из параметров используемых для запуска текущей программы

TSysCharSet  Символы, используемые снабженной строкой анализирующих функций

 
Пример кода : Поиск параметров программы 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;

"C:\Program files\Borland\Delphi7\Projects\Project1.exe" /def abc /ghi
3 параметра
abc НЕ найден
def найден
ghi найден
 


Copyright © 2004-2016 Delphi Sources (источник – "DelphiBasics.ru")
 


Группа ВКонтакте   Ссылка на Twitter   Группа на Facebook