stringgrid sperren wenn dieses leer

[mr.floppy81]

Moin,

habe ein Stringgrid, welches über einen Button1 mit Daten aus einer SQL Datenbank gefüllt wird.
Ein weiterer Button2 soll, !!!wenn Daten im Stringgrid stehen!!!, eine bestimmte Spalte verändern.
Dazu gibt es ein edit-Feld in welchem man einen Faktor einträgt. Drückt man Knopf 2 so wird der Faktor aus dem edit-Feld in SPalte 3 eingetragen.

Zwischen den !!!-Zeichen liegt das Problem. Wie kann ich es erreichen wenn das Stringgrid leer ist, dass in diesem keine Eingabe erfolgt???
Ich habe mir überlegt:

Delphi-Quellcode:

if stringgrid.Cell[2.1]='' then do ???nichts???
else
while not (i=stringgrid.rowcount)do 
begin
inc (i);
stringgrid.cell[2,i]:=edit.text;
end;

Wie könnte man das ???nichts??? realisieren?

LG Andreas

[Thanatos81]

Zitat:

Zitat von mr.floppy81

Moin,

habe ein Stringgrid, welches über einen Button1 mit Daten aus einer SQL Datenbank gefüllt wird.
Ein weiterer Button2 soll, !!!wenn Daten im Stringgrid stehen!!!, eine bestimmte Spalte verändern.
Dazu gibt es ein edit-Feld in welchem man einen Faktor einträgt. Drückt man Knopf 2 so wird der Faktor aus dem edit-Feld in SPalte 3 eingetragen.

Zwischen den !!!-Zeichen liegt das Problem. Wie kann ich es erreichen wenn das Stringgrid leer ist, dass in diesem keine Eingabe erfolgt???
Ich habe mir überlegt:

Delphi-Quellcode:

if stringgrid.Cell[2.1]='' then do ???nichts???
else
while not (i=stringgrid.rowcount)do 
begin
inc (i);
stringgrid.cell[2,i]:=edit.text;
end;

Wie könnte man das ???nichts??? realisieren?

LG Andreas

Die unschöne Methode wäre wohl:

Delphi-Quellcode:

if stringgrid.Cell[2.1]='' then 
  begin 
  end
else while not (i=stringgrid.rowcount)do 
  begin
    inc (i);
    stringgrid.cell[2,i]:=edit.text;
  end;

Aber wie wärs mit:

Delphi-Quellcode:

if not(stringgrid.Cell[2.1]='') 
  then while not (i=stringgrid.rowcount)do 
  begin
    inc (i);
    stringgrid.cell[2,i]:=edit.text;
  end;