[[maeyanes]]

Te recomendaría que uses un TStrinList para cargar el archivo que deseas procesar:

Código Delphi [-]
var
  MyFileStr: TStringList;
  I: Integer;
  Line: String;

begin
  MyFileStr := TStringList.Create;
  try
    MyFileStr.LoadFromFile('Ruta del archivo\archivo.txt');
    for I := 0 to Pred(MyFileStr.Count) do
    begin
      Line := MyFileStr[i];
      // procesar Line    
    end
  finally
    MyFileStr.Free
  end
end;

Ahora, no entendí del todo que es estructura, ¿es algún arreglo de registros?

Saludos...