Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
||
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[44.192.16.60] |
|
Сообщ.
#1
,
|
|
|
Доброго дня!
Вопрос по работе с TChart. Как известно, можно выделить область на графике для ее увеличения. По умолчанию выделение производится прямоугольником белого цвета (у меня он белый во всяком случае). А можно ли изменить этот цвет, ибо на светло-сером (опять же стандартном) фоне белый прямоугольник плохо заметен? Использую Delphi5. Заранее спасибо |
Сообщ.
#2
,
|
|
|
Chart1.Zoom.Pen.Color := clRed; |
Сообщ.
#3
,
|
|
|
Такой вариант мне предлагали, но в Дельфи5 нет свойства Zoom. Как быть? Может можно поискать в другом месте или сделать самостоятельную его отрисовку (где)?
|
Сообщ.
#4
,
|
|
|
Цитата Phenix @ но в Дельфи5 нет свойства Zoom Может перейти хотя бы на Delphi 7? |
Сообщ.
#5
,
|
|
|
Цитата Может перейти хотя бы на Delphi 7? Я бы перешел, но у нас увы все работают на 5-м. Лицензионный потому как, однако. |
Сообщ.
#6
,
|
|
|
Цитата Phenix @ но в Дельфи5 нет свойства Zoom А через какое свойство вы увеличиваете область?? |
Сообщ.
#7
,
|
|
|
ZoomPercent
|
Сообщ.
#8
,
|
|
|
А у него нету
Pen.Color //или Color |
Сообщ.
#9
,
|
|
|
ZoomPercent - это не свойство, а метод, позволяющий увеличивать или уменьшать масштаб изображения программно.
|
Сообщ.
#10
,
|
|
|
Phenix, а какие у него параметры??
|
Сообщ.
#11
,
|
|
|
Параметр один, числовой - процент масштаба. Если >100, то изображение увеличивается, если меньше - уменьшается.
|
Сообщ.
#12
,
|
|
|
Поднимаю тему: она актуальна для C++ Builder 6, что с дельфи схож. Как решить проблему ТС???
|
Сообщ.
#13
,
|
|
|
сменить на teechart pro или отрисовывать самому.
|
Сообщ.
#14
,
|
|
|
Цитата kanes @ В дельфи7 нет свойства zoom. ------------ At least in TChart v.8.03 (the one shipped with Delphi 2009) there are properties TChart.Zoom.Brush and TChart.Zoom.Pen where you can set the colors and other properties for the selection rectangle. So, if you would have the newer version of TChart you might use something like this: -- procedure TForm1.FormCreate(Sender: TObject); begin Chart1.Zoom.Pen.Width := 2; Chart1.Zoom.Pen.Color := clRed; end; |