Jump to content
uniGUI Discussion Forums


uniGUI Subscriber
  • Content Count

  • Joined

  • Last visited

  • Days Won


M.Ammar last won the day on July 8 2019

M.Ammar had the most liked content!

Community Reputation

20 Excellent

About M.Ammar

  • Rank

Recent Profile Visitors

322 profile views
  1. M.Ammar

    Format field with DBGrid.OnDrawDataCell property

    this is the same procedure Tfra.UniDBGridRoomDrawColumnCell(Sender: TObject; ACol, ARow: Integer; Column: TUniDBGridColumn; Attribs: TUniCellAttribs); begin if Column.FieldName = 'Rate' then TFloatField(Column.Field).DisplayFormat:= '0.00' ; End; but I didn't test it regards
  2. M.Ammar

    How i can get actual frame?

    Hi You can do a simple integer flag CurrentDisplayFrame for example in main module and change the value for each frame and use it for your case code regards
  3. it is not possible to have 2 main forms according to this, in my application I have 3 frames (Dashboards) inside the MainForm i show one of them depending on user preferences ,I think you can do the same Regards
  4. M.Ammar

    Resize components Runtime

  5. M.Ammar

    Disappointed with Unigui? There are alternatives coming!

    Hi I am using uniGui For almost 2 years , and I agree that it was the best thing that happened to Delphi in as long as I remember, I think Mr. Farshad and the FMSoft Team is doing a good job , there is always a room for improvement and it can be faster but so far so good. I have finished my first project and it is very stable and working fine for 3 hotels so far no complains whatsoever. everyone is missing some feature and waiting for it to be released for example I was waiting for : 1- the Scheduler Quasar (2.0.0) 2- the UniDBgrid able to type without mouse click or press Enter I hope you all the best and may next year be better roadmap for FMSoft Regards
  6. Thank you for reply, i will do just that
  7. Hi All I have a Queue Table which each record contains a POST API, because it is not recommended to send them directly. I want to post each API record and wait for response before moving to the next record I am thinking of using TuniThreadTimer placed on server module and a seperate database connection with 2 FDQuery to get the data and Post it. 1- will this interrupt server module performance in any way or it is a good solution? 2- From the server module, can I access a data module that have the RESTClient, RESTResponse, and other REST Component or do I need to move all Component/Code related to the server module. 3- it is better to make a sperate desktop or service application to do that and run it separately on the server. Excuse my questions if it is unclear but I try my best best regards
  8. Sorry for that , please Check Now. Card Test.rar
  9. if this is normal behaviour then I think it is not a problem unless you can find away to close the menu on a panel and open it on another panel is the same click it will be better user experience. Best Regards
  10. Actually after making the testcase I found out that it is misunderstanding from my side , you see the first menu opens up fast then the 2nd open up after 2 clicks because the first click is used to close the first menu thanks for reply Card Test.rar
  11. Hi I have one TUniPopupMenu that I want to use with many Unbuttons/or Unipanel on the same form "Card Type of form" I have found some solutions in the forum but it is slow and have to click 2or3 times for the menu to show procedure TfraCardView.UniCPBaseMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin if Button = mbRight then begin UniPopupMenu1.Popup(X, Y, Sender); end; end; // examble to use it on a panel for I := 1 to 50 do Begin PanelInfo := TUniContainerPanel.Create(Self); with PanelRoomInfo do begin Parent := PanelCenter; Name := 'UniPanelInfo_' + I; OnMouseUp := UniCPBaseMouseUp; end; End; and the same result with PopupBy procedure TfraCardView.UniMenuButton1Click(Sender: TObject); begin UniPopupMenu1.PopupBy(Sender as TUniMenuButton); End; and use it like this MenuButton := TUniMenuButton.Create(Self); with MenuButton do begin Parent := PanelTop; width := 100; MenuButton.OnClick := UniMenuButton1Click; MenuButton.ArrowBottom := True; end; the problem is that some times the user have to click 2 or 3 times in order for the menu to show, I have also tried to create separate menu with menu items for every card it works better, but the form takes Much longer to load and not easy to manage. any suggestions or alternatives? Best Regards
  12. M.Ammar

    Maximum size project

    Hi i used both methods in my project (110 Form so far) and both are working fine for me, both have own advantage, so for me it is up to etch case using datamodule have one advantage that you can use the same code for (web and mobile) GUI for example to generate the same report on mobile and web regards
  13. M.Ammar

    UniHTMLMemo - insert text at cursor position

    Hi I know it is an old post but I have 2 questions 1- how to move the Cursor to the end of the document as I want to add to the end of the old text Or another way to add to the end; 2- StrToJS is giving error so iam using the other way ("'+ s +'") what do I add in the uses list to make it work? regards and thanks for help
  14. hi I actually needed the same today and after many tries I found that what you said "UniFormScreenResize only works on the main form" is true , based on that the solution is to resize the other form from the main form like that First Set the form WindowState to wsMaximized; in the main form where the form is created use this procedure TMainForm.ActionExecute(Sender: TObject); begin Lform := TYourform.Create(UniApplication); end; procedure TMainForm.UniFormScreenResize(Sender: TObject; AWidth, AHeight: Integer); begin if Assigned(Lform) then begin Lform.WindowState := wsNormal; Lform.Width := AWidth; Lfrom.Height := AHeight; end; end; Regards