| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Порисуем на RTFeditor`е [D7, Win2k]
Сергей Резников © (2003-11-20 12:13:00)
SDC := GetDC(RTFEdit.Handle);
SetBkColor(SDC, 255);
SetDCBrushColor(SDC, 255);
Rectangle(SDC, 0, 20, 300, 40);
Не помогает -- не меняет цвет ! Как быть ?
Darthman (2003-11-20 14:31:00) [1]
Надеюсь, ВС и Brush освобождать не забываете? А то будет утечка.
Сергей Резников (2003-11-20 12:30:00) [2]
> MBo © (20.11.03 12:25) [2]
Big спасибо :-)
MBo (2003-11-20 12:25:00) [3]
var DC:HDC;
OldB,HB:HBrush;
begin
DC := GetDC(Richedit1.Handle);
HB:=CreateSolidBrush(clRed);
OldB:=SelectObject(DC,HB);
Rectangle(DC, 0, 20, 300, 40);
Сергей Резников (2003-11-20 12:22:00) [4]
В смысле, рисуется белый пр-к с чёрными бордюрами.
| |
