Ario.Paxaz Posted May 10, 2017 Share Posted May 10, 2017 Hi I have a unit,and on it I run query, In VCL ,I write below code screen.Cursor := crSQLWait; ATable.Open; screen.Cursor := crdefault; What i can write ,for it in my unit? Best Regards. Quote Link to comment Share on other sites More sharing options...
Hayri ASLAN Posted May 10, 2017 Share Posted May 10, 2017 Hi, Form.ShowMask('Loading'); UniSession.Synchronize(); ATable.Open; Form.HideMask; Please be sure that EnableSynchronousOperations:= True in MainModule 2 Quote Link to comment Share on other sites More sharing options...
Ario.Paxaz Posted May 10, 2017 Author Share Posted May 10, 2017 Hi, Which Library must be in uses List? Best Regards. Quote Link to comment Share on other sites More sharing options...
Hayri ASLAN Posted May 11, 2017 Share Posted May 11, 2017 UniGUIApplication Quote Link to comment Share on other sites More sharing options...
Ario.Paxaz Posted May 11, 2017 Author Share Posted May 11, 2017 Hi I Used it,but I have error. I change Form to main form name,and use my main form in uses list ,but error appear. Main.ShowMask('Loading'); UniSession.Synchronize(); UniMainModule.ADOQuery1.Open; Main.HideMask; Best Regards. Quote Link to comment Share on other sites More sharing options...
Hayri ASLAN Posted May 11, 2017 Share Posted May 11, 2017 Hi, Main -> MainForm But it must be related with form name. In that case it will be uniform1 Quote Link to comment Share on other sites More sharing options...
Ario.Paxaz Posted May 13, 2017 Author Share Posted May 13, 2017 Hi Unit1 is unit and don't have form. Best Regards. Quote Link to comment Share on other sites More sharing options...
Hayri ASLAN Posted May 15, 2017 Share Posted May 15, 2017 You can use Last opened form in this time Quote Link to comment Share on other sites More sharing options...
IRWANTO82 Posted May 26, 2017 Share Posted May 26, 2017 Hi Unit1 is unit and don't have form. Best Regards. maybe you want create function to easy execute query, but mask must have parent form, or you must create form runtime in function or yourform.ShowMask('xxx'); try tbl.sql.text := 'select xxxx'; if not execsql(tbl) then exit; .... finally yourform.hidemask; end; Quote Link to comment Share on other sites More sharing options...
JDDEV Posted June 28, 2017 Share Posted June 28, 2017 Hi, I'am using the Trial version to make a litle project to demonstrate the power of UniGUI to my chief...and i have some difficults : 1) when i want to show/hide the ScreenMask of my main form nothing is happed (the time to open my query is 10 seconds but no wait message is viewing) 2) when i want to change le title of the ServeurModule,...the default title "New Application" is back ! What is wong ? Is it because of the Trial version ? Thanks Quote Link to comment Share on other sites More sharing options...
Sherzod Posted June 28, 2017 Share Posted June 28, 2017 2) when i want to change le title of the ServeurModule,...the default title "New Application" is back ! What is wong ? Is it because of the Trial version ? Thanks Hi, Yes, it's a trial limitation Quote Link to comment Share on other sites More sharing options...
JDDEV Posted June 29, 2017 Share Posted June 29, 2017 Thank you. Quote Link to comment Share on other sites More sharing options...
albertovesx Posted June 30, 2017 Share Posted June 30, 2017 Is it necesary tha Synchronize() function? Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.