StringGrid leeren

[Udo]

Zitat:

FOR-Schleifenvariable muss eine lokale Variable sein

Was ist denn daran unverständlich?

Falsch:

Delphi-Quellcode:

var
  Werte: TWerte;
  ireset: integer;

implementation
{$R *.dfm}

procedure TWerte.Button1Click(Sender: TObject);
begin
  for ireset := 0 to Werte.StringGrid1.RowCount do
    begin
      Werte.StringGrid1.Rows[ireset].Clear;
    end;
end;

Richtig:

Delphi-Quellcode:

var
  Werte: TWerte;  

implementation
{$R *.dfm}

procedure TWerte.Button1Click(Sender: TObject);
var ireset: integer;  //!!!!!!!!!!!!!!!!!
begin
  for ireset := 0 to Werte.StringGrid1.RowCount do
    begin
      Werte.StringGrid1.Rows[ireset].Clear;
    end;
end;