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:

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:
Cells[I,J] := IntToStr(k);


Un Saludo.

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

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:


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