MsgDialog.JQShowMessageOptions.OnConfirm.OnEvent := DoUnpost_OkClick;
IWCGJQShowMessage.ShowPromptMessage(fMessage, DefaultValue);
- Code: Select all
Procedure TTrxBaseForm.DoUnpost_OkClick(Sender: TObject; EventParams: TStringList);
Var ss : String;
begin
ss := EventParams.Values['str'];
If UpperCase(ss) <> UpperCase(gUnpostPassword) then begin
IWCGJQShowMessage.ShowMessage('wrong password', jqsmtAlert);
Exit;
end;
.....
end;
==> then the page becomes disabled
is there any solution or work around
urgent help is appreciated