[[Delphius]]

Hola blackpic,
No se si te he comprendido bien. ¿Deseas que el texto leído de un archivo se copie en un TStringGrid, cada letra en una columna distinta?

Si es eso, entonces bastaría con realizar un algoritmo como este, por ejemplo:

1. Establecer la cantidad de columnas adecuadas al tamaño del texto
2. Recorrer el texto y copiar el caracter i_ésimo en la columna i_ésima

Un ejemplo de esto es como sigue:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var i, cant: integer;

begin
  cant := Length(edit1.Text); // la longitud de texto

  StringGrid1.ColCount := cant + 1; // suponemos que la primera columna es "fija"
  for i := 1 to cant do
    StringGrid1.Cells[i,1] := Edit1.Text[i]; // copiamos caracter
end;

Saludos,