I expected this to compile
- Code: Select all
Dlg := IWCGCreateMessageDialog(FMessageStr, mtConfirmation, [mbYes,mbNo],
procedure (Sender: TObject; AResult: TModalResult; const AData: TCGVarArray)
begin
end);
However is says there is no overload that can be called with these arguments
while
- Code: Select all
procedure ConfirmCancelEntitlement(Sender: TObject; AResult: TModalResult; const AData: TCGVarArray);
Dlg := IWCGCreateMessageDialog(FMessageStr, mtConfirmation, [mbYes,mbNo], ConfirmCancelEntitlement);
works fine.
Am i doing something wrong?
Eric