| Николай |
| Отправлено: 02.09.2004, 14:59 |
|
Дежурный стрелочник
Группа: Участник
Сообщений: 55
|
Может, кто нибуть подскажет,
как построить график в DBChart
|
|
| Sl@Sh |
| Отправлено: 04.09.2004, 20:25 |
|
Мастер участка
Группа: Участник
Сообщений: 383
|
Могу привести простой пример на Делфи :
Положи на форму DBChart,Memo и две кнопки (мемо для ввода чисел, а кнопки — Очистить и Построить). Для кнопри построить :
procedure TForm1.Button1Click(Sender:TObject);
var n : integer;
begin
for n:=0 to Memo1.Lines.Count-1 do
DBChart1.Series[0].Add(StrToFloat(Memo1.Lines[n]),IntToStr(n),clRed);
end;
Для кнопки Очистить :
procedure TForm1.Button2Click(Sender:TObject);
begin
DBChart1.Title.Text.Clear;
DBChart1.Series[0].Clear;
end;
Вот и всё! Удачи!!!
|
|
| Николай |
| Отправлено: 08.09.2004, 13:20 |
|
Дежурный стрелочник
Группа: Участник
Сообщений: 55
|
DBChart1->BottomAxis->DateTimeFormat="dd.MM.yy hh:mm";
DBChart1->BottomAxis->LabelsAngle=90;
Series1->DataSource=Table1;
Series1->XValues->DateTime=true;
Series1->XLabelsSource="DateTime";
Series1->YValues->DateTime=false;
Series1->YValues->Order=loNone;
Series1->YValues->ValueSource="Value1";
|
|
