Вниз
Скачать: CL | DM;

Открытие файла   Найти похожие ветки 

← →
Lelik   (2004-11-28 01:59) [0]

Всем привет! Повесил на форму опендиалог и сэйвдиалог. Процедуры все описал работают(открывают сохраняют), но есть такая фича-это когда Файл-Открыть появляется опендиалог, если выбрать файл, то все нормально откроется, но если здесь нажать кансл или отмену, то возникает ошибка. Помогите как это побороть.


← →
asvt   (2004-11-28 02:04) [1]

if OpenDialog1.Execute then
{действия}


← →
Sirakuz   (2004-11-28 02:06) [2]


If OpenDialog1.Execute then
Begin
 //Юзер открыл файл
End else
Begin
 //Юзер нажал на кнопку "Закрыть
End;

То же самое в SaveDialog"e


← →
asvt   (2004-11-28 02:21) [3]

Sirakuz   (28.11.04 02:06) [2]
End else
Begin
//Юзер нажал на кнопку "Закрыть
End;

Это уже другие дей ствия и к кнопке они не относятся


← →
GanibalLector ©   (2004-11-28 02:27) [4]

2 asvt
>Это уже другие дей ствия и к кнопке они не относятся

if (OpenDialog1.Execute) and (OpenDialog1.FileName<>"") then
messagedlg("Ok",mterror,[mbok],0)
else messagedlg("Cancel",mterror,[mbok],0);


← →
asvt   (2004-11-28 02:45) [5]

GanibalLector ©   (28.11.04 02:27) [4]

if OpenDialog1.Execute then
Memo1.Lines.LoadFromFile(OpenDialog1.FileName);

а ты просто добираешся до кнопки что вообщето и не надо
а исходя из поста [2] ghjcnj просто придется опять же вставлять
if then между блоками бегин..енд


← →
GanibalLector ©   (2004-11-28 02:48) [6]

2 asvt
Это [4] ,уважаемый,я Вам показал,что можно и НУЖНО реагировать на кнопку "закрыть"!!!


← →
asvt   (2004-11-28 03:13) [7]

Я вообще этого не спрорю знать конечно такие вещи не помешает а вот подходящий случай с опендиалогом я представит не могу
нажал пользователь cancel а ты ему ты а ну ка открой файл xxx


← →
Defunct ©   (2004-11-28 05:33) [8]

GanibalLector ©   (28.11.04 02:48) [6]

Можно иногда реагировать. Но в большинстве случаев это не нужно.


← →
ASoft   (2004-11-28 09:22) [9]

If not OpenDialog.Execure then exit;



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

Скачать: CL | DM;



Память: 0.46 MB
Время: -0.978 c
1-1101630374
UVV
2004-11-28 11:26
2004.12.12
GetTime


4-1098878484
maxistent
2004-10-27 16:01
2004.12.12
??? CreateFileMapping ???


6-1094570963
pkm
2004-09-07 19:29
2004.12.12
Сеть


14-1101131287
sniknik
2004-11-22 16:48
2004.12.12
жизнеописания умученных сиадминов ;о))


1-1101717269
Wood
2004-11-29 11:34
2004.12.12
Поиск фрагмента текста в Memo и выделение его.




   Наверх