FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Freeimage (Antonio)
Posts: 1048
Joined: Mon Oct 24, 2005 09:54 AM
Freeimage (Antonio)
Posted: Fri Oct 01, 2010 11:25 AM

Antonio, whe i use TIMAGE the freeimage.dll is required from FWH from start on. When this dll is not present, a errorbox is shown and the programm hangs in a loop!

Regards,
Günther
---------------------------------
office@byte-one.com
Posts: 1054
Joined: Sun Oct 09, 2005 10:41 PM
Re: Freeimage (Antonio)
Posted: Fri Oct 01, 2010 01:59 PM
Hi, put these lines to start your application:

Code (fw): Select all Collapse
Function Main()
local ......
local ......
If !FILE("freeimage.dll")
  MsgStop("FREEIMAGE.LIB NOT PRESENT","Error")
  Return(NIl)
EndIf
....
...
..
.

Regards
Posts: 1048
Joined: Mon Oct 24, 2005 09:54 AM
Re: Freeimage (Antonio)
Posted: Fri Oct 01, 2010 02:51 PM

Willi, i use this code! But FWH try to load the dll on beginn of the program when in the program TIMAGE is used!

Regards,
Günther
---------------------------------
office@byte-one.com
Posts: 117
Joined: Tue Jan 03, 2006 06:18 PM
Re: Freeimage (Antonio)
Posted: Sat Oct 02, 2010 04:53 AM
Dear byte-one,

please try :

Code (fw): Select all Collapse
function main()

 local ....
 
 
return nil 
//-------------------------

ini procedure begining()

    If !FILE("freeimage.dll")
        MsgStop("FREEIMAGE.LIB NOT PRESENT","Error")
        quit
    EndIf

return



Regards,

Kok

Continue the discussion