VPF::Передача параметров - Форум программистов

DEER

Дата 17.2.2006, 12:01 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 749
Регистрация: 12.4.2005
Где: г. Рязань

Репутация: нет
Всего: 13

Здравстуйте.

Есть проект написан на Delphi 7, нужно добавить в него функционал, чтобы можно было бы запускать его в командной строке с задаными параметрами.

Как это делается в Delphi ?

Проект НЕ консольный

Спасибо

--------------------

Демо

Дата 17.2.2006, 12:05 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1278
Регистрация: 3.11.2005

Репутация: 30
Всего: 50

Раз приложение с GUI, то можешь параметры обрабатывать в OnCreate основной формы - ParamStr.
Либо в любом месте программы, где тебе это удобно, в том числе и в файле проекта - .DPR.

--------------------

Guedda

Дата 17.2.2006, 12:11 (ссылка)

(нет голосов)

Загрузка ...

Подрывник

Профиль
Группа: Завсегдатай
Сообщений: 3137
Регистрация: 27.12.2005
Где: Ростов-на-Дону

Репутация: 14
Всего: 78

Код


{ **** UBPFD *********** by delphibase.endimus.com ****
>> Получение параметров командной строки приложения

Зависимости: Windows, SysUtils
Автор:       Dimka Maslov, [email protected], ICQ:148442121, Санкт-Петербург
Copyright:   Dimka Maslov
Дата:        29 марта 2003 г.
***************************************************** }

function Parameters: string;
var
  P: PChar;
begin
  P := GetCommandLine;
  if P^ = '"' then
  begin
    Inc(P);
    P := StrPos(P, '"');
    Inc(P);
  end
  else
    P := StrPos(P, ' ');
  Inc(P);
  Result := P;
end;

Взято из DelphiWorld.ru

Это сообщение отредактировал(а) Guedda - 17.2.2006, 12:12

--------------------

Ll 2

<Spawn>

Дата 17.2.2006, 12:27 (ссылка)

(нет голосов)

Загрузка ...

Око кары:)

Профиль
Группа: Экс. модератор
Сообщений: 2776
Регистрация: 29.1.2003
Где: Екатеринбург

Репутация: 44
Всего: 64

Guedda, Зачем изобретать велосипед? Все уже сделано за нас и лежит, как уже сказали, в ParamStr. Количество параметров в ParamCount (или как то так - Дельфи под рукой нет, чтоб проверить...)

--------------------

"Для некоторых людей программирование является такой же внутренней потребностью, подобно тому, как коровы дают молоко, или писатели стремятся писать" - Николай Безруков.

DEER

Дата 17.2.2006, 12:28 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 749
Регистрация: 12.4.2005
Где: г. Рязань

Репутация: нет
Всего: 13

Демо, Guedda спасибо по репе smile

Это сообщение отредактировал(а) DEER - 17.2.2006, 12:30

--------------------

Snowy

Дата 17.2.2006, 12:38 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Модератор
Сообщений: 11363
Регистрация: 13.10.2004
Где: Питер

Репутация: 192
Всего: 484

Вариант, предложенный Guedda возвращает коммандную строку целиком.
Если нужны отдельные параметры, то нужно использовать ParamCount и ParamStr.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »