Главная страница
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.028 c
3-1191222001
абв
2007-10-01 11:00
2008.02.10
TIBQUERY


15-1199988032
Вера
2008-01-10 21:00
2008.02.10
база данных Аптека


9-1167301773
maximum
2006-12-28 13:29
2008.02.10
Меню для игры


15-1199714934
Parus
2008-01-07 17:08
2008.02.10
PHP: register_shutdown_function для рекламы


15-1200229049
cr@nk
2008-01-13 15:57
2008.02.10
DelForEx для Delphi 2007