Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

нарисовать линию на скролбоксе [D7]


злобная танька ©   (2005-05-21 12:50:00) 

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


petya-kurochkin   (2005-05-21 17:45:00) [1]

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


Marser   (2005-05-21 15:43:00) [2]


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

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


petya-kurochkin   (2005-05-21 15:36:00) [3]

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


petya-kurochkin   (2005-05-21 15:36:00) [4]

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


Kerk   (2005-05-21 14:39:00) [5]

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

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


TUser   (2005-05-21 14:28:00) [6]

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


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

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


Marser   (2005-05-21 13:24:00) [8]


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

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


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

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

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


Marser   (2005-05-21 13:22:00) [10]


>пишу
>
> 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:19:00) [11]

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


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

пишу

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


и нифига!


Наверх

Титульная страница Поиск, карта сайта Написать письмо