@Blackheart Der Fehler liegt nicht in der Procedure,er liegt wie der Debugger von Delphi sagt,dass der Fehler in der letzten Zeile ist also 'end;'; der Fehler lautet: " '..' erwartet,aber ';' gefunden'.
Ich habe bereits die Procedure ausgeschnitten und nur den Code des vom am Anfang an existierenden Quelltexts überprüft und auch da steht der Fehler immer noch drin.Deswegen denke ich ja auch das ich irgendwas vergessen habe hinzuzufügen.
Was denkst du ist das vielleicht irgendwas zu wenig da