Das sollte sich doch im Debugger zeigen. Vermutlich ist ADCallResult aus irgendeinem Grund False.
Besser wäre es auf jeden Fall so:
Delphi-Quellcode:
if ADCallResult then
Result := outUserInfo.UserName + ' / ' + outUserInfo.Description
else
Result := GetCurrentUserLoginName;
So wird Result := GetCurrentUserLoginName; nur ausgeführt, wenn es auch benötigt wird. Und wofür das Copy, wenn du ohnehin den ganzen String verwendest?
Ok, der Code wäre besser, nur: ADCallResult war in den Fällen nicht false.
Innerhalb der Methode war Result das, was ich erwartet hätte, auf der Aufruferseite war der String dann aber immer
leer oder so und ich weiß nicht warum. Daher meine Lösung mit dem Copy.