Übernehme bitte meinen Code KOMPLETT - heute ist offenbar nicht dein Tag! Schon beim Copy&Paste bringst du einiges durcheinander
// edit: schau dir das mal an:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
var Output,
Errors : TStringList;