DLL für Verwendung in Navision

[Thanatos81]

Also, ich habe folgende DLL:

Delphi-Quellcode:

library pvrDLL;

uses
  SysUtils,
  Forms,
  ActiveX,
  RemoteViewXLib_TLB,
  ConnThread in 'ConnThread.pas';

{$R *.res}

var
  dummyForm: TForm;

procedure DLLStart; stdcall;
begin
  //initialisieren
  OleInitialize(nil);
  dummyForm := TForm.Create(nil);
  dummyForm.Visible := false;
  RemoteView := TRemoteViewX.Create(dummyForm);

  RemoteView.Parent := dummyForm;
  RemoteView.Left := 5;
  RemoteView.Top := 5;
  RemoteView.Width := 10;
  RemoteView.Height := 10;
end;

procedure DLLStop; stdcall;
begin
  //finalisieren
  RemoteView.Disconnect;
  FreeAndNil(RemoteView);
  FreeAndNil(dummyForm);
  OleUninitialize;
end;

procedure ConnectTo(IP: PChar; CamNo: Integer; UserID, UserPW: PChar); stdcall;
var
  myConnThread: TConnThread;
begin
  RemoteView.IPAddress := IP;
  RemoteView.CCDNo := CamNo;
  RemoteView.LoginID := UserID;
  RemoteView.LoginPwd := UserPW;

  myConnThread := TConnThread.Create;
end;

function IsConnected: WordBool; stdcall;
begin
  result := RemoteView.IsConnected;
end;

function getPicture(fileName: PChar; EnableOSD, Transparent: WordBool) :WordBool; stdcall;
begin
  result := RemoteView.SnapShoot(fileName, EnableOSD, Transparent);
end;

exports
  DLLStart,
  DLLStop,
  ConnectTo,
  IsConnected,
  getPicture;

begin

end.

Versuche ich nun diese DLL per regsvr32 zu registrieren bekomme ích

Zitat von regsvr32 pvrDLL.dll:

---------------------------
RegSvr32
---------------------------
pvrDLL.dll wurde geladen, aber der DllRegisterServer-Eingangspunkt wurde nicht gefunden.

Diese Datei kann nicht registriert werden.
---------------------------
OK
---------------------------

ist ja auch logisch, eine "DllRegisterServer" gibts bei mir ja nicht. Meine Frage ist nun, was in diese Prozedur/Funktion (?) reingehört, damit ich dies umsetzen kann. Ziel ist es, dass regsvr32 pvrDLL.dll nicht mehr fehl schlägt damit Navision diese dann hoffentlich nutzen kann.