Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.06.06;
Скачать: [xml.tar.bz2];

Вниз

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

 
злобная танька   (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;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.01 c
1-1116595004
Walja
2005-05-20 17:16
2005.06.06
TStringGrid + InplaceEditor


8-1108810484
avlan
2005-02-19 13:54
2005.06.06
Инструмент "Спрей"


4-1113549534
старый маразматикЪ
2005-04-15 11:18
2005.06.06
Работаю с файлом при помощи ф-ций FileOpen FileRead FileWrite


14-1116505335
XCept.ion
2005-05-19 16:22
2005.06.06
получение данных о погоде


1-1116498890
MegaVolt
2005-05-19 14:34
2005.06.06
Перетаскивание с моей проги в чужое приложение.





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский