Rückgabewert Function

[Killer]

Hallo eine Frage

Und zwar hab ich eine Funktion, die so aussieht:

Code:

function TUsers.GetUserByUID(UID: string): TUser;
var
  I: integer;
begin
  for I := 0 to Count -1 do
    if Users[I].GUID = UID then
      Result := Users[I];
end;

Das ganze funktioniert auch gut, will auch nicht näher darauf eingehen, das worauf ich rauswill ist: wenn ich die Funktion aufrufe mit einer GUID die nicht existiert, dann hab ich keinen Rückgabewert. Wie kann ich das verhindern. Beim Kompilieren kam auch ne Warnung, dass die Function nicht immer einen Rückgabewert zurückgibt also was tun

[Dax]

Delphi-Quellcode:

function TUsers.GetUserByUID(UID: string): TUser;
var
  I: integer;
begin
  Result := nil;
  for I := 0 to Count -1 do
    if Users[I].GUID = UID then
      Result := Users[I];
end;

Und nicht vergessen, nachher zu prüfen, ob der User <> nil ist

[Killer]

Hey danke, manchmal is die Lösung so einfach und man kommt ums Verrecken nich drauf