or default initialization
function Application: TApplication;
begin
if CustomApplication = nil then
CustomApplication := TApplication.Create;
Result := CustomApplication as TApplication;
end;-- Zaher Dirkey -- _______________________________________________ Lazarus mailing list [email protected] http://lists.lazarus.freepascal.org/mailman/listinfo/lazarus
