| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Компонент на основе TActionList [D7]

alexnmsk ©   (2008-03-01 00:44:00) 

Здравствуйте, уважаемые мастера. Можно ли сделать компонент на основе TActionList с готовым набором TAction. Если да, то поясните, как создать готовый набор TAction? Заранее спасибо.

---

Семеныч   (2008-03-01 12:23:00) [1]

RegisterActions тоже не помешало бы.

---

Kolan   (2008-03-01 12:22:00) [2]

RegisterActions ?

---

{RASkov}   (2008-03-01 12:18:00) [3]

> [1] alexnmsk   (01.03.08 02:50)

procedure Register;
begin
 RegisterComponents(<вкладка>, [TMyAction]);
end;

Есть такое?

---

Германн   (2008-03-01 03:13:00) [4]

Не ну. Различия Design-time от Run-Time понимаешь?

---

alexnmsk   (2008-03-01 02:50:00) [5]


constructor TMyAction.Create(AOwner: TComponent);
begin
 inherited;
 Name:='MyAction';
end;

constructor TMyActionList.Create(AOwner: TComponent);
begin
 inherited;
 FMyAction:=TMyAction.Create(AOwner);
 FMyAction.ActionList:=Self;
end;


Вроде все работает, при добавлении компонента на форму, у него имеется список дейтвий. Их можно назначить контролам. Но если просматриваю форму View as Text, то когда возвращаюсь обратно пишет - не найден класс TMyAction и вырубает ему свойство Caption. Модуль, где описан класс указан в uses. Пробовал добавить в проект - не помогло :(

---

Наверх