Главная страница
    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.05 c
9-1092384941
pavel_pavel
2004-08-13 12:15
2004.12.12
Инвентарь в игре


14-1100948044
Progh
2004-11-20 13:54
2004.12.12
Подскажите ХОРОШУЮ статью перехвата WIN API с примерами на Delphi


1-1101574669
tf_kiev
2004-11-27 19:57
2004.12.12
Не создается динамически компонент в форме


3-1100087235
MORA
2004-11-10 14:47
2004.12.12
переход на другой сервер БД


3-1100148526
Andrey V.
2004-11-11 07:48
2004.12.12
Про версию FireBird





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