Abstrakter Fehler oO

[Martin K]

Ihr meint wohl sowas:

Delphi-Quellcode:

function GetId(const f: string; const i: integer): string; 
var temp: String; sl: TStrings; 
begin 
  temp := ''; 
  try
    sl := TStringList.Create; 
    try 
      sl.LoadFromFile(f); 
      temp := Copy(sl[0], i*6, 5); 
    finally 
      FreeAndNil(sl); 
    end; 
  finally
    result := temp;
  end;
end;