Delphi-Quellcode:
// global
var
BoolVar: Boolean;
procedure TestProc(a: string; var x: Boolean);
begin
x := True;
.....
x := False;
end;
TestProc('abc', BoolVar); // #1
TestProc('abc'); // #2
Ist es irgendwie möglich Fall #2 dazu zu bewegen sich kompilieren zu lassen?
Ich möchte den Code etwas kürzer gestalten und nicht um jedes TestProc BoolVar := True und False schreiben. Deswegen dachte ich gebe ich das der Funktion bei Bedarf einfach mit.
Manchmal brauche ich diese Variable aber gar nicht.