[Lazarus] Some thoughts about the global 'Application' instance.

[Zaher Dirkey]

Joost wrote

>I am from the FPC team
:)

I like to talk, and forgive me if i be stupid.
in Forms.pas

var
   Application: TApplication = nil;

move it to CustApp.pp

var
   CustomApplication: TCustomApplication = nil;

and replace it in Forms.pas to be a function

function Application: TApplication;
begin
  Result :=  CustomApplication as TApplication;
end;

Thanks for your patience.

-- 
Zaher Dirkey

-- 
Zaher Dirkey