Jump to content

Ronak

Members
  • Posts

    123
  • Joined

  • Last visited

  • Days Won

    5

Posts posted by Ronak

  1. In the HTML editor, is it possible to have one more text alignment button 'Justify'

    Aline text to both the left and right margins, adding extra space between words as necessary.

    This creates a clean look along the left and right side.

    post-595-0-76808800-1354267866.jpg

  2. Hello,

     

     

    Can some one help me developing DbEdit with a Button at Right.

     

    I made an attempt to ceate dbEdit having a button at right, During design time I see the button but not at run time.

     

    unit UniDBEditBtnd;
    
    interface
    
    uses
     SysUtils, Classes, Controls, uniGUIBaseClasses, uniGUIClasses, uniEdit, uniDBEdit, uniSpeedButton;
    
    type
     TUniDBEditBtnd = class(TUniDBEdit)
     private
       { Private declarations }
      fButton: TUniSpeedButton;
     protected
       { Protected declarations }
     public
       { Public declarations }
      constructor Create(AOwner: TComponent);override;
      destructor Destroy;override;
     published
       { Published declarations }
     end;
    
    procedure Register;
    
    implementation
    
    procedure Register;
    begin
     RegisterComponents('Custom', [TUniDBEditBtnd]);
    end;
    
    { TUniDBEditBtnd }
    
    constructor TUniDBEditBtnd.Create(AOwner: TComponent);
    begin
     inherited;
      fButton:= TUniSpeedButton.Create(Self);
      fButton.Parent:= Self;
      fButton.Align:=alRight;
      fButton.width:= 20;
      fButton.Top:= 0;
    end;
    
    destructor TUniDBEditBtnd.Destroy;
    begin
      fButton.Free;
      inherited Destroy;
    end;
    
    end.
    

    post-595-0-11744500-1354001549.jpg

  3. I need to make the same name for the pdf file..

    I already delete the old file, and create the new one..

    How to display the new one in urlframe? Is it posible?

     

     

    Add some random value at the end of url like "R-123456.pdf?918237121212456"

     

    ... the next time urlframe refreshed

  4. Create simple form or if you have created application forms then....

    unit Unit1;
    
    interface
    
    uses
     Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, uniGUITypes, uniGUIAbstractClasses, uniGUIClasses, uniGUIForm;
    type
     TUniForm1 = class(TUniForm)
     private
       { Private declarations }
     public
       { Public declarations }
     end;
    
    // function UniForm1: TUniForm1;  // Remove
    
    implementation
    
    {$R *.dfm}
    
    uses
     MainModule, uniGUIApplication;
    
    // function UniForm1: TUniForm1;                                              // Remove
    // begin                                                                      // Remove
    //   Result := TUniForm1(UniMainModule.GetFormInstance(TUniForm1));           // Remove
    // end;                                                                       // Remove  
    
    end.
    

     

    
    Uses uniGUIApplication,
    
    procedure UniButton1Click(Sender: TObject);
    begin
      // first instance 
      with TUniForm1.Create(UniApplication) do begin
         Show;
      end;
      // Second instance 
      with TUniForm1.Create(UniApplication) do begin
         Show;
      end;
    end;
    
    procedure UniButton2Click(Sender: TObject);
    var
      FormA,FormB: TUniForm1;   
    begin
      // first instance 
      FormA:= TUniForm1.Create(UniApplication);
      FormA.Show;
    
      // Second instance 
      FormB:= TUniForm1.Create(UniApplication);
      FormB.Show;
    end;
    
    

  5. In the search form you can define callback procedure..

     

    -------------------

    unit SearchForm;

     

    interface

     

    uses

    windows, messages...

    type

    TCallbackProcedure = procedure of object;

    FormSearch = class(TUniForm)

     

    private

    CallbackProcedure: TCallbackProcedure;

    -------------------

     

    when you call the search form assign the CallbackProcedure, and if this procedure is assigned, it is to be called/executed on close event of search form

     

    Example :

    http://forums.unigui.com/index.php?app=core&module=attach&section=attach&attach_id=783

  6. Hi Stefano,

     

    your search in combobox is very good, it is matching with InfoPower controls,

    I hope the same built-in, in the next release of UNIGUI.

     

    Only thing I am thinking is, even if the grid is paged, actual no of records loaded on server side, I suppose if few lacks, and the no of simultaneous sessions, will cause heavy load on server.....

     

    But it is nice to have look at your demo

     

    Regards

  7. Try

     

    Have Some Server Side Activity with one Timer on MainForm with an interval, say 60000, 1 Minutes. may just re-query some small DS in OnTimerEvent of the timer,

     

    My aim is to Have Some Server Side Activity.

  8. Just.....

    if (ToBe_Displayed_in_UniURLFrame = True)  then begin
       with TFormUrlView.Create(UniApplication) do begin
           URLFrame.URL := UniServerModule.LocalCacheURL +fn; // Displayed on UniURLFrame
           Show;
       end;
    end else begin
       UniSession.SendFile(UniServerModule.LocalCachePath +fn);
       // rely on browser setting  
    end;

  9. Is there some event in TUniDbGrid .. AFTER columns are created automatically from dataset ? (I mean, not persistent columns, but those auto-created)

     

    ?

     

    Thanks !

     

    Try, In web mode 'OnAjexEvent'

     

    EventName:

    1 data

    2 viewrefresh

    3 load

     

    Regards

  10. Dear Farshad,

     

    Thanks, I have no words for this excellent uniGUI

     

    In calender panel is it possible to have Period (from date,to date) along with Day/Week/Month, it can be used in-place of Planner/Scheduler.

    also, if all the events are of ALL DAY then can there be option to hide the timing panel.

  11. Hello,

     

    In webmode there is no pause, the execution is already done/passed for the code you say '..is not running..'

     

    Simply, may take required action in first dialogs callback procedure...

     

    
    procedure TMainForm.UniBitBtn1Click(Sender: TObject);
    begin
     //--------is running-----------------------------
     MainForm.caption:='';   UniEdit1.Clear;
    
     MessageDlg('Are you delete this record?', mtConfirmation, mbYesNo,
     procedure(AResult: Integer)
     begin
       case AResult of
         mrYes: DELETE...;
         mrNo : SKIP...;
       end;
     end);
    
     //--------------is not running------!!!   ALREADY PASSED
     if UniEdit1.Text='YES' then   begin
         MainForm.caption:='aaa';
     end;
    
    end;
    

  12. Hi,

     

    The issue starts when once the grid gets focused, the workaround I found is :

    procedure TUniForm1.UniEditAjaxEvent(Sender: TComponent; EventName: string; Params: TStrings);
    begin
      UniEdit.SetFocus;
    end;
    
    procedure TUniForm1.Grid1AjaxEvent(Sender: TComponent; EventName: string; Params: TStrings);
    begin
      UniEdit.SetFocus;
    end;

     

    with this, UniEdit always remains focused..

     

    Regards

  13. I also observed the same, that timer doesn't triggers as long as the main thread is busy in processing some ProcessSaleInternal procedure.

    also, UniGUIMainModuleSessionTimeout doesn't execure as the main thread is busy.

     

    This lengthy operation have to be processed in a thread, as Farshad have already suggested.

     

    Regards

×
×
  • Create New...