das wird hier zum ratespiel ^^
Hab mal alles ein bisschen übersichtlicher gemacht und bin der Meinung der Fehler liegt irgendwo hier:
Delphi-Quellcode:
for i := 1 to length(s) do
begin
if s[i] = ' ' then
Fehlermeldung ist ja, "erwartet Deklaration, aber Dateiende gefunden" und alles was nicht deklariert worden ist bzw. nichts zugewiesen worden ist, ist das 'i' :/