[ecfisa]

Hola jaxx, bienvenido a los foros de Club Delphi

Como a todos los que ingresan te invitamos a leer nuestra guía de estilo.

En referencia a tu consulta, intentalo de este modo:

Código Delphi [-]
...
var
  TS: TStringList;
  i : Integer;
begin
  TS := TStringList.Create;
  try
    TS.LoadFromFile('un_archivo.txt');
    StringGrid1.RowCount:= StringGrid1.FixedRows + TS.Count;
    for i := 0 to TS.Count-1 do
    begin
      StringGrid1.Rows[StringGrid1.FixedRows + i].StrictDelimiter := True;
      StringGrid1.Rows[StringGrid1.FixedRows + i].Delimiter := ';';
      StringGrid1.Rows[StringGrid1.FixedRows + i].DelimitedText := TS[i];
    end;
  finally
    TS.Free;
  end;
end;

Saludos