Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2003.09.18;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.015 c
1-58689
Dysan
2003-09-04 15:08
2003.09.18
subsrtring ???


1-58642
Marmel
2003-09-05 11:53
2003.09.18
Перехватить информацию из ячейки Exel.


1-58668
HELP_HELP_HELP
2003-09-05 06:09
2003.09.18
Help!!!


14-58852
хм
2003-08-31 01:18
2003.09.18
Что такое сабж?


1-58677
Dmitriy M. Volkov
2003-09-01 22:30
2003.09.18
скрытая форма





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский