Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.12.30;
Скачать: CL | DM;

Вниз

Создание приложения, понимающего   Найти похожие ветки 

 
Zorlag ©   (2003-12-16 18:32) [0]

Уважаемые программисты!! Мне необходимо создать приложение, которое могло бы реагировать на "ключи" (например как запуск программы chkdsk с ключом /F)
Только в моем случае при запуске без ключа программа должна скрытно -- не появляясь перед пользователем завершить свою работу и прописать только сообщение -- типа "работа программы успешно завершена, а при работе с ключом ( например /show)программа должна показать свое окно и дать пользователю возможность выбрать необходимые настройки.
Помогите пожалуйста!! Мне очень нужен Ваш совет!!


 
pasha_golub ©   (2003-12-16 18:33) [1]

ParamStr+ParamCount+F1


 
Zorlag ©   (2003-12-16 18:36) [2]

?


 
Тимохов ©   (2003-12-16 18:40) [3]

что "?"
Поясняю:
В формумах принято отвечать так - строка, которую надо набрать в редакторе и f1, кнопка, которую надо нажать, чтобы почитать текст справки, который должне появиться.


 
TUser ©   (2003-12-16 20:34) [4]

Paramstr - переданные проге параметры
Paramstr[1] - первый параметр
ParamCount - их количество


 
Anatoly Podgoretsky ©   (2003-12-16 20:40) [5]

Дельфи не понимет ? надо именно F1 нажимать.


 
Vovichus ©   (2003-12-16 20:58) [6]

Ладно, напишу сам, поделюсь... :)


 
Zorlag ©   (2003-12-16 21:48) [7]

Vovichus, спасибо, буду ждать! :-)


 
Плохиш_   (2003-12-17 01:09) [8]


> Zorlag © (16.12.03 21:48) [7]
> Vovichus, спасибо, буду ждать! :-)

Да, измелчал народ :-( и чем дальше, тем хуже :-(


 
Кот Бегемот ©   (2003-12-17 09:36) [9]

>Vovichus © (16.12.03 20:58) [6]
>Ладно, напишу сам, поделюсь... :)

Ты пиши-пиши, не торопись - серьезный проект все-таки !!!


 
Kvorubin ©   (2003-12-17 10:40) [10]

procedure TForm1.FormShow(Sender: TObject); var i: Integer;
begin
for i := 0 to ParamCount + 1 do begin
if ParamStr(i) = "/beep" then begin showmessage("Beep"); form1.Width:=300; form1.Height:=300; end;
if ParamStr(i) = "/exit" then begin showmessage("OK"); close; end;
end;
end;
procedure TForm1.FormCreate(Sender: TObject); begin form1.Width:=0; form1.Height:=0; end; end.

самый простой вариант ^^^
С этим ты сможешь зделать усё что угодно..
Есть одна неувязочка, форма всё-же маргает перед закрытием,
поэтому лучше обнулить её размеры и желательно обзавестись
второй формой на которую перекинешь прошку,
а первая будет диалоговым окном
которое будет решать открыть или не открыть программу,
если допустим будет добавлен /ключ, то на первой форме
приветсвия появится приглашение в программку.

В справках Дельфей так не описывают командочки.. :)


 
Плохиш_   (2003-12-17 10:45) [11]

>Kvorubin © (17.12.03 10:40) [10]

> В справках Дельфей так не описывают командочки.. :)

Справка и не служит для разжёвывания ;-) она подразумевает, что у читающего имеется достаточмое количество серого вещества



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

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

Наверх




Память: 0.49 MB
Время: 0.015 c
1-99559
Sol-ZanuFF
2003-12-17 15:43
2003.12.30
Проблемы с печатью


14-99711
АлексейК
2003-12-09 11:36
2003.12.30
Образное мышление.


1-99571
zsv
2003-12-18 05:58
2003.12.30
Надстрочные и подстрочные символы


14-99767
angelant
2003-12-06 09:40
2003.12.30
Машина крутая... Но, черт возьми... глухая... :(


14-99784
Knight
2003-12-05 12:26
2003.12.30
Почему TStringGrid такой недоделанный?