Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];

Вниз

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

 
veZuk   (2002-01-12 12:14) [0]

Как можно сделать в проге параметры запуска, т.е.
lala.exe -parametr1 -parametr2... -parametrN
И каким образом можно к каждому параметру прикрепить соответствующую часть кода?
Заранее спасибо.


 
DK   (2002-01-13 06:21) [1]

Почитай Хелп:
ParamCount
ParamStr


 
Z   (2002-01-13 16:21) [2]

Как пример: прога представляет собой что-то вроде Блокнота. Фрагмент кода вставляется в FormCreate, и если как параметр передано имя файла, открывает его в RichEdit1. (Пример усложнен,
т.к. добавлена поддержка длинных имен файлов.
+ для режима разработки добавлен параметр -debug

*********************
if paramcount>0 then begin
if LowerCase(paramstr(1))="-debug" then begin
worknfo1.visible:=true;
n41.visible:=true;
n:=2;
repeat
fail:=fail+paramstr(n); //обработка длинных имен
until paramcount<n;
end
else begin
n:=1;
repeat
fail:=fail+paramstr(n);
until paramcount<n;
end;
if fileexists(fail) then begin
richedit1.lines.LoadFromFile(fail);
fn:=fail;
form1.caption:="Virtual Keyboard - " + fn;
opendialog1.InitialDir:=ExtractFilePath(fn);
richedit1.SetFocus;
richedit1.modified:=false;
end;
end;



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

Форум: "Основная";
Текущий архив: 2002.01.31;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.003 c
3-99920
IronHawk
2001-12-26 10:42
2002.01.31
Как сохранить


3-99849
Роман_
2001-12-26 10:59
2002.01.31
Отключить триггеры InterBase ?


14-100062
Лисий Хвост
2001-12-10 09:22
2002.01.31
Программистам-Битломанам


1-99963
DW
2002-01-14 10:45
2002.01.31
Как выделить кусок текста другим цветом?


4-100102
limon
2001-12-03 11:26
2002.01.31
Загрузка CPU





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский