Jump to content


  • Posts

  • Joined

  • Last visited

  • Days Won


Everything posted by Ronak

  1. Ronak

    scroll position

    how can I scroll mainform to top with JSFORM instead of Self.WebForm.ExtForm.Body.ScrollTo('Top', 0) Self.WebForm.JsForm....
  2. Ronak


    ProjDbDemo version : Unigui_beta After upgrading to Version 0.94 you need to follow below link for the projects of Version 0.93 http://forums.unigui.com/index.php?/topic/3572-version-094/
  3. Change/Keep FormStyle to fsNormal or fsStayOnTop I do not set FormStyle to fsMDIChild
  4. hello, I used to filter in this way, this may help select ...from A,B,C,D where (convert(Char(8), A.RefDate, 112) between :SYMD and :EYMD) and (convert(Char(8), B.RefDate, 112) between :SYMD1 and :EYMD1) ... may google for the help for MS SQL convert function ... var SYMD, EYMD : String; begin SYMD:=FormatDateTime('YYYYMMDD', DatePkrSDate.DateTime); EYMD:=FormatDateTime('YYYYMMDD', DatePkrEDate.DateTime); MyQuery.Parameters.ParamByName('SYMD').Value:= SYMD; MyQuery.Parameters.ParamByName('EYMD').Value:= EYMD; MyQuery.Parameters.ParamByName('SYMD1').Value:= SYMD; MyQuery.Parameters.ParamByName('EYMD1').Value:= EYMD; MyQuery.Open; end
  5. Ronak

    HowTo : send mail

    Yes, we can send image inside the body, it works, May Open the mail with OE.
  6. http://forums.unigui.com/index.php?app=core&module=attach&section=attach&attach_id=1294
  7. http://forums.unigui.com/index.php?app=core&module=attach&section=attach&attach_id=1290
  8. http://forums.unigui.com/index.php?/topic/2645-howto-send-mail/?hl=email
  9. Dear Farshad, can we have TUniActionList non visual component ActionList maintains a list of actions that can be used by components and controls, such as menu items and buttons. I see this component very useful because the Action can be enabled or disabled depending on user/login (Menu Rights) and the all buttons/menuItems gets enabled or disabled. At present TActionList can be used but enable/disable (Enable:=True/False) has no effect on attached buttons/menuItems. Thanks
  10. One Method to print the images from Blobfield in FastReport is here.. PrintFromDb.rar
  11. var fPdf:String; begin fPdf= 'abc.pdf'; URLFrame.URL := UniServerModule.LocalCacheURL +fPdf; // Display // or UniSession.SendFile(UniServerModule.LocalCachePath +fPdf); // open in browser (depends on browser settings) end
  12. Attached a demo for uploading_to / downloading_from database blobfield. UploadToDb.rar
  13. TEventForm = class(TUniForm) UniButton1: TUniButton; procedure UniFormShow(Sender: TObject); procedure Click_InfoMessage(Sender: TObject); private \\ protected public end;
  14. http://forums.unigui.com/index.php?/topic/2225-save-image/
  15. In web application refresh/locate on every key-press/change of an Edit is Avoidable. Try refresh/locate when user types a complete word! I mean to say when user finish typing a word, or a complete sentence start locate or re-query. Set 1 > Timer interval := 250 // design Time 2 > TimerRefresh.Enabled:=False; // design Time procedure TMainForm.UniEdit1Change(Sender: TObject); begin TimerRefresh.Enabled:=False; TimerRefresh.Tag:=0; TimerRefresh.Enabled:=True; end; procedure TMainForm.TimerRefreshTimer(Sender: TObject); begin if WebMode then begin // http://forums.unigui.com/index.php?/topic/2864-unitimer-and-the-ontimer-event/ if TimerRefresh.Tag=1 then begin TimerRefresh.Enabled:=False; ADOQuery1.Locate('Nome_cli',UniEdit1.Text,[loPartialKey]); end else begin TimerRefresh.Tag:=1 end; end else begin TimerRefresh.Enabled:=False; ADOQuery1.Locate('Nome_cli',UniEdit1.Text,[loPartialKey]); end; end; Regards
  16. When I enable the timer at run-time, at which moment it should trigger the event? 1. After passage of specified interval-time (say Interval := 1000) of the timer when timer is enabled 2. The moment the timer is enabled without waiting for time passage Thanks
  17. I have one question about the timer, at which moment the event, OnTimer needs to be executed/triggered ? 1. After passage of interval-time of the timer when timer is enabled 2. The moment the timer is enabled execution moment differs in VCL and WEB 1.=VCL and 2.= Web! Thanks
  18. Ronak

    Query help

    Here is on demo, may be usefull Condition builder works fine with MSSQL Query, for query other then MSSQL you may need to correct the parsing procedure QBFrame.rar
  19. procedure TFormList1.UniDBGrid1AjaxEvent(Sender: TComponent; EventName: string; Params: TStrings); begin UniDBGrid1.SetFocus; end;
  20. Try to set/reset the top position of the form on/in UniFormMouseDown or UniFormClick event begin if Top<0 then Top:=0; end;
  21. Dear Farshad, Can we have RoundedCorners property for the Panel? We have Collapsible Panel, very nice Thanks
  22. Project1: 00000D94: 15:47:53 [HandleFileRequest]:File not found: C:\Program Files\FMSoft\Framework\unigui\ext-4.1.1a\uni-\calendar\data\CalendarStore.js Project1: 00000B64: 15:47:53 [HandleFileRequest]:File not found: C:\Program Files\FMSoft\Framework\unigui\ext-4.1.1a\uni-\calendar\data\EventStore.js I copied \uni\ to \uni-\, it worked Any one faced this?
  23. One more option is using Hack unit Main; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, uniGUITypes, uniGUIAbstractClasses... . . type THackGrid = class(TUniDBGrid); type TMainForm = class(TUniForm) Grid1: TUniDBGrid; . . private { Private declarations } public { Public declarations } implementation procedure TMainForm.BitBtnmovecolClick(Sender: TObject); begin THackGrid(Grid1).CurrCol := newindex ; // Set the required columindex end;
  24. procedure TFormAccountInlog.UniBitBtn_SaveClick(Sender: TObject); begin if Length(UniEdit_InlogUserName.text)=0 then begin ShowMessage('<br/><div align="center">Het invulllen van een gebruikersnaam is verplicht!' + '</div><br/>', procedure (res:integer) begin UniEdit_InlogUserName.SetFocus; Abort; // Attn. end); end; end;
  • Create New...