Zitat von
Kacze:
ALso ich bekomme Daten von einem AD-Wandler (dieser bekommt die von einem Tachogenerator), der diese an Die Parallele Schnittstelle sendet. Die Daten sollen dann von den Bit-Codes wieder in eine Spannung zurück gerechnet werden und in einem Datenfeld grafisch dargestellt werden.
Zur Menge der Daten: Diese sollen nicht dauerhaft gespeichert werden, sonder nur so lange wie das Programm läuft.. is für demontrtionszwecke einer Motorregelstrecke.
Schau Dir mal C:\Programme\Borland\Delphi7\Demos\TeeChart an (Falls Du D7 verwendest, sonst anderer Pfad)
Die Charts werden in dem Beispiel mit Zufallszahlen gefüttert, aber man kann ja auch Messwerte nehmen.
TeeChart Komponente ist ja bei Delphi dabei. (Ab Pro glaube ich)
Ein kleines für Dich erstelltes Beispielprogramm liegt im Anhang:
Das ganze ist auch mit ein, zwei Mausklicks auf 3D und z.B. Flächen umgestellt.
Hier ist der Kern des Quellcodes:
Delphi-Quellcode:
function TForm1.ermittleMesswert: Extended;
begin
Result := Chart1.Series[0].YValues.Last + random(10)-4;
end;
procedure TForm1.Timer1Timer(Sender: TObject);
begin
// "Messwert" hinzufügen ;-)
Chart1.Series[0].AddXY(Chart1.Series[0].XValues.Count, ermittleMesswert);
// Anzeige verschieben (letzen 20 Werte)
// Chart1.Series[0].XValues.Count = Anzahl der Werte
Chart1.TopAxis.SetMinMax(Chart1.Series[0].XValues.Count - AnzSichtbWerte, Chart1.Series[0].XValues.Count - 1);
Chart1.BottomAxis.SetMinMax(Chart1.Series[0].XValues.Count - AnzSichtbWerte, Chart1.Series[0].XValues.Count - 1);
end;