[DUG] comobject

Leigh Wanstead leighw at softtech.co.nz
Fri Jan 26 13:15:58 NZDT 2007


Hello everyone,

Here is the sequence for a Delphi 7 comserver startup to call CreateRegKey.

procedure TApplication.Initialize;
procedure InitComServer;
procedure TComServer.Initialize;
procedure TComServer.UpdateRegistry(Register: Boolean);
procedure TComClassManager.ForEachFactory(ComServer: TComServerObject;
  FactoryProc: TFactoryProc);
procedure TComServer.FactoryUpdateRegistry(Factory: TComObjectFactory);
procedure TTypedComObjectFactory.UpdateRegistry(Register: Boolean);
procedure TComObjectFactory.UpdateRegistry(Register: Boolean);
procedure CreateRegKey(const Key, ValueName, Value: string; RootKey: DWord =
HKEY_CLASSES_ROOT);

I can understand that the delphi application needs to update registry. But
there is no such need every time to update. It can be updated only once,
after that there is no such need. The question is if the user who launch my
application does not create regristry rights, what to do? I don't want user
to have admin rights just to start my application.

TIA

Regards
Leigh




More information about the Delphi mailing list