Hilfe zu Datenverwaltung!!

[Kroko1999]

ich hoffe mal, dass die Leerzeile die Daten trennt

Delphi-Quellcode:

var
  F: TextFile;
  S: String;
  B: Boolean;
begin
  AssignFile(F,...);
  Reset(F);
  B := TrueM
  while not EOF do
  begin
    ReadLn (F,S);
    if S='' then
      begin
        B := True;
        //Neues Feld 
      end
    else
      begin
        if B then
          begin
            Job := S;
            B := False;
          end
        else AddBeschreibung (S);    
      end;
  end;
  CloseFile
end;

ungetestet