Главная страница
    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.45 MB
Время: 0.005 c
3-99838
victor
2001-12-25 06:55
2002.01.31
не отображаются значения по умолчанию


1-99961
Turalyon
2002-01-14 09:04
2002.01.31
Методы динамических объектов


4-100096
Tsatur
2001-11-29 22:39
2002.01.31
Перехват обращения к Cd-Rom у


4-100129
-Coban-
2001-12-01 16:45
2002.01.31
Перехват ссылок IE


1-99994
Анатолий
2002-01-14 22:57
2002.01.31
Проблемы с картинками





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский