Welcome Guest! To enable all features, please Login or Register.

Notification

Icon
Error

Options
View
Last Go to last post Unread Go to first unread post
#1 Posted : Thursday, July 12, 2007 6:12:15 AM(UTC)
Almudena

Groups: Registered
Posts: 6


Hello,

I have a problem, appear this message of error when option open, what has this code:

procedure TMainFrm._miFileOpenClick(Sender: TObject);
var
   nRet: Integer;
   LeadRaster: CoLEADRasterDlgKrn;
   ILeadRaster: LEADRasterDlgKrn;
begin
  try
      _rasterDlgFile.FileDlgFlags:=0;
      _rasterDlgFile.DialogTitle:= 'Open File';
      _rasterDlgFile.Filter:='*.JPG|*.jpg';

      _rasterDlgFile.InitialDir:= 'C:\imagenes';
      _rasterDlgFile.Filter:= '';
      _rasterDlgFile.Bitmap:=0;

      _rasterDlgFile.UIFlags:=OPEN_LOADBITMAP +
         OPEN_SHOW_PREVIEW +
         OPEN_SHOW_MULTIPAGE +
         OPEN_USEFILESTAMP +
         OPEN_SHOW_FILEINFO +
         OPEN_SHOW_LOADOPTIONS +
         OPEN_SHOW_LOADCOMPRESSED +
         OPEN_SHOW_LOADROTATED +
         OPEN_SHOW_DELPAGE +
         OPEN_SHOW_PDFOPTIONS +
         OPEN_SHOW_RASTEROPTIONS +
         OPEN_SHOW_VECTOROPTIONS +
         OPEN_VIEWTOTALPAGES +
         OPEN_ENABLESIZING;

      ILeadRaster := LeadRaster.Create;

      ILeadRaster.InitDlg(HELP_OPEN);
      nRet:=_rasterDlgFile.ShowOpenDlg(Handle);

      if (_rasterDlgFile.DialogStatus <> DLG_OK) then
         Exit;


      if (nRet = 0) then begin
         _paintZoomPercent:=ZOOM_NORMAL;
         _rasterViewer.EnableOCRDrawing:=False;
         _rasterViewer.Refresh();
         _rasterViewer.Raster.Bitmap:=_rasterDlgFile.Bitmap;
         _rasterViewer.PaintZoomFactor:=_paintZoomPercent;
         _rasterViewer.Refresh();
         _rasterDlgFile.Bitmap:=0;
      end;
   finally
      UpdateMyControls();
   end;
   _miPagesInsertCurrentImageClick(sender);

   ILeadRaster.FreeDlg;
end;

In the pc where its execute have the file follows:

- ltr14n.dll, ltrpr14n.dll, ltrio14n.dll, ltrvw14n.ocx, ltrdc14n.dll, ltrtn14n.dll, ltrdf14n.dll y ltrdk14n.dll.

- content of folder redist -> OCR

I need some file more? I am putting something bad in the code?

Thank you.

 

 

Try the latest version of LEADTOOLS for free for 60 days by downloading the evaluation: https://www.leadtools.com/downloads

Wanna join the discussion? Login to your LEADTOOLS Support accountor Register a new forum account.

#2 Posted : Sunday, July 15, 2007 12:24:22 PM(UTC)

Adnan Ismail  
Guest

Groups: Guests
Posts: 3,034

Was thanked: 1 time(s) in 1 post(s)

Before you use any of the LEAD dialogs, you need to call the InitDlg method. Although your code seems to contain a call to this method, it is placed in the middle rather than the beginning of the code, and you are passing a strange value to it instead of INIT_WITHOUT_COLOR (0) or INIT_WITH_COLOR (1)

 

Also, can you tell me what build number (version info) of LEADTOOLS OCX and DLL files you have?

 
You cannot post new topics in this forum.
You cannot reply to topics in this forum.
You cannot delete your posts in this forum.
You cannot edit your posts in this forum.
You cannot create polls in this forum.
You cannot vote in polls in this forum.

Powered by YAF.NET | YAF.NET © 2003-2020, Yet Another Forum.NET
This page was generated in 0.191 seconds.