Delphi-Quellcode:
function Base64Str(psrc: pointer; L: integer): BString;
//--> Die Funktion hat ein Result
var
{$ifndef RESULT}
result: BString;
//--> Da wird eine zusätzliche 2te Variable, auch Result angelegt, das wird das Problem sein
{$endif}
Das passiert nur bei {$ifndef RESULT}, also wenn das Define RESULT nicht definiert ist.
Wahrscheinlich was das in der alten Version irgendwo definiert, in einer .inc Datei, oder in den Projekt-Defines ...