Close Dialogform by Code (not Button with ModalResult=mrok)
Hello,
i check some Values of my Query (Dialog-Show-Event). In case that all Values exists, i want to Close the automaticly shown DialoForm by Code.
Else the user could change some Information at the Dialog ("DP_ex") and quit it after clicking the OK-Button (ModalResult mrok).
I tried a lot an red the whole Forum. :-)
Doesnt work...
Thanks in advance
i check some Values of my Query (Dialog-Show-Event). In case that all Values exists, i want to Close the automaticly shown DialoForm by Code.
Else the user could change some Information at the Dialog ("DP_ex") and quit it after clicking the OK-Button (ModalResult mrok).
I tried a lot an red the whole Forum. :-)
'vb
Page = TfrxDialogPage(frxReport1.FindObject("DP_ex")
Page.Visible = False
Page.ModalResult = mrok
DP_ex.Visible = False
DP_ex.ModalResult = mrok
DP_Ex.Free
...
Doesnt work...
Thanks in advance
Comments
I Check the Infos at "frMainOnRunDialogs(byref Result)". If something missed i call DP_Ex.showmodal else i do nothing and the Dialog doesnt prompt.
Thx