Einzelnen Beitrag anzeigen

Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.685 Beiträge
 
Delphi 11 Alexandria
 
#14

AW: Procedure vs Function, Vor- und Nachteile

  Alt 15. Apr 2018, 14:28
Compiler-Warnung "Result wurde nicht initialisizert !"
Erscheint bei mir nicht, Warnungen (0), Fehler (0)
Muss ich irgendwo was ändern das der eine Warnung wirft bzw hab ich irgendwo was abgeschaltet was das verhindert?

edit
Delphi-Quellcode:
function Test1: string;
begin Result := Result + 'a'; end;

function Test2: string;
begin Result := 'a' + Result; end;

procedure TForm1.Button1Click(Sender: TObject);
var i : Byte; S : String;
begin
  for i := 1 to 5 do S := Test1;
  Label1.Caption := S;
end;

procedure TForm1.Button2Click(Sender: TObject);
var i : Byte; S : String;
begin
  for i := 1 to 5 do S := Test2;
  Label2.Caption := S;
end;
So ist's in meinem Delphi ohne Warnungen/Fehler kompiliert worden.
Gruß vom KodeZwerg

Geändert von KodeZwerg (15. Apr 2018 um 14:31 Uhr)
  Mit Zitat antworten Zitat