Sistema Fenix Posted February 17, 2016 Share Posted February 17, 2016 Hi guys! A long time I'm trying to create a screen lock (long process), today I managed with callback and share with all the component. I hope it helps you, is helping here. Install the package and then make test with sample. In this component I use: https://sdkcarlos.github.io/sites/holdon.html With 8 themes: sk-rect sk-bounce sk-folding-cube sk-circle sk-dot sk-cube sk-falding-circle sk-cube-grid Random (I created this option to change theme every Hold.MaskShow) Do not forget to place the files (HoldOn.min.js and HoldOn.min.css) in the files folder of your program and refer in servermodule->CustomFiles. Hold.MaskShow('Please wait... (3 seconds)', procedure(const Mask:Boolean) begin if Mask then begin sleep(3000); Hold.MaskHide; end; end ); update: 0.0.2 - 2016-07-06 Best regards SFUni.zip 4 Quote Link to comment Share on other sites More sharing options...
mico Posted February 18, 2016 Share Posted February 18, 2016 thanks Quote Link to comment Share on other sites More sharing options...
molla2005b Posted February 18, 2016 Share Posted February 18, 2016 tnx Quote Link to comment Share on other sites More sharing options...
Darth Florus Posted February 18, 2016 Share Posted February 18, 2016 Quote Link to comment Share on other sites More sharing options...
rencarnacion Posted February 18, 2016 Share Posted February 18, 2016 Hi Fenix, I was making test with component but I got error, I'm Going to Attach an image with the error Quote Link to comment Share on other sites More sharing options...
Sistema Fenix Posted February 18, 2016 Author Share Posted February 18, 2016 Hi Ronny Do you added HoldOn.min.js and HoldOn.min.css in files folder? Also have add in servermodule->CustomFiles. Quote Link to comment Share on other sites More sharing options...
cristianotestai Posted February 19, 2016 Share Posted February 19, 2016 Hi Fenix, It is possible to use this component in place of the screen mask current in cases where i do not explicitly call Hold.MaskShow ()? For example, in components that use the property Screen Mask in the object inspector. Thanks. Quote Link to comment Share on other sites More sharing options...
Sistema Fenix Posted February 19, 2016 Author Share Posted February 19, 2016 Hi Cristiano The primary use this component is call manual of the hold, where do not is possible to use screen mask default unigui. But to work is necessary the Hold.MaskShow and to close in callback with hold.maskhide. Example: Procedure TFMainForm.doDeleteAll; begin cds.first; while not cds.eof do begin cds.delete; end; end; procedure TFMainForm.eEditKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if (Key = VK_F9) then begin Hold.MaskShow('Please wait..', procedure(const Mask:Boolean) begin if Mask then begin doDeleteAll; Hold.MaskHide; end; end ); end; end; You could even replace using this method but do not know if there is a way to make automatic. I use on others component that use jquery and I needed one method the hold screen, this was the solution. I still have a lot to learn in the world web application. Best regards. Quote Link to comment Share on other sites More sharing options...
cristianotestai Posted February 19, 2016 Share Posted February 19, 2016 Great Fenix, Thanks for sharing. Regards, Quote Link to comment Share on other sites More sharing options...
rencarnacion Posted February 19, 2016 Share Posted February 19, 2016 Hi, Fenix I all ready done as you say but still get the same error Any other clue ? Thanks Quote Link to comment Share on other sites More sharing options...
Sistema Fenix Posted February 19, 2016 Author Share Posted February 19, 2016 Hi Ronny, Do you could make test case? Regards Quote Link to comment Share on other sites More sharing options...
AlexM123 Posted February 25, 2016 Share Posted February 25, 2016 Dear Fenix, Thank you for the solution. Could you help me. I am trying to reproduce your example but something is wrong. the Mask is showing behind the main form. So the main form is enabled while mask showing. Quote Link to comment Share on other sites More sharing options...
Sistema Fenix Posted February 25, 2016 Author Share Posted February 25, 2016 Hi Alexm123, In your servermodule->MainFormDisplayMode is mfPage or mfWindow? If mfwindow really is happing this, I have not yet discovered how to solve it. I will do some tests and when I discovered return. Best regards. Quote Link to comment Share on other sites More sharing options...
AlexM123 Posted February 25, 2016 Share Posted February 25, 2016 Dear Fenix, I have set MainFormDisplayMode to mfPage and it works now. Thank you. Quote Link to comment Share on other sites More sharing options...
erdal Posted July 6, 2016 Share Posted July 6, 2016 i could not install the component. delphi xe10 seatle sfuni\source\sfunihold.pas(65,37) : error 2010 : e2010 incopatible types : 'Tunistring' and 'Tstrings' Quote Link to comment Share on other sites More sharing options...
Sherzod Posted July 6, 2016 Share Posted July 6, 2016 Hi, *** Breaking Change ***OnAjaxEvent() parameter list has changed:Old: (Params: TStrings)New: (Params: TUniStrings)*** Breaking Change *** http://forums.unigui.com/index.php?/topic/5051-version-099/page-15&do=findComment&comment=32936 Best regards. Quote Link to comment Share on other sites More sharing options...
erdal Posted July 6, 2016 Share Posted July 6, 2016 fine thanx. Quote Link to comment Share on other sites More sharing options...
Sistema Fenix Posted July 6, 2016 Author Share Posted July 6, 2016 Hi guys! Update 0.0.2 - Compatible version 0.99.95.1308 unigui - fix mask in mode windows Best regards Quote Link to comment Share on other sites More sharing options...
Beginner Posted July 14, 2016 Share Posted July 14, 2016 Fenix good job! Can you show sample how notify left side or top side i mean push messages Quote Link to comment Share on other sites More sharing options...
rencarnacion Posted July 14, 2016 Share Posted July 14, 2016 Hi Fenix excuseme, for a late answer, I found the error Thanks Quote Link to comment Share on other sites More sharing options...
Sistema Fenix Posted July 14, 2016 Author Share Posted July 14, 2016 Hi Beginner! I use noty. http://ned.im/noty I can not send example, because there is a component of it to buy the forum. http://forums.unigui.com/index.php?/topic/4666-unispecial-component/ But it is simple, note the code since I have made available and implement the noty. Best regards. Quote Link to comment Share on other sites More sharing options...
zieborg Posted August 23, 2016 Share Posted August 23, 2016 Thank u very much Fenix Great Job, I've been looking for this components Quote Link to comment Share on other sites More sharing options...
rtalmeida Posted May 2, 2017 Share Posted May 2, 2017 Fenix, Can I use this component in my commercial version? Quote Link to comment Share on other sites More sharing options...
Sistema Fenix Posted May 3, 2017 Author Share Posted May 3, 2017 Hi, Rinaldo. You can. This version is old, the updates only in version commercial. Best regards. Quote Link to comment Share on other sites More sharing options...
Beginner Posted May 5, 2017 Share Posted May 5, 2017 FenixCan you update for some one or two your components for free for thanks? For beginners and for other developers 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.