Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.12.16;
Скачать: CL | DM;

Вниз

Как перерисовать Scroll у TRichEdit`а ?   Найти похожие ветки 

 
leonidus ©   (2007-05-25 10:07) [0]

Проблема вот в чем, после заполнения RichEdit данными, у меня не всегда корректно прорисовывается вертикальный ScrollBar, точнее сама полоса прокрутки нормально видна, а вот стрелки вверх и вниз не видны пока я на них не наведу курсор. Я подумал что можно найти ScrollBar через FindWindow и потом сделав sendmessage отправить ему сообщение WM_REPAINT. Но почему-то не получается найти хэндл ScrollBar RichEdit`а. Помогите пожалуйста разобраться.


 
clickmaker ©   (2007-05-25 12:48) [1]

InvalidateRect(RichEdit.Handle, nil, true)?
RedrawWindow(RichEdit.Handle, ...)?
у ричэдита нету отдельных скролбаров с хэндлами - они рисуются


 
leonidus ©   (2007-05-25 13:56) [2]

Сделал:

        InvalidateRect(form8.RichEdit1.Handle, nil, true);
        RedrawWindow(form8.RichEdit1, nil, 0, RDW_UPDATENOW);

толку ноль...


 
leonidus ©   (2007-05-28 11:05) [3]

Ничего не помогает, перепробовал все, делаю так:

form8.RichEdit.Invalidate;
InvalidateRect(form8.RichEdit.Handle, nil, true);
RedrawWindow(form8.RichEdit.Handle, nil, 0, RDW_UPDATENOW);

в чем же засада?


 
leonidus ©   (2007-05-29 16:15) [4]

господа, подскажите еще какую нибудь идею...


 
capkoh ©   (2007-05-29 20:50) [5]

Естественно, что делаете это ПОСЛЕ заполнения данными? В самом конце? А вообще, можно посоветовать ещё вот такое попробовать:

SendMessage(RichEdit1.Handle, WM_NCPAINT, 1, 0);


 
homm ©   (2007-05-29 21:13) [6]

SendMessage(NC_PAINT, <далее по справке>);


 
homm ©   (2007-05-29 21:27) [7]

Сори за дезинфу.
WM_NCPAINT


 
clickmaker ©   (2007-05-30 10:45) [8]


> [6] homm ©   (29.05.07 21:13)
> SendMessage(NC_PAINT, <далее по справке>);

RedrawWindow(form8.RichEdit.Handle, nil, 0, RDW_INVALIDATE or RDW_UPDATENOW or RDW_FRAME);


 
clickmaker ©   (2007-05-30 10:59) [9]


> leonidus ©   (25.05.07 10:07)
> Проблема вот в чем, после заполнения RichEdit данными

а до заполнения? И как заполняешь?

странный глюк, вообще-то. Ни разу не наблюдал


 
homm ©   (2007-05-30 11:17) [10]

> а до заполнения?

А до заполнения и так же все нормально. Зачем перерисовывать то?


 
clickmaker ©   (2007-05-30 11:28) [11]


> [10] homm ©   (30.05.07 11:17)

ну в смысле, непонятно, если HideScrollbars = False, ScrollBars = ssVertical, то до заполнения они тоже без стрелок или нормальные?
Если HideScrollbars = True, то понятно, что нормально



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

Текущий архив: 2007.12.16;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.025 c
1-1190978060
wild_arg
2007-09-28 15:14
2007.12.16
группировка строк в TExcelApplication


8-1170672615
bobus
2007-02-05 13:50
2007.12.16
Картинки для панели инструментов


4-1180497793
AndreyRU
2007-05-30 08:03
2007.12.16
Вне зоны доступа! WM_MOUSEMOVE


1-1191076411
KemSnake
2007-09-29 18:33
2007.12.16
Изменение цвета и размера полосы прокрутки TStringGrid.


15-1195127822
alex_***
2007-11-15 14:57
2007.12.16
аналог self в vb6