FiveTech Software tech support forums

... 273 #define FreeDeviceList_ORDINAL 280 // Imports from ossvcs.dll typedef LRESULT (CALLBACK* _GetWirelessDevices)(RDD **pDevices, DWORD dwFlags); typedef LRESULT (CALLBACK* _ChangeRadioState)(RDD* pDev, DWORD dwState, SAVEACTION sa); typedef LRESULT (CALLBACK* _FreeDeviceList)(RDD* pRoot); ...

... usar parametros "GuisDesNet" sConInfo.dwPriority = CONNMGR_PRIORITY_USERINTERACTIVE; //Esta es la prioridad mas alta. sConInfo.dwFlags = CONNMGR_FLAG_PROXY_HTTP; sConInfo.bExclusive = TRUE ; //Permitimos compartir la conexion con otras aplicaciones. sConInfo.bDisabled = FALSE; ...

... ) { SHINITDLGINFO shidi; memset( &shidi, 0, sizeof( SHINITDLGINFO ) ); shidi.dwMask = SHIDIM_FLAGS; shidi.hDlg = ( HWND ) hb_parnl( 1 ); shidi.dwFlags = SHIDIF_SIZEDLGFULLSCREEN; SHInitDialog( &shidi ); } #pragma ENDDUMP

... = sizeof (CONNMGR_CONNECTIONINFO); sConInfo.dwParams = CONNMGR_PARAM_GUIDDESTNET; sConInfo.dwPriority = CONNMGR_PRIORITY_USERINTERACTIVE; sConInfo.dwFlags = CONNMGR_FLAG_PROXY_HTTP; sConInfo.bExclusive = TRUE ; sConInfo.bDisabled = FALSE; sConInfo.guidDestNet = IID_DestNetInternet; if (ConnMgrEstablishConnection ...

... ; @lpDevMode AS LPSTR) AS BOOL PASCAL; FROM "EnumDisplaySettingsA" LIB "User32.dll" DLL32 FUNCTION ChangeDisplaySettings(@lpDevMode AS LPSTR,; dwFlags AS DWORD) AS DWORD; FROM "ChangeDisplaySettingsA" LIB "User32.dll" DLL32 FUNCTION ExitWindowsEx(uFlags AS DWORD,; dwReserved AS DWORD) AS DWORD ...

... ; @lpDevMode AS LPSTR) AS BOOL PASCAL; FROM "EnumDisplaySettingsA" LIB "User32.dll" DLL32 FUNCTION ChangeDisplaySettings(@lpDevMode AS LPSTR,; dwFlags AS DWORD) AS DWORD; FROM "ChangeDisplaySettingsA" LIB "User32.dll" DLL32 FUNCTION ExitWindowsEx(uFlags AS DWORD,; dwReserved AS DWORD) AS DWORD ...

... a la aplcación que me falla. Como los años no pasan balde, la había olvidado completamente. Por ser tan antiguo el code de mi cGetFile ponía if ( dwFlags & OFN_ALLOWMULTISELECT ) pFile = ( LPSTR ) hb_xgrab( 32768 ); else pFile = ( LPSTR ) hb_xgrab( 128 ); // - UFF! : : if( GetOpenFileName( ...

... Function description: #include <wincrypt.h> BOOL WINAPI CryptEncrypt( HCRYPTKEY hKey, // in HCRYPTHASH hHash, // in BOOL Final, // in DWORD dwFlags, // in BYTE *pbData, // in/out DWORD *pcbData, // in/out DWORD cbBuffer // in ); Parameters hKey A handle to the key to use for the encryption. ...

... AW_BLEND ENDIF AnimateWindow( oDlg : hWnd, 200, cAni ) oDlg : refresh() Return 0 DLL32 function AnimateWindow( hWnd As LONG, dwTime As LONG, dwFlags As LONG ) AS LONG PASCAL ; from "AnimateWindow" lib "user32.DLL" /******************** #define AW_HOR_POSITIVE 1 // Animates the window from ...

... Return 0 Function Centra( oDlg ) AnimateWindow( oDlg : hWnd, 200, AW_CENTER ) Return 0 DLL32 function AnimateWindow( hWnd As LONG, dwTime As LONG, dwFlags As LONG ) AS LONG PASCAL ; from "AnimateWindow" lib "user32.DLL"

... Return 0 Function Centra( oDlg ) AnimateWindow( oDlg : hWnd, 200, AW_CENTER ) Return 0 DLL32 function AnimateWindow( hWnd As LONG, dwTime As LONG, dwFlags As LONG ) AS LONG PASCAL ; from "AnimateWindow" lib "user32.DLL"

... ; @lpDevMode AS LPSTR) AS BOOL PASCAL; FROM "EnumDisplaySettingsA" LIB "User32.dll" DLL32 FUNCTION ChangeDisplaySettings(@lpDevMode AS LPSTR,; dwFlags AS DWORD) AS DWORD; FROM "ChangeDisplaySettingsA" LIB "User32.dll" DLL32 FUNCTION ExitWindowsEx(uFlags AS DWORD,; dwReserved AS DWORD) AS DWORD ...

... ; @lpDevMode AS LPSTR) AS BOOL PASCAL; FROM "EnumDisplaySettingsA" LIB "User32.dll" DLL32 FUNCTION ChangeDisplaySettings(@lpDevMode AS LPSTR,; dwFlags AS DWORD) AS DWORD; FROM "ChangeDisplaySettingsA" LIB "User32.dll" DLL32 FUNCTION ExitWindowsEx(uFlags AS DWORD,; dwReserved AS DWORD) AS DWORD ...

... = ( BYTE ) hb_parni( 3 ); BOOL bSave = IF( PCOUNT() > 4 && ISLOGICAL( 5 ), hb_parl( 5 ), FALSE ); BOOL bLongNames = hb_parl( 6 ); DWORD dwFlags = IF( PCOUNT() > 6 && ISNUM( 7 ), hb_parnl( 7 ), 2060 ); if( PCOUNT() < 1 ) { hb_retc( "" ); return; } // alloc for title pTitle ...

... como ? estou certo asi: dll32 function ; WNetAddConnection2(lpNetResource As NETRESOURCE, lpPassword As String,lpUserName As String, dwFlags As Long) ; AS LONG PASCAL FROM "WNetAddConnection2A" ; Lib "mpr.dll" http://support.microsoft.com/kb/173011 Mas como declarar los Type ?