Hi,
Am using the following code on form create
btnSave.JQButtonOptions.OnClick.Indicator := IWCGJQLockIndicator1;
btnSave.JQButtonOptions.OnClick.IndicatorIndex := 0;
In the following procedure the lockIndicator working ok
procedure TIWFrmtest.btnSaveJQButtonOptionsClick(Sender: TObject;
AParams: TStringList);
begin
makesave;
end;
But if I use IWCGJQShowMessage in the form with the same saving procedure
procedure TIWFrmtest.btnSaveJQButtonOptionsClick(Sender: TObject;
AParams: TStringList);
begin
IWCGJQShowMessage.ResetJSonProps;
IWCGJQShowMessage.JQShowMessageOptions.Labels.OK:= 'Save';
IWCGJQShowMessage.JQShowMessageOptions.Labels.Cancel:= 'Cancel';
IWCGJQShowMessage.JQShowMessageOptions.OnConfirm.OnEvent:= JQShowMessageOnConfirmEvent;
IWCGJQShowMessage.JQShowMessageOptions.OnCancel.OnEvent:= JQShowMessageOnCancelEvent;
IWCGJQShowMessage.ShowMessage('Are you sure want to save ?', jqsmtConfirm);
end;
procedure TIWFrmtest.JQShowMessageOnConfirmEvent(Sender: TObject;
AParams: TStringList);
begin
makesave;
end;
Is there any thing wrong with my code?
I need the Lock the input from the user until the saving procedure finish
Regards