Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.06;
Скачать: CL | DM;

Вниз

Exit для другой части   Найти похожие ветки 

 
_root   (2005-10-15 22:23) [0]

Я меня из метода onClick вызывается некая функция. При некоторых условиях, проверяющихся в этой функции, необходимо сделать Exit для метода onClick, то есть функция должна завершить другую процедуру


 
Кефир87 ©   (2005-10-15 22:36) [1]

function ChtoTo():boolean;
begin
 ....
 // Что-то не получилось
 Result := False;
 Exit;
 ....
 // Все получилось
 Result := True;
end;

procedure TForm1.OnClick(Sender : TObject);
begin
 bla-bla-bla;
 if(not ChtoTo())then Exit;
 bla-bla-bla;
end;


 
_root   (2005-10-15 22:58) [2]

Спасибо, но это не совсем то 4то нужно. Мне бы производить выход из onClick прямо в функции


 
Кефир87 ©   (2005-10-16 00:04) [3]

Из ОнКлик _ПЕРЕДАЕТСЯ УПРАВЛЕНИЕ_ в другую функцию. то есть выполняется ОнКлик, потом вызывается функция, она что-то делает, а потом возвращает управление ОнКлик. То что ты хочешь не возможно в принципе 8)


 
Германн ©   (2005-10-16 00:45) [4]

2 Кефир87 ©   (16.10.05 00:04) [3]
Ну не то чтобы
>  не возможно в принципе 8)
, но если "в лоб" по сабжу, то очень сложно.


 
Кефир87 ©   (2005-10-16 01:33) [5]


> но если "в лоб" по сабжу, то очень сложно.

Ну так если не в лоб то [1].


 
Anatoly Podgoretsky ©   (2005-10-16 01:40) [6]

Анализировать результат функции или возбуждать исключение.


 
Германн ©   (2005-10-16 01:53) [7]

2 Кефир87 ©   (16.10.05 01:33) [5]
>Ну так если не в лоб то [1].

Если не в лоб, но по сабжу, то это вторая часть ответа АП.


 
msguns ©   (2005-10-16 09:56) [8]

>_root   (15.10.05 22:23)  

Похоже, что ты пытаешься контекстно активировать/деактивировать  элементы управления (меню, батоны и т.д.) .
Если так, то это делается вовсе не таким способом. Попробуй TActionList


 
DiamondShark ©   (2005-10-16 12:17) [9]


> msguns ©   (16.10.05 09:56) [8]

Где миелофон брал?


 
msguns ©   (2005-10-16 12:42) [10]

>DiamondShark ©   (16.10.05 12:17) [9]
>Где миелофон брал?

Попадай в клавиши, брильянтовый ;))



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

Текущий архив: 2005.11.06;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.028 c
4-1125318964
Uran
2005-08-29 16:36
2005.11.06
Разрешения в реестре


2-1129033294
polariton2
2005-10-11 16:21
2005.11.06
Динамические массивы


2-1129132504
Scarlet
2005-10-12 19:55
2005.11.06
как забрать данные?


3-1127296298
yk
2005-09-21 13:51
2005.11.06
Как сохранить запрос и сделать union с другим запросом


14-1129703143
cyborg
2005-10-19 10:25
2005.11.06
MMSYSTEM.HLP