Текущий архив: 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.023 c
