Es geht auch ohne das
WriteLn
, z.B. mit einem expliziten Returnwert.
Delphi-Quellcode:
function bla: Boolean;
begin
Result := false;
for i := 1 to 10 do begin
if i = 5 then begin
Exit;
end;
if foo then begin
Exit(false); // hier gibt es eine Haltpunktmöglichkeit
end;
end;
Result := true;
end;
Oder sobald
Exception-Handling in's Spiel kommt:
Delphi-Quellcode:
function bla: Boolean;
begin
Result := false;
try
for i := 1 to 10 do begin
if i = 5 then begin
Exit;
end;
if foo then begin
Exit; // hier gibt es eine Haltpunktmöglichkeit
end;
end;
Result := true;
except
Result := false;
end;
end;
So oder so,
wegoptimiert ist der Code nicht, sondern lediglich im Debugger nicht als Breakpoint verwendbar.