• ievision64.dll
• ielib64.dll

IEVision Initialization...
C:\XXXxxx\ievision64.dll: 0
IEVision Initialization...
ievision64.dll: 0
ielib64.dll: 0

  sDLLPath := GetIEVisionDLLPath();
  if not FileExists( sDLLPath ) then
    raise Exception.create( 'Resource File not found: ' + sDLLPath );

  //Above lines are finds the DLL in the exe folder but IEVisionAvailable() Fails
  if not IEVisionAvailable() then
  begin
    ShowMessage
      ('This application requires the ievision.dll plugin. Please contact our Customer Support');
    memo1.text:= IEDLLLoadLog();
    Memo1.Lines.SaveToFile(ChangeFileExt(Application.ExeName, '.log'));
    Application.Terminate;
  end;

IEVision Initialization...
ievision64.dll: 0
ielib64.dll: 0

procedure TMainForm.FormCreate(Sender: TObject);
begin
  if not IEVisionAvailable() then
  begin
    ShowMessage('IEVision not found!');
    Exit;
  end;
  ...

function GetIEVisionDLLPath() : string;
var
  sDLLName: string;
begin
  {$ifdef WIN64}
  sDLLName := IEVISION_64BIT_DLL_FILENAME;
  {$else}
  sDLLName := IEVISION_32BIT_DLL_FILENAME1;
  {$endif}

  Result := IncludeTrailingBackSlash(ExtractFilePath(Application.ExeName)) + sDLLName;
end;


procedure TMainForm.FormCreate(Sender: TObject);
var
  sDLLPath: string;
begin
  sDLLPath := GetIEVisionDLLPath();
  if not FileExists( sDLLPath ) then
    raise Exception.create( 'File not found: ' + sDLLPath );
  IEInitialize_ievision(sDLLPath, False); // Initialize DLL in custom location
  if not IEVisionAvailable() then
  begin
    ShowMessage('dll not found');
    Exit;
  end;
  ...

 

---

Hmm, that means the DLL is not being located.

---

sDLLPath := FindIEVisionDLLPath;
  if sDLLPath <> '' then
    IEInitialize_ievision(sDLLPath, False); // Initialize DLL in custom location
if not IEVisionAvailable() then
begin
  ShowMessage('dll not found');
  Application.Terminate;
  Exit;
end;

  if FileExists( ExtractFilePath( Application.Exename ) + 'IEVision64.dll' ) then
    IEInitialize_ievision( ExtractFilePath( Application.Exename ) + 'IEVision64.dll', False)
  else
    raise Exception.create( 'File not found: ' + ExtractFilePath( Application.Exename ) + 'IEVision64.dll' );

IEVision Initialization...
ievision64.dll: 0
ielib64.dll: 0

IEVision Initialization...
ievision64.dll: 0
ielib64.dll: 6442450944
IEVision Version: 4.5.0.0
IEVision Create: FAILED