Moin,
ich bekomme die Version 1.0 nicht kompiliert.
Delphi-Quellcode:
function TccSwissbitTse.AddFunctionCallToLog(const aFunctionName: String; const aFunctionResult: TWormError; const aParams: TccSwissBitLogItemParamValueArray): TccSwissBitLogItemFunctionCall;
begin
Result := TccSwissBitLogItemFunctionCall.create;
Result.FunctionName := aFunctionName;
Result.FunctionResult := aFunctionResult;
Result.Params := aParams;
AddFunctionCallToLog(Result, True);
end;
Delphi-Quellcode:
AddFunctionCallToLog('worm_tse_setup', Result, [
TccSwissBitLogItemParamValue.create('CredentialSeed', CredentialSeed),
TccSwissBitLogItemParamValue.create('AdminPuk', IfThen(PinToLogEnabled, aAdminPuk, '???')),
TccSwissBitLogItemParamValue.create('AdminPin', IfThen(PinToLogEnabled, aAdminPin, '???')),
TccSwissBitLogItemParamValue.create('TimeAdminPin', IfThen(PinToLogEnabled, aTimeAdminPin, '???')),
TccSwissBitLogItemParamValue.create('ClientId', aClientId)
]);
[dcc32 Fehler]
cc.KassenSichV.Swissbit.classes.pas(1860): E2250 Es gibt keine überladene Version von 'AddFunctionCallToLog', die man mit diesen Argumenten aufrufen kann.
Leider weiß ich nicht, woran das liegt, hat da jemand ne Ahnung oder Idee?
LG Oliver