No pensé que fuera tan simple.
ANtes había intentado algo así pero teniendo en cuenta las columnas y me pardía.
Lo que escribiste funciona bien pero el problema es que no se cuantas FILAS tengo en el archivo.(y la STringGrid la inicio vacía)
Entonces agregé un TSTRINGLIST que cargo con el archivo CSV, cuento las filas que tiene y la guardo en una variable.
Para luego incrementar la STRINGGRID al numero de filas que tiene el archivo.
Aquí está el codigo que permite cargar un CSV a un grid sin saber cuantas lineas tenemos en el archivo
Código Delphi
[-]
var
i, filas: integer;
Fichero : TStrings;
begin
abrirfile.Execute;
Fichero := TStringList.Create;
Fichero.LoadFromFile(abrirfile.FileName); filas:= Fichero.Count;
Fichero.Free;
with TStringList.Create do
try
LoadFromFile(abrirfile.FileName);
STgrid.RowCount := filas;
for i:= 0 to Count-1 do
STgrid.Rows[i].CommaText := Strings[i];
finally
Free;
end;