Процедура разборки на параметры строки запуска програмы

← →
Pasha219 (2003-05-31 11:15) [0]

Дайте, плз, примерчик процедуры разборки строки запуска програмы с параметрами, на пареметры.
Допустим програма запускаеться с командной строки в таком виде:
test.exe -atest.txt -bc:\test\ -c"Тест програми"
Мне нада процедура шоб присвоила переменным даные:
a:="test.txt";
b:="c:\test\";
c:="Тест програми";

← →
Forester (2003-05-31 11:19) [1]

См. Help по ParamStr и ParamCount

← →
Armen (2003-05-31 12:43) [2]

см также FindCmdLineSwitch

← →
Pasha219 (2003-05-31 17:39) [3]

А можно всетаки примерчик в студию?
В моей делфе нет в хелпе ничего вышеперечисленого :(

← →
Forester (2003-05-31 17:48) [4]

Написано понятно, переводи сам

ParamStr
Returns a specified parameter from the command-line.

Unit

System

Category

command line utilities

function ParamStr(Index: Integer): string;

Description

ParamStr returns the parameter from the command line that corresponds to Index, or an empty string if Index is greater than ParamCount. For example, an Index value of 2 returns the second command-line parameter.

ParamStr(0) returns the path and file name of the executing program (for example, C:\TEST\MYPROG.EXE).

Note: Use double quotes to wrap multiple words as one parameter (such as long file names containing spaces).

ParamCount
Returns the number of parameters passed on the command line.

Unit

System

Category

command line utilities

function ParamCount: Integer;

Description

ParamCount returns the number of parameters passed to the program on the command line. Separate parameters with spaces or tabs. Use double quotes to wrap multiple words as one parameter (such as long file names containing spaces).

← →
Pasha219 (2003-05-31 18:19) [5]

И где ты тут видишь пример? Я же пример просил, а как пользоваться ParamStr я знаю и шо с помощю ParamCount можно узнать количество этих параметров.

← →
Palladin (2003-05-31 18:27) [6]

ye ns negjq

ParamStr(0) ни о чем не говорит тебе?
что за народ пошел, никаких выводов не делают, никакой аналитики...

← →
Pasha219 (2003-05-31 18:40) [7]

Говорит, но не то шо я хотел услышать.
Я нехочу жостко прописыватьть параметры под програму, типа:
a:=ParamStr(1);
b:=ParamStr(2);
....
z:=ParamStr(n);
У меня может быть параметр -В например, а может и не быть при запуске програмы, а может человек захочет вовсе при запуске поменять местами параметры.

← →
Юрий Зотов (2003-05-31 18:41) [8]

> Forester

А Вы вообще-то в хелп заглянуть хотя бы попробовали?

Похоже, и не пробовали даже. А то бы не спрашивали примеры, которые там есть.

← →
Юрий Зотов (2003-05-31 18:43) [9]

> Forester

Ошибся адресатом, приношу свои извинения. Предыдущий постинг был для Pasha219.

← →
Palladin (2003-05-31 18:48) [10]

> нехочу жостко прописыватьть параметры

а кто тебе это навязывает?

ты не совсем верно мыслишь...
не бери за основу свой какой то определенный параметр, а бери за основу параметр который тебе передали, анализируй его, что это такое, подходит он тебе или нет...

← →
Pasha219 (2003-05-31 18:57) [11]

Юрий Зотов >А Вы вообще-то в хелп заглянуть хотя бы попробовали?
Юрий Зотов >Похоже, и не пробовали даже. А то бы не спрашивали примеры, которые там есть.

Цитирую то шо раньше писал: "В моей делфе нет в хелпе ничего вышеперечисленого :("

← →
Юрий Зотов (2003-05-31 19:07) [12]

> Pasha219 (31.05.03 18:57)

Трудно поверить. Как искали?

← →
stranger___ (2003-05-31 19:08) [13]

всё там есть
в модуле System

← →
Pasha219 (2003-05-31 19:08) [14]

Palladin>анализируй его, что это такое, подходит он тебе или нет...
Вот этот то меня момент и интересует, но для уверености решил попросить у всех вас примерчик.
Как проверить в переменной какие первые буковки строки, а птом их удалить?

← →
Palladin (2003-05-31 19:11) [15]

таааак...

жмем F1 идем на Index набираем в строке поиска string routines
и будет тебе счастье... если будет...

← →
Pasha219 (2003-05-31 19:26) [16]

Palladin>string routines и будет тебе счастье... если будет...
Нету счастья ;( во время поиска попадаю между строк "string operators" и "string parameters".

← →
Palladin (2003-05-31 19:36) [17]

Раз нету, значит и не будет...

← →
Armen (2003-06-01 15:02) [18]

>У меня может быть параметр -В например, а может и не быть при запуске програмы, а может человек захочет вовсе при запуске поменять местами параметры.

Для таких случаев:

function FindSwitch(const Switch: string): Boolean;
begin
Result := FindCmdLineSwitch(Switch, ["-", "/"], True);
end;

← →
Song (2003-06-01 15:13) [19]

2Pasha219
Тебе надо книжки умные почитать.

← →
Anatoly Podgoretsky (2003-06-01 15:20) [20]

Остается одно, переинсталировать.

Процедура разборки на параметры строки запуска програмы Найти похожие ветки