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

Вниз

FrameRect с толщиной линии в 10 пикселов   Найти похожие ветки 

 
>|<   (2012-04-19 13:51) [0]

Здравствуйте!

Не работает такой код:
Bitmap.Canvas.Brush.Color := clRed;
Bitmap.Canvas.Pen.Color := clRed;
Bitmap.Canvas.Pen.Style := psSolid;
Bitmap.Canvas.Pen.Width := 10;
Bitmap.Canvas.FrameRect(ARect);

Рисует линией единичной толщины.
Delphi 7, Win 7

В чем может быть причина?
Заранее благодарен.


 
sniknik ©   (2012-04-19 14:00) [1]

> В чем может быть причина?
не читал справку
Description
Use FrameRect to draw a 1 pixel wide border around a rectangular region. FrameRect does not fill the interior of the rectangle with the Brush pattern.


 
brother ©   (2012-04-19 14:00) [2]

http://helpw.ru/GraphDelphi.php
имхо, он так и должен...рисуй вручную линиями...


 
RWolf ©   (2012-04-19 14:07) [3]

Rectangle, как вариант.


 
Омлет ©   (2012-04-19 15:48) [4]


> Rectangle, как вариант.

Пунктиры и прочий не solid стиль - только толщиной 1px.


 
MBo ©   (2012-04-19 15:53) [5]

>Омлет ©   (19.04.12 15:48) [4]

ExtCreatePen позволяет создавать и толстые прерывистые


 
Омлет ©   (2012-04-19 16:12) [6]

хм, действительно.



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

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

Наверх




Память: 0.47 MB
Время: 0.049 c
15-1340390614
Error Macro
2012-06-22 22:43
2013.03.22
waveOutWrite. Как вывести 2 звука одновременно?


15-1342072358
AV
2012-07-12 09:52
2013.03.22
Эффективность подразделения в компании


15-1332688326
Дмитрий С
2012-03-25 19:12
2013.03.22
Физически 32х битная система может иметь доступ к


15-1335417549
Palladin
2012-04-26 09:19
2013.03.22
EurekaLog и юнит ExceptionLog


2-1342077313
AAsdr
2012-07-12 11:15
2013.03.22
MOuseMove и ширина понели на StatusBar