When creating a message dialog runtime like below, I get an access violation when clicking the OK button quickly twice (or more).
- Code: Select all
LDlg := IWCGCreateMessageDialog('',
mtInformation,
[mbOk],
procedure(Dialog: TIWCGJQMsgDialog; AResult: TModalResult)
begin
end);
Attached is a simple demo project, might take a few tries to get the error.
Is this an issue in the dialog component?
Mark