Pep

Hello, Today I decided to do some tests with the tools included in uniGUI: uniStressTest and hyperServer. I have to point out that I am not a specialist in this topic and it is the first time I use them, so there will surely be some parameters or conditions that will not be adequate. These tests are not intended to be very scientific, the intention is to test the application that we are developing. The tests are done in i7-4771 - SSD 250 GB. 12 GB RAM - Win10 Pro 64 bits - SQL Server 2012 64 bits The application to be tested is in 32 bits. The saved session to execute, generates a header with 5 lines and also another header with 1 line (Total 8 records recorded per session) to part one of a paged query. The "Playback Speed" that I have chosen is "Real Time x 8", because if I chose "Max Speed", not all the records are generated, maybe because the recorded session is made by opening several windows linked and grids . The results have been: Without hyperServer: The most I have achieved are 385 active sessions (with 4 errors). With hyperserver (max_nodes = 12): I have achieved 5000 active sessions !! Clearly here we can see the power of this tool! As I mentioned, these tests are not intended to draw scientific conclusions, but the intention was to test the power of this tool and I thought it was opportune to share these results in the forum because I think the uniGUI tool is impressive but now, much more with the inclusion of hyperserver. Thanks for this wonderful framework.

Hello skafy, In your sample, you are creating the controls in UniFormShow Event procedure TMainForm.UniFormShow(Sender: TObject); begin ... but if you create the controls in UniFormCreate then tab works ok: procedure TMainForm.UniFormCreate(Sender: TObject); var I: Integer; Edit: TUniEdit; begin for I := 0 to 10 do begin Edit := TUniEdit.Create(Self); edit.Parent:= panel1; edit.Align:= alTop; edit.FieldLabel:= I.ToString; edit.TabOrder:= I; end; end;

Thanks!

Hello, In a DBGrid with Multiselect mode, after loading the rows, the first one is automatically selected. How I can avoid this? Thanks a lot for your help.

Hello, Did you install "uniGUI Runtime Package": http://www.unigui.com/doc/online_help/unigui-runtime-package.htm uniGUI Web Deployment Help: http://www.unigui.com/doc/online_help/deployment.htm

Yes, it doesn't work when is in Grid Editor. In standard mode it works.

Hello, How can I get the text that a user has recently written in a Combobutton in the form UniForm1.TextEdit Sample: I have try procedure TMainForm.UniComboBox3TriggerEvent(Sender: TUniCustomComboBox; AButtonId: Integer); begin if AButtonId = 1 then begin UniDBGrid1.CancelEditing(True); UniForm1.UniEdit1.Text := Sender.Text; // Doesn't work UniForm1.ShowModal(GridCallBack); end but doesn't work. Thanks a lot.

Thnaks a lot!

Hello, Maybe, you have to put false in the property "ForceFit"

Thank's a lot for the solution. Lesson learned!

Hello everyone, When creates a control (ex: uniEdit) in runtime mode and then adds "ClientEvents.ExtEvents" this events don't fire but If I add the same event in runtime mode but in a control created at design time then fires ok. Exemple: procedure TMainForm.UniFormCreate(Sender: TObject); const after_render_Event = 'afterrender=function afterrender(sender, eOpts) { sender.allowBlank = false;}'; begin //Works ok //************ // UniEdit Control (Created in Design mode) // Add client event in runtime fires ok UniEdit1.ClientEvents.ExtEvents.Add(after_render_Event); //No Works!!!!!!!!!! //******************* // UniEdit Control (Created at Rumtime time) FRunTimeUniEdit := TUniEdit(InsertControl(TUniEdit.Create(Self))); with FRunTimeUniEdit do begin Left := 72; Top := 122; Width := 200; // Add the same client event in runtime mode not fires ClientEvents.ExtEvents.Add(after_render_Event); end; end; Someone knows why this happens? Thank you.

Thank yoy very much for this code! I think It's the way like works in a regular VCL Grid

Thanks a lot!

Did you copy the folder "jtoast" in exe application "files" folder ? Look at: http://forums.unigui.com/index.php?/topic/8910-sweetalert2/& or you can download te last version in

Hello, First of all, thanks to CastleSoft for these components. I noticed that the "TUniJToast" component does not work properly with the "loader" property. If you choose false, the loader keeps showing. To correct, I made these changes in the function TUniJToast.BuildJsonParams: string; I changed these line bstr := bstr + 'loader:' + BoolToStr(loader) +','; for this bstr := bstr + 'loader:' + LowerCase(BoolToStr(loader, true)) +',';