Вниз
Скачать: CL | DM;

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.


 
Azon ©   (2004-04-11 06:39) [6]

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


 
Fay ©   (2004-04-11 06:59) [7]

8))



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

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



Память: 0.46 MB
Время: 0.029 c
1-1081511875
basken
2004-04-09 15:57
2004.04.25
Столкнулся с проблемой при приминении паттерна стратегия


4-1077907649
gavrila
2004-02-27 21:47
2004.04.25
WNetLogonA & WNetLogoffA from mpr.dll


1-1081600823
eX
2004-04-10 16:40
2004.04.25
Как конвертировать String в Char?


1-1081141869
AmazedDexter
2004-04-05 09:11
2004.04.25
Recursively using


3-1080651328
geg
2004-03-30 16:55
2004.04.25
Генерация номера заказа




   Наверх