Hi,
- oNS:=OutApp.GetNamespace; durch oNS:=OutApp.GetNamespace('
MAPI'); ersetzen ...
- oNS.Free; Löschen ist fehl am Platz
- ckRunningOrNew schau mal in deine OleServer.pas nach dem Type TConnectKind
bei Delphi 7 schauts so aus :
Delphi-Quellcode:
type
TVariantArray = Array of OleVariant;
TOleServer = class;
TConnectKind = (ckRunningOrNew, // Attach to a running or create a new instance of the server
ckNewInstance, // Create a new instance of the server
ckRunningInstance, // Attach to a running instance of the server
ckRemote, // Bind to a remote instance of the server
ckAttachToInterface); // Don't bind to server, user will provide interface via 'CpnnectTo'