StringReplace geht nicht

[Union]

Zitat von Hansa:

Um das Prozedur-/Funtionsverhalten zu beeinflussen, das wäre jedenfalls {$X-}, standardmässig ist das offensichtlich {$X+}

Und schon wird fast Dein gesamter Code nicht mehr compiliert weil Du auch kein result mehr hast.

Delphi-Quellcode:

// Geht nicht
function IstUngleichNull(AInteger : integer) : boolean;
begin
  result := AInteger <> 0;
end;

// Muss dann so sein
function IstUngleichNull(AInteger : integer) : boolean;
begin
  IstUngleichNull := AInteger <> 0;
end;

[Hansa]

Zitat von Union:

..wird fast Dein gesamter Code nicht mehr compiliert...

Und ob der compiliert wird. Das wäre zwar strenger, aber mehr Arbeit ist das kaum. Der dämliche Fehler hier, den hätte ich mir jedenfalls erspart.