DblClick для RichEdit а и анимированная иконка для трэя

← →
Azon © (2004-04-11 03:59) [0]

Следующие 2 вопроса. :))
1. Как для RichEdit"а сделать обработчик события OnDblClick. При этом бы не хотелось создавать новый компонент.
2. Как в трэй добавить анимированную иконку и как ее менять в процессе? Как добавить обычную а знаю, так что можете особенно не разжевывать (если, конечно, это хоть немного похоже).

Верю в поддержку.

← →
Fay © (2004-04-11 04:13) [1]

Просто меняй иконку то таймеру.

← →
Azon © (2004-04-11 04:34) [2]

Это так реализуется? Я думал есть какой-нибудь более нормальный способ. :)) Thanks to Fay. Но вопрос еще открыт. Вдруг более нормальный способ всеже существует. :))

← →
Fay © (2004-04-11 05:12) [3]

Смена иконки - это и есть анимация 8)
>> Это так реализуется?
Как добавление. Только не NIM_ADD, а NIM_MODIFY 8)

← →
Azon © (2004-04-11 05:42) [4]

Я думал, что закладываешь куда-нибудь анимированную иконку (или серию иконок), а Windows уже сам их меняет. Thanks to Fay еще раз.
НО первый вопрос остается в силе!

← →
Fay © (2004-04-11 06:06) [5]

Типа этого
type TForm1 = class(TForm) ................ private procedure AnyOnDblClick(Sender : TObject); ........... end; TCoolAzonRichEdit = class(TCustomMemo) public property OnDblClick; end; var Form1 : TForm1; implementation {$R *.dfm} procedure TForm1.FormCreate(Sender: TObject); begin TCoolAzonRichEdit (RichEdit1).OnDblClick := AnyOnDblClick; end; procedure TForm1.AnyOnDblClick(Sender : TObject); begin ShowMessage("Cool!!"); end; end.

Еще один комплимент в адрес Fay!
Спасибо, ты лучший! ;))

8))

DblClick для RichEdit а и анимированная иконка для трэя Найти похожие ветки