Скачать: CL | DM;

Собственный Action   Найти похожие ветки 

← →
Ega23 ©   (2008-01-29 20:56) [0]

Допустим, я хочу создать класс своих экшенов. Например такие, чтобы при выполнении ещё и файл звуковой проигрывали.
Как создать, в принципе, ясно: унаследоваться от TContainedAction и т.п.
Вопрос в другом: каким образом добавить данный класс экшенов в TActionList, дабы ими можно было в Design-Time оперировать?

---

← →
JesteR   (2008-01-29 21:05) [1]

Пишешь:
 RegisterActions("LibraryMyAction", [TMyAction], nil);
После этого кликаешь два раза на ActionList.
Далее выбираешь New Standart Action (Ctrl + Ins) и находишь свой Action

---

← →
Ega23 ©   (2008-01-29 21:06) [2]

> Пишешь:
>  RegisterActions("LibraryMyAction", [TMyAction], nil);


А где пишешь?

---

← →
JesteR   (2008-01-29 21:10) [3]

{ TMyAction }

 TMyAction = class(TAction)
 public
   // Описание методов
 end;

procedure Register;

implementation

uses // модули

procedure Register;
begin
 // Сюда пишешь то что я написал выше
end;

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.016 c