Jump to content

Why in Windowless ... is the OnAfterShow event called 2 times?


gerardocrisci

Recommended Posts

in the example "uniGUI \ Demos \Desktop\Windowless"

UniServerModule.MainFormDisplayMode = mfPage

if I add to the source

MainForm.OnAfterShow = UniFormAfterShow

procedure TMainForm.UniFormAfterShow(Sender: TObject);
begin
  UniMemo1.Lines.Add('--- > OnAferShow');
end;

the OnAfterShow event is called 2 times.

Why?

 

Link to comment
Share on other sites

Ciao Freeman35

I need this adjustment ...
in many cases I start the Query in this event .. in order to display the form first and then the request for the data for the grid.
Is there a post-show event even after the AftherShow?

PS: 
Since it cannot be obtained even by paying uniGUIForm.pas.
At least is it possible to have uniGUIForm.int ?
an .int file where you only see the Interface part of Unit not shipped with source,

 .. example of the probable file:

unit uniGUIForm;

interface

uses
  Controls, Classes,...;

type
   TUniForm = class(TUniCustomForm) 
  private
    FOnReady: TNotifyEvent;
    ..
  protected
    function GetOnShow: TNotifyEvent; virtual;
    procedure OnAfterShow(Value: TNotifyEvent); override;
    ...   
  public
    constructor Create (AOwner: TComponent); 
    destructor Destroy; 
    ...
  published
    property OnCreate;
    property OnReady;
    property OnBeforeShow;
    property OnShow;
    property OnAfterShow;
    ...
  end;

implementation
end.

 

Link to comment
Share on other sites

1 minute ago, Sherzod said:

Fixed, please wait for the next build.

Grazie .

Also think about giving documentation in int files..
if you provide the files uniImageList.int .. uniCanvas.int .. uniGUIForm.int ..
facilitates the ability to create custom components
trying to create override procedures ..

I will wait for a next version soon

Link to comment
Share on other sites

Please sign in to comment

You will be able to leave a comment after signing in



Sign In Now
×
×
  • Create New...