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

Вниз

abort в KOL   Найти похожие ветки 

 
Ilnur   (2005-06-06 16:24) [0]

Скажите, пожалуйста, как реализована в KOL функция "Abort" для прекращения действия функции, но не для выхода из нее
В моём случае:

SaveResp := Messagebox(applet.Handle,pchar(Format(sSaveChanges, [FFileName])),"do you want to save changes?",3);
case SaveResp of
   idYes: KOLForm1Savemenu(self.MainMenu1,1);
   idNo: {Nothing};
   idCancel: {I don"t know???} ;
 end;
end;

Что нужно вставить в idCancel? (но не exit, т.к. exit выходит из процедуры, а мне нужно вставить это в KOLForm1Close).


 
Thaddy   (2005-06-06 17:58) [1]

That is not a KOL question, but an algorithmic question:
ask your self:
- How many options do I have to provide for (hint: 1 2 3) ?
- What exactly are the numbers I get back?
- What structures does Delphi provide to handle these? (hint: case)
- What is the right place in my program to put such a question? (hint: if you get stuck, it is too late!)

I can give you an example of what you want, but you should first try to solve this well known problem yourself!

(Follow the hints: it is not difficult)



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

Форум: "KOL";
Текущий архив: 2006.01.22;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.44 MB
Время: 0.042 c
1-1134682581
YongStudent
2005-12-16 00:36
2006.01.22
Определить где щелкнули мышью


2-1135859507
ezorcist
2005-12-29 15:31
2006.01.22
Как сохранить в файл канву?


2-1135677661
Ice
2005-12-27 13:01
2006.01.22
Как "отцепить" мышь от контрола ?


2-1135807881
saNat
2005-12-29 01:11
2006.01.22
Требуется помощь в поиске ошибки


9-1123607260
Yegorchic
2005-08-09 21:07
2006.01.22
А загрузить .max файл через GLScene нельзя?





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