problem beim erstellen einer Funktion

[sigma]

mit prozeduren kenn ich mich auch nicht aus
und bei meiner Funktion bekomme ich sau viele fehlermeldung
zum beispiel
[Fehler] Unit2.pas(37): Anweisungen sind im Interface-Abschnitt nicht erlaubt
[Fehler] Unit2.pas(39): Undefinierter Bezeichner: 'edtEingabe'
[Fehler] Unit2.pas(39): 'THEN' erwartet, aber Bezeichner 'Text' gefunden
[Fehler] Unit2.pas(57): 'THEN' erwartet, aber Bezeichner 'Text' gefunden
[Fehler] Unit2.pas(67): 'THEN' erwartet, aber Bezeichner 'Text' gefunden
[Fehler] Unit2.pas(77): 'THEN' erwartet, aber Bezeichner 'Text' gefunden
[Fehler] Unit2.pas(83): Anweisung erwartet, aber Dateiende gefunden