Validar celdas de un stringgrid

[Elite237]

Hola de nuevo, mi duda es la siguiente, como hacer que el usuario pueda escribir solo en una celda.Lo que quiero es validar la entrada del usuario, y que solo sean numeros, me imagino que debe ser en el evento OnKeyPress del StringGrid. Quiero validar en la columna 8(osea en la 7 ya que cuenta desde 0)que en las celdas de esa columna solo se pueda escribir, en las demas no.Gracias

[*Caro*]

Hola Elite 237, tendrías que preguntar por la columna, validar y si es otra no dejar escribir.

Código Delphi [-]
procedure TForm1.StringGrid1KeyPress(Sender: TObject; var Key: Char);
begin
 if StringGrid1.Col=7 then
  begin
   if not( key in ['0'..'9',#8]) then
     key := #0;
  end
 else
  key := #0;
end;

Saluditos

[Elite237]

Gracias caro, quedo resuelto mi duda, muchas gracias por tu tiempo.Tenia rato que no contestabas algunas de mis dudas,ya te extrañaba

[*Caro*]

Empezado por Elite237

Tenia rato que no contestabas algunas de mis dudas,ya te extrañaba.

Lo que pasa es que ultimamente no tengo mucho tiempo, por lo que, si la pregunta no me va ha tomar mucho tiempo contesto sino lo dejo pasar, por eso no pude revisar tu codigo que pusiste en otro hilo que no me acuerdo.

Saluditos

[Elite237]

Hola de nuevo caro, una duda, ¿como puedo borrar y/o actulizar una fila completa de un stringgrid desde un boton que tengo en mi formulario?Espero haberme dado a entender.Saluditos

[[Delphius]]

Hola Elite237,
Para borrar se puede emplar el método Clear ya sea de la propiedad Cols o Rows, según se necesite. Por ejemplo:

Código Delphi [-]
StringGrid1.Cols[1].Clear;

Borrará el contenido de la columna 1.

Y para actualizar, no queda otra que recorrer fila a fila, o columna a columna y sustituir el contenido. Por ejemplo algo como esto:

Código Delphi [-]
for i := 1 to stringgrid1.RowCount - 1 do
    StringGrid1.Cells[1,i] := IntToStr(i);

Recuerda que Cols y Rows no corresponden a la normal representación e idea de lo que se entiende por una tabla.
Lo que es Cols en StringGrid equivale a las filas, y a la inversa Rows a las columnas. La verdad es que no se porqué programaron de ese modo al TStringGrid.

Saludos,