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

Вниз

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

 
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 вся ветка

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

Наверх





Память: 0.45 MB
Время: 0.031 c
6-1092257951
Piter
2004-08-12 00:59
2004.12.12
Посоветуйте с выбором компонента для работы с TCP


1-1101560007
начинающий 2
2004-11-27 15:53
2004.12.12
FormMouseMove


1-1101692605
che
2004-11-29 04:43
2004.12.12
Создание нескольких текстовых файлов


4-1098990394
peppperok
2004-10-28 23:06
2004.12.12
Кнопка Видовс !!!!!!!


1-1101416797
Bobby Digital
2004-11-26 00:06
2004.12.12
Runtime Error





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