Boolean Funktion mit String belegen

[SyntaxXx]

Ok erst einmal danke.
ich habe es jetzt mal wie folgt versucht.

Ich habe eine Variable global deklariert.
Dann rufe ich die funkiton auf und Speicher in dieser nun das Ergebnis auf dieser Variablen.

Und arbeite dann mit dieser in den anderen Funktionen.

Doch jedesmal wenn ich nun mien Programm kompilieren möchte erhalte ich die Fehlernachricht: "Der Rückgabewert der Funktion könnte undifiniert sein".
Warum genau kommt diese Meldung. Das verstehe ich nicht.


Hier mal ein wenig Quellcode:

Code:

var text : string;

function ReadString : boolean;
var
  hExe : THandle;
  hRes : HRSRC;
  hResLoad : HRSRC;
  lpResLock : pointer;


begin
  hExe := GetModuleHandle(NIL);
  hRes := FindResource(hExe, PChar('Divisor'), RT_String);
  hResLoad := LoadResource(hExe, hRes);
  lpResLock := LockResource(hResLoad);
  SetString(text, PChar(lpResLock), SizeOfResource(hExe, hRes));
  text := text;
end;

Das ist die Funktion. Und ich verstehe nicht, warum ich einen Fehler bekomme, wenn ich die Funktion von Boolean auf string änder.
Das Boolean bezieht sich doch nur auf den Rückgabewert oder?
Weshalb kann ich diesen dann nicht auf String ändern?