Разместите нашу кнопку!

Новые статьи:

Programming articles

Создание сайтов на шаблонах

Множество вариантов работы с графикой на канве

Шифруем файл с помощью другого файла

Перехват API функций - Основы

Как сделать действительно хороший сайт

Создание почтового клиента в Delphi 7

Применение паскаля для решения геометрических задач

Управление windows с помощью Delphi

Создание wap сайта

Операционная система unix, термины и понятия

SQL враг или друг

Возникновение и первая редакция ОС UNIX

Оптимизация проекта в Delphi

Ресурсы, зачем нужны ресурсы

Термины программистов 20 века

Советы по созданию собственного сайта с нуля

Шифруем файл с помощью пароля

Фракталы - геометрия природы

Crypt - Delphi программа для шифрования

Рассылка, зачем она нужна и как ее организовать?

Учебник по C++ для начинающих программистов

Уроки для изучения ассемблера

Загадочный тип PCHAR

Средства по созданию сайтов

Операторы преобразования классов is и as

Borland Developer studio 2006. Всё в одном

Создание базы данных в Delphi, без сторонних БД


Software engineering articles



CmdLine

Содержит строку с адресом выполняемой программы

var CmdLine : PChar;

Описание:

    Переменная CmdLine содержит диск, путь и имя файла текущей исполняемой программы, за которыми могут следовать заданные параметры.

     Адрес: диск/путь/файл передаются в смешанном регистре в двойных кавычках, за ними следуют через пробел параметры в смешанном регистре.

Пример кода:

var
   cmd : string;
   i : Integer;

begin
   // Before running this code, use the Run/parameters menu option
   // to set the following command line parameters : -parm1 -parm2
   cmd := CmdLine;
   ShowMessage(cmd); // Show the execution command + parameters

   // How many parameters were passed?
   ShowMessage('There are '+IntToStr(ParamCount)+' parameters');

   // Show these parameters - note that the 0th parameter is the
   // execution command on Windows
   for i := 0 to ParamCount do
   ShowMessage('Parameter '+IntToStr(i)+' = '+ParamStr(i));
end;

Результат выполнения:

"C:\Program files\Borland\Delphi7\Projects\Project1.exe" -parm1 -parm2
There are 2 parameters
Parameter 0 = C:\PROGRAM FILES\BORLAND\DELPHI7\PROJECTS\PROJECT1.EXE
Parameter 1 = -parm1
Parameter 2 = -parm2