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

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

легенда Chart [D6, WinXP]

dm37 ©   (2006-08-17 11:48:00) 

Подскажите, можно что-то сделать
при построении графика (FastLine) в легенде отображается линия толщиной и цветом как series, а мне надо вместо линии в легенде отобразить, скажем, квадрат (плохо видно цвет линии в легенде)

---

dm37   (2006-08-18 09:17:00) [1]

Спасибо, все работает

---

MBo   (2006-08-17 14:19:00) [2]

А такое событие у тебя есть?

procedure TForm5.Chart1GetLegendPos(Sender: TCustomChart; Index: Integer; var X,
 Y, XColor: Integer);
var
 R: TRect;
 Col: TColor;
begin
 R := Rect(X - 14, Y + 2, X - 4, Y + 12);
 Col := Sender.Canvas.Brush.Color;
 Sender.Canvas.Brush.Color := Sender.Series[Index].Color;
 Sender.Canvas.FillRect(R);
 Sender.Canvas.Brush.Color := Col;
end;


---

dm37   (2006-08-17 13:42:00) [3]

да, я ее и не нашел,
спасибо

---

MBo   (2006-08-17 13:41:00) [4]

Это в редакторе чарта
TeeChart Pro 7, в штатном TChart из поставки Дельфи такой регулировки может и не быть.

---

dm37   (2006-08-17 13:03:00) [5]

можно по подробнее
так Legend.Symbols.Border?
у вас какая Delphi?

---

MBo   (2006-08-17 12:37:00) [6]

Legend-Symbols-Border

---

Наверх