olor)
дозволяє додати в діаграму нову точку. Параметр AValue відповідає Додає значенням, параметр ALabel - назва, яка буде відображатися на діаграмі і в легенді, AColor - колір. Параметр ALabel - не обов'язковий, його можна задати порожнім:''.
Метод AddXY : (Const AXValue, AYValue: Double; ALabel: String; AColor: TColor)
дозволяє додати нову крапку в графік функції. Параметри AXValue і AYValue відповідають аргументу і функції. Параметри ALabel і AColor ті ж, що і в методі Add .
Таким чином, процедура, що забезпечує завантаження даних у нашому прикладі, може мати вигляд:
= 155; = 251; = 203; = 404;
var : word;
begin Series1 do
begin ; (A1, 'Цех 1', clYellow); (A2, 'Цех 2', clBlue); (A3, 'Цех 3', clRed); (A4, 'Цех 4', clPurple);
end ;. Clear;. Clear;
for i: = 0 to 100 do
begin . AddXY (0.02 * Pi * i, sin (0.02 * Pi * i),'', clRed);. AddXY (0.02 * Pi * i, cos (0.02 * Pi * i),'', clBlue);
end ;
end ;
Цю процедуру можна включити в обробку клацання небудь кнопки, в команду меню або просто в подію OnCreate форми. Оператори Clear потрібні, якщо в процесі роботи програми ви збираєтеся оновлювати дані. Без цих операторів повторне виконання методів Add і AddXY < span align = "justify"> тільки додасть нові точки, що не видаливши колишні.
Якщо ви передбачили, наприклад, для даних, що відображаються у діаграмі, дві серії Series1 і Series4 різних видів - Pie і < b align = "justify"> Bar , то можете ввести процедуру, изменяющую на вимогу користувача тип діаграми. Цю процедуру можна ввести в подія OnClick небудь кнопки, в команду меню або, наприклад, просто в обробку клацання на компоненті < b align = "justify"> Chart . Для того, щоб завантажити дані в Series4 і зробити цю діаграму в перший момент невидимою, можна вставити в кінці наведеної раніше процедури оператори
. Assign (Series1);. Active: = false;
Перший з цих операторів переписує дані, поміщені в Series1 , в серію Series4 . А другий оператор робить невидимою серію Series4 . Зміна типу діаграми здійснює процедура
. Active: = not Series1. Active;. Active: = not Series4. Active;
На рис.4.8 б ви можете бачити результат перемикання користувача на інший вид діаграми.
