Здравствуйте, BeeNokle, Вы писали:
BN>Здравствуйте, neiroman, Вы писали:
N>>обработчик onClick :
N>>flag:=true
N>>while flag do
N>> // чето делаем
N>>обработчик onMouseUp :
N>>flag:=false;
BN>Ага, только если на вставить в обработчике события onClick в цикле Application.ProcessMessages, то ваш цикл будет крутится и крутися, пока стэк не начнет орать и ругатся матом, после чего вылезет красивое окошком примерно с таким содержанием: Stack Overflow..bla-bla-bla.
На эту тему есть классный пример в хелпе Delphi см. ProcessMessages/Delphi example
... << RSDN@Home 1.1.4 beta 7 rev. 447>>