Servus Leute,
hänge an einem wahrscheinlich kleinen Problem in meinem Delphi- Programm fest.
Lese aus einem StringGrid Messwerte in ein TChart aus was auch klappt.
Diese stehen in der 2. Spalte.
Dazu benötige Ich jetzt die Bezeichnungen in der Bottom- Achse die Ich aus der
1. Spalte des StringGrids auslese.
Beides von den letzten 10 Zeilen des StringGrids
So sieht mein Quelltext zum Lesen der 2. Spalte aus:
So ähnlich müsste ja der Befehl auch aussehen. Hab schon ein paar Dinge versucht, doch Ich bin gescheitert! Komm´ einfach net darauf!
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
| procedure TForm6.FormShow(Sender: TObject);
var
i:integer;
begin
DecimalSeparator := ',';
for i:=(Form1.StringGrid1.Rowcount-1)-10 to (Form1.StringGrid1.Rowcount-1) do begin
series1.addxy(i,Strtofloat(Form1.StringGrid1.cells[2,i]));
Chart1.LeftAxis.SetMinMax( 0, 200 );
end;
end; |
Moderiert von 
raziel: Code- durch Delphi-Tags ersetzt
