Помогите нарисовать линию на канве

← →
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 :))))

И Image1.Canvas до кучи.

> Image1.Canvas

%)

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