Forum: Sonstige Fragen zu Delphi
Delphi
by Klaus01,
20. Mär 2007
Vielleicht die Schleife nur bis
for z := 1 to Stringgrid1.rowcount - 1 do
begin
laufen lassen.
String Grids fangen bei Zeile 0 an, wobei bei Dir Zeile 0 die Überschrift ist.
das muß ich shmia recht geben
Forum: Sonstige Fragen zu Delphi
Delphi
by Klaus01,
20. Mär 2007
procedure TForm1.Button10Click(Sender: TObject);
var z,x,y,i:integer;
begin
x:=0;
y:=0;
for z := 1 to Stringgrid1.rowcount do
begin
for i := 1 to 9 do
begin
x := x + StrToInt (stringgrid1.Cells);
Forum: Sonstige Fragen zu Delphi
Delphi
by Klaus01,
20. Mär 2007
if (stringgrid1.Cells <> inttostr(0)) or (stringgrid1.cells<>'')
sollte es nicht so heißen:
if (stringgrid1.Cells <> inttostr(0)) and (stringgrid1.cells<>'')
Weil wenn StringGrid <> 0 ist, ist das Statement auch wahr wenn StringGrid1 leer ist und da
Du die beiden Statements mit oder verknüpft sind ist der Ausdruck wahr.
Grüße