Вниз
Скачать: CL | DM;

TScrollBox   Найти похожие ветки 

← →
fog   (2006-08-06 00:27) [0]

Приспособил TImage для рисования графиков. Но есть одна проблема - как заставить TScrollBox "скролить" график, вызывая мой метод TImage.Paint?


← →
GeLLeR ©   (2006-08-06 00:32) [1]

В процедуре ScrollChange вызывать процедуру TImage.Paint ?

Может я вопрос нетак понял?????


← →
KilkennyCat ©   (2006-08-06 01:37) [2]

А разве скроллбокс не автоматом осуществяет прорисовку компонет непоместившихся? Ну или вариант [1].

Но ваще-то, не могу представить себе ни одного логического обоснования такого метода скроллинга непоместившегося изображения, а также использования TImage для рисования.
Есть ощущение, что автор работает методом "тыка".


← →
fog   (2006-08-06 04:22) [3]

>GeLLeR
> В процедуре ScrollChange вызывать процедуру TImage.Paint ?

В ScrollBox"e и ниже нет ничего подобного.

>KilkennyCat
> А разве скроллбокс не автоматом осуществяет прорисовку компонет непоместившихся?

Осуществляет, но у меня вместо скроллинга одно мерцание и рисует одно и тоже. И для экономии времени TImage.Paint рисует только в видимую область, следовательно надо знать ScrollBar.ScrollPos.

>KilkennyCat
>Но ваще-то, не могу представить себе ни одного логического обоснования такого метода скроллинга непоместившегося изображения, а также использования TImage для рисования.
Есть ощущение, что автор работает методом "тыка".

Не "тыка", а по-быстрому. Лет 5 назад, реализовал примерно такую же задачу через TWinControl. Но он "ушел" вместе в "винтом" - RIP.

Вопрос же задал потому, что нашел это:
http://delphiworld.narod.ru/base/tscrollbox_scroll_event.html

Нельзя ли как-нибудь попроще?


← →
KilkennyCat ©   (2006-08-06 10:36) [4]

Ужос.

Берем TBitMap. Рисуем все на нем. Берем два скроллбара и кидаем их по сторонам TPaintBox. В событиях изменения позиции скроллбаров пишем переход на отрисовку. В отрисовке пишем что-нить вроде BitBlt с TBitmap на TPaintBox, с координатами x и y  привязанными к позиции скроллбара...



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.029 c
15-1154461397
AntiUser
2006-08-01 23:43
2006.08.27
В Израиле обнаружен изолированный "Затерянный Мир"


2-1155121098
ArtemESC
2006-08-09 14:58
2006.08.27
динамические массивы...


15-1154090866
Der Nechk@ssoff
2006-07-28 16:47
2006.08.27
С праздником!


2-1154607978
DProject
2006-08-03 16:26
2006.08.27
Открыть два проекта одновременно


6-1144091609
Velimir
2006-04-03 23:13
2006.08.27
Чат в локальной сети с динамическим IP (tcp)




   Наверх