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

Вниз

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

 
777 ©   (2003-09-26 21:53) [0]

Вот же Ё.........
Создаем событие OnExecute у акции.
В нем выполняется вызов процедуры, которая делает что-либо,
например заполнение TreeView (у меня так)

procedure TAdvancedFindForm.Action1_FExecute(Sender: TObject);
begin
ClearForm;
end;

Вся проблема в том, что событие обрабатывается дважды!!!
Я с ума еще не сошел, так что видимо глюк. Или нет?
Сразу замечу, что если сделать

procedure TAdvancedFindForm. Button1Click(Sender: TObject);
begin
ClearForm
end;

то все нормально...


 
Юрий Федоров ©   (2003-09-26 22:50) [1]

а куда повешено событие акции?


 
X-shadow ©   (2003-09-26 23:03) [2]

сделай что-то типа такого
...
var
a:integer;
...
procedure TAdvancedFindForm.Action1_FExecute(Sender: TObject);
begin
if a<>1 then
begin
ClearForm
end
a=1;
end;
криво но пахает :)


 
777 ©   (2003-09-26 23:08) [3]


> Юрий Федоров © (26.09.03 22:50) [1]

ActionMainMenuBar, ActionManager...


> X-shadow © (26.09.03 23:03) [2]

Конечно выход, но все-таки хотелось бы знать в чем дело :(



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

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

Наверх




Память: 0.47 MB
Время: 0.024 c
14-27687
Anatoly Podgoretsky
2003-09-04 21:54
2003.10.09
Хокку Пиво


14-27738
VID
2003-09-18 17:11
2003.10.09
Бесплатный архив MP3-музыки


14-27686
Дмитрий
2003-09-21 11:20
2003.10.09
Винчестер Fujitsu MPG3204AT живет самостоятельной жизнью;-) ;-(


1-27594
daaap
2003-09-29 09:49
2003.10.09
Создание компонент


4-27792
Brat-2
2003-08-05 10:53
2003.10.09
Получение текста из чужого окна.