Das Problem ist aber, dass ich die Variable logfile benutze, die in unit1 deklariert wird, wegen der unit Project1_Typen meckert er gar nich. Ich stells mal rein:
Code: 
unit Project1_Proceduren;

interface

uses
Project1_Typen; //wenn ich hier unit1 angebe meckert er


implementation

procedure positionieren(datensatz:integer);
var aktdatensatz: TPerson;
begin
 if (datensatz<0) or (datensatz>=filesize(logfile)) then exit;
 else bgein
      seek(logfile, datensatz);
      read(logfile,aktdatensatz);
      txtvorname.text:=aktdatensatz.vorname;
      txtnachname.text:=aktdatensatz.nachname;

 end;


end.
Wenn ich unit1 bei uses hinschreib, dann kommt "überkreuzter Bezug zweier Units auf unit1"