В Delphi в ListBox, как вставлять аним карт

Форум — Ответы ( К темам )

? Тимми: В Delphi в ListBox, как вставлять аним карт (22-04-2003 19:58:48)
Картинки типа gif, Как вставить в любое место, например идет тескт потом картинка потом опять текст. Но обязательно анимированную картинку.
Можно ли тоже самое проделать с RxRichEdit, если да то как???
Владимир (22-04-2003 20:36:14)

Не знаю насчет ListBox и анимированности. Вставляйте в RxGIFAnimator ------------- Вставить картинку в RichEdit: http://www.sources.ru/cpp/cpp_hbitmap_in_richedit.shtml также смотрите RXLib-овский RxRichEdit пример http://vlad2000.h1.ru/Frames/Statyi/page_17.html -------- А можно что-то типа, объявляем в Unit1.h файле: private: // User declarations TRxGIFAnimator *tr; Далее в Unit1.cpp: //--------------------------------------------------------------------------- void __fastcall TForm1::FormShow(TObject *Sender) { tr = new TRxGIFAnimator(RxRichEdit1); tr->Parent = RxRichEdit1; tr->Image->LoadFromFile("C:\\LION.GIF"); } //--------------------------------------------------------------------------- void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action) { delete tr; } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { tr->Animate = true; } //--------------------------------------------------------------------------- void __fastcall TForm1::Button2Click(TObject *Sender) { tr->Animate = false; } //--------------------------------------------------------------------------- // этот пример у меня работает

Владимир (22-04-2003 20:40:54)

Кстати, если вставите в этот пример вместо
RxRichEdit1 компонент ListBox1,
то есть измените

tr = new TRxGIFAnimator(ListBox1);
tr->Parent = ListBox1;

заработает и в нем.

?	Тимми: В Delphi в ListBox, как вставлять аним карт (22-04-2003 19:58:48)
Картинки типа gif, Как вставить в любое место, например идет тескт потом картинка потом опять текст. Но обязательно анимированную картинку. Можно ли тоже самое проделать с RxRichEdit, если да то как???
Владимир (22-04-2003 20:36:14)
Не знаю насчет ListBox и анимированности. Вставляйте в RxGIFAnimator ------------- Вставить картинку в RichEdit: http://www.sources.ru/cpp/cpp_hbitmap_in_richedit.shtml также смотрите RXLib-овский RxRichEdit пример http://vlad2000.h1.ru/Frames/Statyi/page_17.html -------- А можно что-то типа, объявляем в Unit1.h файле: private: // User declarations TRxGIFAnimator tr; Далее в Unit1.cpp: //--------------------------------------------------------------------------- void __fastcall TForm1::FormShow(TObject Sender) { tr = new TRxGIFAnimator(RxRichEdit1); tr->Parent = RxRichEdit1; tr->Image->LoadFromFile("C:\\LION.GIF"); } //--------------------------------------------------------------------------- void __fastcall TForm1::FormClose(TObject Sender, TCloseAction &Action) { delete tr; } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject Sender) { tr->Animate = true; } //--------------------------------------------------------------------------- void __fastcall TForm1::Button2Click(TObject *Sender) { tr->Animate = false; } //--------------------------------------------------------------------------- // этот пример у меня работает
Владимир (22-04-2003 20:40:54)
Кстати, если вставите в этот пример вместо RxRichEdit1 компонент ListBox1, то есть измените tr = new TRxGIFAnimator(ListBox1); tr->Parent = ListBox1; заработает и в нем.