Zitat:
out := GetInformation ('name.txt');
Dieses Verlangt eine Funktion, die auch einen Wert zurückgeben kann.
Was du allerdings gemacht hast ist eine Procedure zu schreiben, die schonmal keine Werte Zurückgeben kann.
Die deklaration deiner Funktion sollte so aussehen:
function GetInformation(SignonsFile : String) : String;
Probiers mal aus!
