Форум: "Основная";
Текущий архив: 2006.09.17;
Скачать: [xml.tar.bz2];
ВнизTFrame TAction и ShorCut Найти похожие ветки
← →
ancot (2006-08-04 20:28) [0]Доброго всем вечера.
Есть форма, три фрэйма и два ActionList, попробую изобразить кто кому родственник
Form1_Frame1_ActionList1
_Frame2_Frame3_ActionList2
Проблема в том что у ActionList2 не отрабатывает ShorCut.
Покопавшись в исходниках VCL разобрал что private метод TFrame - AddActionList не добавляет ActionList к списку FActionLists класса TCustomForm т.к. родитель Frame3 не TCustomForm. Выход я нашел определив класс для доступа списку FActionLists TCustomForm:TMyForm = class(TCustomForm)
end;
Использование для ActionList2 что то вродеvar l: TList;
begin
TMyForm(Parent.Parent).FActionLists.Add(Self);
end;
Это работает, но может есть менее извращенные способы.
Желательно с использованием компонентов и наследования.
← →
ancot (2006-08-04 21:56) [1]Правда нет вариантов?
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2006.09.17;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.036 c