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

Вниз

Цвет   Найти похожие ветки 

 
Andy BitOff   (2003-09-08 15:44) [0]

Здравствуйте.
Подскажите пожалуйста, как задать цвет, которым рисовать в этом случае;
ScreenDC:=GetDC(ts0.Handle);
windows.Rectangle(ScreenDC, 1, 1, 100, 100);
ReleaseDC(0,ScreenDC);
Чтобы квадрат был нужного мне цвета.


 
MBo ©   (2003-09-08 15:49) [1]

создать и выбрать в этом контексте перо и кисть нужного цвета
CreatePen
CreateSolidBrush
SelectObject


 
Skier ©   (2003-09-08 16:08) [2]

>Andy BitOff (08.09.03 15:44)
А может быть лучше использовать TCanvas c инициализированным св-вом
Handle (TCanvas.Handle := ScreenDC) ?
И дальше как обысно работаешь с TCanvas.


 
Andy BitOff   (2003-09-08 16:25) [3]

Возможно, я не пробовал. Но уже по варианту MBo написал, работает :)


 
Andy BitOff   (2003-09-08 16:35) [4]

Единственное, что MBo забыл указать DeleteObject, но помоему это и так понятно, если что-то создаешь, не забудь убрать.



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

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

Наверх




Память: 0.47 MB
Время: 0.012 c
6-58803
sdram
2003-07-18 09:52
2003.09.18
Определение компьютеров в сети


1-58711
Vitalygavrilov
2003-09-08 09:40
2003.09.18
Ввести по клику новые данные в Combobox


3-58593
fool
2003-08-26 17:00
2003.09.18
LookUp поле в ADODataSet


14-58902
MBo
2003-08-29 08:42
2003.09.18
Intel Processor Code Table


3-58515
AV
2003-08-28 10:59
2003.09.18
Соединение с ORACLE через TSQLConnection