Wie funktioniert BlockRead/Write?

[fiasko]

Hallo,

hier mal ein paar Änderungen am Code:

Delphi-Quellcode:

var EinleseString: Char; // wir lesen sowieso immer nu einzelne Zeichen - brauchen also nicht unbedingt einen String
    zweiteListBox: boolean;
begin
  Vokabel:='';          //dann bricht das Prog beim Einlesen auch ab
  zweiteListBox := false;
  OpenDialog1.Execute;        // <--- Du solltest hier schauen ob das nicht false zurückgibt, dann hat der Benutzer nämlich abbrechen gedrückt!
  AssignFile(Datei,OpenDialog1.FileName);    
  Reset(Datei);   // <---- Was ist denn wenn's einen Fehler gibt?!     

  // Rest wie oben.
end;

Es gab bei deiner Version immer eine AV da dein EinleseString falsch verwendet wurde. Du müßtest den imho mit EinleseString[1] angeben damit es richtig funktioniert, oder halt nur einen Char-Typ nehmen - du liest ja immer nur ein Zeichen.