mmm !!! Vaciar un StringGrid ?

[!3d1@n]

Holasss:
Si alguién me pudiera decir como podría limpiar todas las celdas de un StringGrid.
Es que tengo una aplicación donde lleno por programación todas las celdas. El StringGrid no tiene un # fijo de Columna ni de Filas ya que se los paso por programación según las necesidades en ese momento.

Agradeceré cualquier opinión al respecto.

[marcoszorrilla]

Si entiendo bien lo que quieres te podría servir esto:

Código Delphi [-]
 procedure TForm1.Button2Click(Sender: TObject);
 var
   I, J, K : Integer;
 begin
   K := 0;
   with StringGrid1 do
     for I := 0 to ColCount - 1 do
       for J:= 0 to RowCount - 1 do
         begin
           K := K + 1;
           Cells[I,J] := '';
         end;
 end;

Un Saludo

[!3d1@n]

Gracias Marco. Eso era justamente lo que queria, de veras que se lo agradezco. Pero una pregunta ¿ Para que esa K ? ¿ En que se utiliza ? ¿ Acaso cuanta las veces que has limpiado ?

[marcoszorrilla]

En este caso sobra, lo tome de un ejemplo en que si se utilizaba para rellenar con números:

Código Delphi [-]
Cells[I,J] := IntToStr(k);

Un Saludo.

[Neftali [Germán.Estévez]]

Empezado por marcoszorrilla

Si entiendo bien lo que quieres te podría servir esto:
[/delphi]

O puesto que las Rows son TStrings, también puede utilizar ésta más corta:

Código Delphi [-]
 procedure TForm1.Button2Click(Sender: TObject);
 var
  I: Integer;
 begin
   for I := 0 to StringGrid1.RowCount - 1 do begin
     StringGrid1.Rows[i].Clear;
   end;
 end;