langsames Tchart

[PhilmacFLy]

Hey DP'ler

ich hab folgendes Problem:
Ich lese au einer Firebird Datenbank, Datensätze aus und schreibe diese dann auf eine TChart.
Nun dauert aber das zeichnen des Graphen sehr lange (es sind 12000 Datensätze mit je 2 Werten).
Liegt das an der TChart allgemein oder an meinem Coder? Hier der Code:

Delphi-Quellcode:

public
  arrml, arrmr: Array of Integer;

...

procedure TFRM_Messung.anzeigen;
var
zt: Integer;
begin
zt := 0;
while zt <= mx+1 do
begin
frm_messung.Ch_Messung.Series[0].AddY(arrml[zt]);
frm_messung.Ch_Messung.Series[1].AddY(arrmr[zt]);
zt := zt +1;
end;
end;

Das befüllen der beiden Arrays mach ich in einem Thread in dem ich auch die Datensätze auslese.