Aus stringgrid die daten nutzen

[busybyte]

Doch hat er aber erst nachdem er die if abfrage stellt,dann geht's latürnich nicht

Delphi-Quellcode:

var index:integer;

procedure TForm1.Button3Click(Sender: TObject);
var i,b:integer; g:string; //var index:integer; //hier wird index wieder 0 bzw. nicht 0 sondern undefiniert
begin
Timer6.Interval := 1000 * strtoint(edzeit.text);
Timer6.Enabled:=True;

g:= stringgrid1.Cells[1,Index];

if g ='Geradeaus'
then
begin
cbStrobe.checked:=false;
cbData1.checked:=false;
cbData3.checked:=true;
cbData5.checked:=true;
cbData7.checked:=true;
end; 
Inc(Index);
If Index > stringgrid1.Row
then Index := 0;

lol 3mal editiert