Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Rückgabewert Function (https://www.delphipraxis.net/50834-rueckgabewert-function.html)

Killer 1. Aug 2005 17:44


Rückgabewert Function
 
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 :roll: also was tun

Dax 1. Aug 2005 17:49

Re: Rückgabewert Function
 
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 1. Aug 2005 17:57

Re: Rückgabewert Function
 
Hey danke, manchmal is die Lösung so einfach und man kommt ums Verrecken nich drauf :wink:


Alle Zeitangaben in WEZ +1. Es ist jetzt 23:39 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz