RE:Cargar archivo a StringGrid
Hay varias formas de hacerlo. Una sería cargando el archivo en un StringList y luego asignando las filas del StringGrid con la propiedad CommaText, así:
procedure TForm1.FormCreate(Sender: TObject);
var
i : integer;
begin
with TStringList.Create do
try
LoadFromFile('Table1.txt');
StringGrid1.RowCount := Count + 1;
for i := 1 to Count do
StringGrid1.Rows[i].CommaText := IntToStr(i) + ',' + Strings[i-1];
finally
Free;
end;
end;
En el ejemplo asumí que hay una fila de encabezado, y que la primer columna se numera correlativamente, pero puedes variar el código como gustes.
Otra alternativa sería abrir el archivo de texto como si fuera una tabla de una base de datos con un componente Table, y entonces directamente podrás usar un DbGrid en vez de un StringGrid.
Siguiendo este enlace encontrarás el Boletín Pascal #27, donde publiqué el truco "Abriendo archivos de datos separados por comas" que explica como hacer eso:
http://www.latiumsoftware.com/es/pascal/0027.php
En el ejemplo que se adjunta al boletín, en el archivo Table1.sch sustituye la coma en el elemento SEPARATOR por una tabulación, y en el archivo Table1.txt sustituye todas las comas por tabulaciones, y voilà!
Espero que te sea de utilidad.
Ernesto D'Spirito
http://www.latiumsoftware.com/es/index.php