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

Вниз

Помогите нарисовать линию на канве   Найти похожие ветки 

 
Lip   (2008-01-07 21:36) [0]

пишу так:
 Form1.Canvas.Brush.Style := Dot;
 Form1.Canvas.Brush.Color := clRed;
 Form1.Canvas.MoveTo(120, 60);
 Form1.Canvas.LineTo(120, 320);

во-первых, Dot - такого нет - компилятор говорит. А в F1 есть, во-вторых, линия не красного цвета!
Подскажите, пожалуйста!
Заранее благодарен!


 
Dimaxx ©   (2008-01-07 21:42) [1]

Тогда уж Form1.Canvas.Brush.Style := bsDot;

Читаем справку по LineTo: "The line is drawn using Pen"...


 
Dimaxx ©   (2008-01-07 21:43) [2]

Тьфу, Тогда уж Form1.Canvas.Pen.Style := bsDot;


 
Kirill   (2008-01-07 22:27) [3]

Тогда уж psDot


 
Ins ©   (2008-01-07 22:27) [4]

И Pen.Color    :))))


 
homm ©   (2008-01-07 22:31) [5]

И Image1.Canvas до кучи.


 
Ins ©   (2008-01-07 22:32) [6]


> Image1.Canvas


%)



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

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

Наверх




Память: 0.47 MB
Время: 0.022 c
15-1198933079
Tirael
2007-12-29 15:57
2008.02.10
ктонить юзал БП со 120мм вентилятором?


15-1199641953
DVM
2008-01-06 20:52
2008.02.10
Потестите модуль для расчета CRC8/16/32/64


15-1199611199
sauron
2008-01-06 12:19
2008.02.10
Праздники!


15-1199969784
Вссм
2008-01-10 15:56
2008.02.10
virtual server 2005


1-1193828867
Stark
2007-10-31 14:07
2008.02.10
Delphi 2007: Глюки тулбара