Навигация
Главная
Поиск
Форум
FAQ's
Ссылки
Карта сайта
Чат программистов

Статьи
-Delphi
-C/C++
-Turbo Pascal
-Assembler
-Java/JS
-PHP
-Perl
-DHTML
-Prolog
-GPSS
-Сайтостроительство
-CMS: PHP Fusion
-Инвестирование

Файлы
-Для программистов
-Компонеты для Delphi
-Исходники на Delphi
-Исходники на C/C++
-Книги по Delphi
-Книги по С/С++
-Книги по JAVA/JS
-Книги по Basic/VB/.NET
-Книги по PHP/MySQL
-Книги по Assembler
-PHP Fusion MOD'ы
-by Kest
Professional Download System
Реклама
Услуги

Автоматическое добавление статей на сайты на Wordpress, Joomla, DLE
Заказать продвижение сайта
Программа для рисования блок-схем
Инженерный калькулятор онлайн
Таблица сложения онлайн
Популярные статьи
OpenGL и Delphi... 65535
Форум на вашем ... 65535
HACK F.A.Q 65535
Бип из системно... 65535
Гостевая книга ... 65535
Invision Power ... 65535
Пример работы с... 65535
Содержание сайт... 65535
Организация зап... 65535
Вызов хранимых ... 65535
Создание отчето... 65535
Программируемая... 65535
Эмулятор микроп... 65535
Подключение Mic... 65535
Создание потоко... 65535
Приложение «Про... 65535
Оператор выбора... 65535
Модуль Forms 65535
ТЕХНОЛОГИИ ДОСТ... 64777
Имитационное мо... 58952
Реклама
Сейчас на сайте
Гостей: 4
На сайте нет зарегистрированных пользователей

Пользователей: 13,101
новичок: Limbo67
Новости
Реклама
Выполняем курсовые и лабораторные по разным языкам программирования
Подробнее - курсовые и лабораторные на заказ
Delphi, Turbo Pascal, Assembler, C, C++, C#, Visual Basic, Java, GPSS, Prolog, 3D MAX, Компас 3D
Заказать программу для Windows Mobile, Symbian

Выбор наилучших альтернатив с использованием методов оптимизации на Delp...
Моделирование работы аэропорта на GPSS + Пояснительная записка
Лабораторная работа по динамическим спискам на Turbo Pascal (перемещение...

Реклама



Подписывайся на YouTube канал о программировании, что бы не пропустить новые видео!

ПОДПИСЫВАЙСЯ на канал о программировании
Легенда



Доступ к свойствам легенды диаграммы осуществляется посредством объек-
та Legend, являющегося свойством диаграммы Chart. Для открытия доступа
к объекту Legend необходимо присвоить свойству HasLegend объекта Chart
значение True, после чего легенда диаграммы отобразится в области диа-
граммы и будет доступна для изменений.
Легенда представляет собой прямоугольную область, для которой можно
изменить визуальные свойства заливки и линии границы. Оператор
Legend:=Chart.Legend;



возвращает в переменную Legend:variant ссылку на объект "легенда". После
этого можно непосредственно обращаться к этой легенде. Доступ к линии
границы легенды обеспечивает свойство Border, к заливке — свойство
Interior или Fill. Используя эти свойства, изменим внешний вид легенды.
Настройка заливки и линии границы легенды
const msoPatternHorizontalBrick=35;
var Legend:variant;
procedure TForm.WeightChange(Sender: TObject);
begin
Legend.Border.Weight:=Weight.Value;
end;
procedure TForm.PatternChange(Sender: TObject);
begin
Legend.Fill.Patterned!Pattern:=msoPatternHorizontalBrick);
end;
procedure TForm.ForeColor3Change(Sender: TObject);
begin
Legend.Fill.ForeColor.SchemeColor:=ForeColor3.Value;
end;
procedure TForm.BackColor3Change(Sender: TObject);
begin
Fill.BackColor.SchemeColor:=BackColor3.Value;
end;



Результат использования представленных процедур показан на рис. 14.11.

Рис. 14.11. Изменены заливка и линия границы легенды
Легенда включает в себя дополнительные объекты, объединенные в коллек-
цию LegendEntries. Это элементы легенды, их количество совпадает с коли-
чеством рядов диаграммы. У элемента легенды есть свойство Font для на-
стройки шрифта текста и единственный дополнительный объект — ключ
легенды. Ключ имеет свойства линии границы и заливки.
Доступ к элементам легенды осуществляется посредством коллекции
LegendEntries с помощью индекса элемента (целого числа из диапазона от 1
до LegendEntries.Count, где Count — количество элементов легенды).
Настроим свойства легенды, выполнив следующие процедуры.
Изменение свойств элемента легенды
procedure TForm1.FormShow(Sender: TObject);
var a_:integer;
begin
// Загружаем список элементов легенды в ListBox
ListBox1.Items .Clear;
for a_:=1 to Legend.LegendEntries.Count do begin
ListBoxl.Items.Add(inttostr(a_)) ;
end;
end;
procedure TForml.ButtonlClick(Sender: TObject);
begin
// Получаем ссылку на элемент легенды
1:=2;
LegendEntry:=Legend.LegendEntries.item[i];
// Получаем ссылку на ключ легенды
LegendKey:= LegendEntry.LegendKey;
// Изменяем толщину линии.
LegendKey.Border.Weight:=4;
// Изменяем цвет заливки
LegendKey.Interior.Color:=RGB{200, 50, 0) ;
// Получаем доступ к шрифту надписи и изменяем его.
LegendEntry.Font.Size:=16;
end;



Результат выполнения этих процедур представлен на рис. 14.12 и 14.13.

Примечание
При программировании объектов, изменяющих визуальные свойства ключа ле-
генды, необходимо учитывать тот факт, что это приводит к соответствующим
изменениям свойств рядов диаграммы.


Рис. 14.12. Изменена линия и заливка ключа легенды

Рис. 14.13. Изменен шрифт текста элемента легенды
Опубликовал Kest September 30 2009 18:47:09 · 0 Комментариев · 6814 Прочтений · Для печати

• Не нашли ответ на свой вопрос? Тогда задайте вопрос в комментариях или на форуме! •


Комментарии
Нет комментариев.
Добавить комментарий
Имя:



smiley smiley smiley smiley smiley smiley smiley smiley smiley
Запретить смайлики в комментариях

Введите проверочный код:* =
Рейтинги
Рейтинг доступен только для пользователей.

Пожалуйста, залогиньтесь или зарегистрируйтесь для голосования.

Нет данных для оценки.
Гость
Имя

Пароль



Вы не зарегистрированны?
Нажмите здесь для регистрации.

Забыли пароль?
Запросите новый здесь.
Поделиться ссылкой
Фолловь меня в Твиттере! • Смотрите канал о путешествияхКак приготовить мидии в тайланде?
Загрузки
Новые загрузки
iChat v.7.0 Final...
iComm v.6.1 - выв...
Visual Studio 200...
CodeGear RAD Stud...
Шаблон для новост...

Случайные загрузки
Delphi 6 программ...
Animation (Пример...
Задача о 8ми ладьях
Еext Editor
Ведение справочны...
Preview
Трассировка прово...
Delphix Sample [И...
Print Grid
Алгоритм трассиро...
Архив программ
CABfiles
Web Регистрация
PHP/MySQL для нач...
Панель "ссылки"
Доступа к БД Fire...
RbControls
Tag Игра "Пятнашк...
Пример работы с б...
3D Тетрис [Исходн...

Топ загрузок
Приложение Клие... 100502
Delphi 7 Enterp... 89138
Converter AMR<-... 20088
GPSS World Stud... 14224
Borland C++Buil... 12403
Borland Delphi ... 8809
Turbo Pascal fo... 7069
Калькулятор [Ис... 5030
Visual Studio 2... 5012
FreeSMS v1.3.1 3551
Случайные статьи
Идентификация типа...
Компонент изображение
Функция ImageSize ...
пользовательвынужд...
безопасности по-пр...
Модуль WBFuncs для...
Окно «Параметры Wo...
Игра в планирование
Задание на моделир...
Использование функ...
Бинарные деревья
Задание нетипизиро...
транспортном режим...
Выбор VPN для начи...
Другие операции
Создание базы данн...
Автоматизация ручн...
Система РВМ
Процедура Arc - че...
Работа с константа...
Помещение модулей ...
Процессы теплопров...
Жизненный цикл про...
Как "оживить" Perl...
Изучая сложные объ...
Статистика



Друзья сайта
Программы, игры


Полезно
В какую объединенную сеть входит классовая сеть? Суммирование маршрутов Занимают ли таблицы память маршрутизатора?