Edit: hoppla, der erste Parameter von Cells[I,J] ist die Spalte!
#1
For-Schleife geht so:
Delphi-Quellcode:
for I := Low to High do begin
//Code
end;
//oder so, je nach Styleguide
for I := Low to High do
begin
//Code
end;
In deinem Code wird z jedes Mal wieder überschrieben, ohne dass du damit irgendwas anstellst.
Delphi-Quellcode:
for i:=0 to 30 do
z:=random (31);
#2
Der Code sollte von Anfang an "richtig" eingerückt werden, weil man dann den Programmablauf schon anhand der Struktur des Quellcodes nachvollziehen kann. Außerdem sollten alle Bezeichner (also Variablennamen etc) aussagekräftig sein. Das ist wichtig, um Fehler zu vermeiden.
Dieser Code tut noch nicht, was du willst, aber vielleicht siehst du schon, warum dein Programm noch nicht funktioniert.
Delphi-Quellcode:
var
I, ColIndex: Byte;
begin
for I := 0 to 30 do begin
ColIndex:= Random(31);
end;
//I ist jetzt undefiniert (siehe Onlinehilfe) und ColIndexeine Zahl zwischen 0 und 30
if Stringgrid1.Cells[I, 0] = '' then begin
StringGrid1.Cells[ColIndex, 0] := 'A1';
StringGrid1.Cells[ColIndex, 0] := 'A2';
StringGrid1.Cells[ColIndex, 0] := 'A3';
StringGrid1.Cells[ColIndex, 0] := 'A4';
StringGrid1.Cells[ColIndex, 0] := 'B1';
StringGrid1.Cells[ColIndex, 0] := 'B2';
StringGrid1.Cells[ColIndex, 0] := 'B3';
StringGrid1.Cells[ColIndex, 0] := 'B4';
StringGrid1.Cells[ColIndex, 0] := 'C1';
StringGrid1.Cells[ColIndex, 0] := 'C2';
StringGrid1.Cells[ColIndex, 0] := 'C3';
StringGrid1.Cells[ColIndex, 0] := 'C4';
end;
end;
#3
Wer ist "er"?
Zitat:
Bitte sagt mir mal wie ich verhindere dass er die anderen werte überschreibt
Dani H.
At Least I Can Say I Tried