Jump to content

Oliver Morsch

uniGUI Subscriber
  • Posts

    356
  • Joined

  • Last visited

  • Days Won

    18

Posts posted by Oliver Morsch

  1. If I use SendFile twice or more with the same filename, the browser takes the file out of the cache instead the new one.

     

    At the moment I add a Timestamp to the filename, but is there a way to do without a unique name?

     

  2. I make it similar to you. My only problem is when adding a new form or frame in debug mode Delphi deletes sometimes the "ServiceModule in 'Service\ServiceModule.pas'". Do you have same problem?

  3. - System Hangs if run as a Service or ISAPI

    The Problem seems to be from ODAC, when I changed it to UniDAC it works without problem, in spite of both components share the same code base for connection to ORACLE DB, and both works very well as a Standalone but the connection failed when run the Application as a Service or ISAPI.

    I will report this error in Devart.

     

     

    That seems to be a problem in latest ODAC Version. Older versions work.

  4. and upload a folder?

    It is not a standard. Chrome does/did support it.

     

    Alternative:

     

    Open Windows Explorer -> open the folder -> Press <ctrl>+<a> -> use drag & drop to browser (multiple file upload, see post #8)

  5. hi oliver.

     

    can you upload a sample?

     

    I am trying to do the same.

     

    thanks.

    procedure TfrmMain.OpenFrame(Sender: TObject);
    var
      ts: TUniTabSheet;
      fra: TUniFrame;
    begin
      ts := TUniTabSheet.Create(self);
      ts.Caption := (Sender as TUniMenuItem).Caption;
      ts.PageControl := PageCtrl;
      // PageCtrl.TabIndex := -1; // Workaround / Issue #1025 / Nicht mehr notwendig ?!
      PageCtrl.ActivePage := ts;
      fra := TFrameClass((Sender as TUniMenuItem).Tag).Create(self); // type TFrameClass = class of TUniFrame;
      ts.Tag := Integer(fra); // call "TComponent(PageCtrl.ActivePage.Tag).Free;" when close TabSheet (ActivePage) later
      fra.Name := fra.Name + IntToStr(Integer(fra)); // to open a frame more than once
      fra.Align := alClient;
      fra.Parent := ts;
    end;
    
×
×
  • Create New...