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

Вниз

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

 
злобная танька   (2005-05-21 12:50) [0]

А как нарисовать линию на ScrollBox"е? У нево же канваса нету...
помогите пожалста!


 
злобная танька   (2005-05-21 12:58) [1]

пишу

 GetDC(sbMap.Handle);
 LineTo(DC, 1000, 500);
 ReleaseDC(sbMap.Handle, DC);


и нифига!


 
Marser ©   (2005-05-21 13:19) [2]

Используй TcontrolCanvas. Например так:
 with TControlCanvas.Create do
    try
      Control:=ScrollBox1;
      LineTo(60,30);
    finally
      free
    end;


 
злобная танька   (2005-05-21 13:22) [3]

зашибись!
спасибо огромное..

а как цвет линии задать?


 
Marser ©   (2005-05-21 13:22) [4]


>пишу
>
> GetDC(sbMap.Handle);
> LineTo(DC, 1000, 500);
> ReleaseDC(sbMap.Handle, DC);
>
> и нифига!

Естественно. Потому что неправильно. Вот исправленный вариант:
var dc:HDC;
begin
dc:=GetDC(sbMap.Handle);
LineTo(DC, 100, 50);
ReleaseDC(sbMap.Handle, DC);


 
Marser ©   (2005-05-21 13:24) [5]


> а как цвет линии задать?

Также как и в обычной канве.
pen.color:=clRed


 
злобная танька   (2005-05-21 13:25) [6]

боже мой, какая я глупая..
ещё раз спасибо за пример с канвасом. очень прекольно!


 
TUser ©   (2005-05-21 14:28) [7]

Можно еще Canvas.DC:= ...


 
Kerk ©   (2005-05-21 14:39) [8]

злобная танька   (21.05.05 13:25) [6]

какая-то незлобная танька :)))))


 
petya-kurochkin ©   (2005-05-21 15:36) [9]

Кстати метод пореальнее - это на Десктопе рисовать, разумееться, с просчётом масштаба.


 
petya-kurochkin ©   (2005-05-21 15:36) [10]

Кстати метод пореальнее - это на Десктопе рисовать, разумееться, с просчётом масштаба.


 
Marser ©   (2005-05-21 15:43) [11]


>petya-kurochkin ©   (21.05.05 15:36) [9][Ответить]
> Кстати метод пореальнее - это на Десктопе рисовать,
> разумееться, с просчётом масштаба.

А ещё можно фломастером по экрану.


 
petya-kurochkin ©   (2005-05-21 17:45) [12]

Почему такая агрессия?
Я же просто сказал, блин вообще уже...



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

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

Наверх




Память: 0.49 MB
Время: 0.026 c
8-1109018204
Eraser
2005-02-21 23:36
2005.06.06
16 или 15 битный Bitmap и обращение к компонентам RGB


1-1116514312
Cat
2005-05-19 18:51
2005.06.06
число сделать наибольшим числом кратным 10.


1-1116560429
A
2005-05-20 07:40
2005.06.06
.lib + Delphi


3-1115108938
Pozhid-Ig
2005-05-03 12:28
2005.06.06
Работа с пустой таблице через ADO...


1-1116651354
chelovek
2005-05-21 08:55
2005.06.06
Массив и строки.