| Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > Delphi: Общие вопросы > Компонент в RichEdit |
| Автор: CHERRY 14.12.2004, 16:07 |
| Смещаем границу RichEdit и встраиваем на это место в RichEdit TrackBar. При этом текст пропадает. Делаем тракбару Destroy и текст появляется. В чем ошибка? procedure TForm1.Button1Click(Sender: TObject); var Rect: TRect; T:TTrackBar; begin T:=TTrackBar.Create(RichEdit1); T.Parent:=RichEdit1; SendMessage( RichEdit1.Handle, EM_GETRECT, 0, LongInt(@Rect)); Rect.Top:= 40; SendMessage(RichEdit1.Handle, EM_SETRECT, 0, LongInt(@Rect)); RichEdit1.Refresh; end; |
| Автор: bear 17.12.2004, 07:38 |
| Я непойму, зачем таскбар на ричедит. Разве нельзя его рядом с ним на форме разместить? |
| Автор: Bes 17.12.2004, 07:43 |
| Вообще Мемо там или ЛистБокс чем не устраивает?... там все есть автоматом. |