by IBTC » Sat Feb 05, 2011 12:54 pm
l.f. wrote:P.S. same result with with 10.7 and 10.8 and the apps are built correctly with bcc
Hi Lorenzo,
If you want to link and test your app build with MinGW (without your functions which needs RichEdit, ActiveX) insert e.g. this:
- Code: Select all Expand view
FUNCTION REDLLVERSION(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REGETPARAFORMAT(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REGETBULLET(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REGETCHARFORMAT(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REGETHIGHLIGHT(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REGETNUMBERING(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REGETZOOM(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REINSERTPICTURE(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RELEN(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REPAGEBREAK(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REPASTESPECIAL(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESAVEASRTF(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETFONTNAME(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETFONTSIZE(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETHIGHLIGHT(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETOLEINIT(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETOLEUNINIT(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETOLECALLBACK(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REGETOLEINTERFACE(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETPOS(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETSELECTION(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETTEXTCOLOR(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETZOOM(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETCHARFORMAT(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REFINDTEXT(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REGETINDENT(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REGETPARAGRAPH(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REGETSELECTION(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION LOCKWINDOWUPDATE(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RELOADASRTF(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REGETNMHDRLINK(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REPREVIEW(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REPRINT(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION REPRINTBOX(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETPARAFORMAT(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETATTRIBUTE(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETAUTOURLDETECT(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETBULLET(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETINDENT(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETNUMBERING(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION RESETPARAGRAPH(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION ACTXGETPROPERTY(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION ACTXPDISP(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION ACTXSETLOCATION(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION ACTXSETPROPERTY(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION ACTXSTRING(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION CREATEACTIVEX(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION ACTXINVOKE(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION ACTXEVENTS(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION ACTXEND(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION ISACTIVEX(); DUMMY(PROCNAME(1)); RETURN(NIL)
FUNCTION FWCallDll(); MsgInfo( "DLL-Call "+ProcName(1)+" not (yet) available." ); RETURN(0)
FUNCTION DUMMY( cName ); MsgStop( "Function "+cName+' not available.'); RETURN(NIL)
If you use Harbour you can use e.g. instead of:
- Code: Select all Expand view
DLL32 Function GetDriveTypeA( cDrive AS STRING ) AS LONG PASCAL FROM "GetDriveTypeA" LIB "kernel32.dll"
this:
- Code: Select all Expand view
FUNCTION GetDriveTypeA( cDrive ); RETURN( DllCall( "kernel32.dll", DLL_OSAPI, "GetDriveTypeA", cDrive ) )
Best Regards,
Ruediger Alich
---
HMG 3.1.3 | FTDN/FWH 13.12 | Harbour 3.2 | BCC/MinGW | Windows XP/Vista/7/8/10 (32/64-Bit), Wine (Linux/Mac) - started 1999 with FW, 1989 with Clipper