Текущий архив: 2003.11.03;
Скачать: CL | DM;

Вниз

запуск с параметром   Найти похожие ветки 

← →
wildbird ©   (2003-10-22 06:16) [0]

доброе время суток!
есть консольное приложение надо чтоб при запуске пердовался параметр как это сделать?
напимер arhiv.exe \a
как эту А то отследить?

---

← →
MBo ©   (2003-10-22 06:39) [1]

paramcount paramstr

---

← →
wildbird ©   (2003-10-22 07:06) [2]

сенкс.

---

← →
Донской ©   (2003-10-22 19:07) [3]


s:="";
for i:=1 to ParamCount do
if ParamStr(i)[1] in ["-","/"] then
s:=s+"""+Copy(ParamStr(i),2,255)+"",";
s:=AnsiUpperCase(s);
IsSuperVisor := Pos(""SUPER",",s)>0;
IsDebug := Pos(""DEBUG",",s)>0;


типа вызвали прогу с ключами /super и(или) /debug

---

Страницы: 1 вся ветка

Текущий архив: 2003.11.03;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.022 c