FiveTech Software tech support forums

... HB_LONGLONG #define HB_LONGLONG long #define hb_storvnll hb_stornl #endif agora o erro eh outro ao clicar em start DLL FUNCTION Llama( cModel AS LPSTR, cPrompt AS LPSTR, pFunc AS PTR ) AS VOID PASCAL LIB "llama64.dll" https://uploaddeimagens.com.br/images/004/700/688/original/erro.png?1703921284

... --- i try to learn "C" but for these "Problem" my "C" Knowledge is to small my ANSI Version , using TCHAR / LPSTR , work but how with Unicode :?: need some help please

... // Must initialize first. Should return true lSmtpInit := SmtpInitialize(CSTOOLS9_LICENSE_KEY) DLL FUNCTION SmtpInitialize(license AS LPSTR, initdata AS LPSTR) AS BOOL ; PASCAL FROM "SmtpInitializeA" LIB hSmtp The license key is a define for a long string of random letters. ...

... _INT ) AS _INT PASCAL FROM "OpenComFiscal" LIB "winfis32.dll" DLL32 FUNCTION MandaPaqueteFiscal( nHandler AS _INT, cBuffer AS LPSTR ) AS _INT PASCAL FROM "MandaPaqueteFiscal" LIB "winfis32.dll" DLL32 FUNCTION UltimaRespuesta( nHandler AS _INT, cBuffer AS ...

Antonio Linares wrote:Dear Jimmy,

Remove this line:
LPSTR pStr;

and place it here:
[code=fw]   #else

ah, understand
thx for Tip

Dear Jimmy, Remove this line: LPSTR pStr; and place it here:   #else   {  // new      LPSTR pStr = WideToAnsi( FR->lpstrFindWhat );  // modified      hb_storvc ( ...

hi Antonio, At the top of your C code place this line: LPWSTR AnsiToWide( LPSTR cAnsi ); thx for Answer. still got Warning Warning W8075 .\\HB_FUNC.PRG 1092: Suspicious pointer conversion in function HB_FUN_SETGRIDQUERYDATA but i have to use #define UNICODE to ...

Dear Jimmy,

At the top of your C code place this line:

LPWSTR AnsiToWide( LPSTR cAnsi );

... [in, optional] LPSECURITY_ATTRIBUTES lpSecurityAttributes, it may work also if you supply a zero as the parameter value LPCWSTR can be declared as LPSTR as a wide string is also a string

Dear Jimmy, This is the definition of the struct LVCOLUMN from commctrl.h typedef struct tagLVCOLUMNA { UINT mask; int fmt; int cx; LPSTR pszText; int cchTextMax; int iSubItem; #if (_WIN32_IE >= 0x0300) int iImage; int iOrder; #endif #if _WIN32_WINNT >= 0x0600 int cxMin; // min snap ...

... IF URLDOWNLOADTOFILE( 0,cUrl , cZipFile) =0 lreturn := .t. else lreturn := .f. endif DLL FUNCTION URLDOWNLOADTOFILE( pCaller AS LONG, cUrl AS LPSTR, cFileName AS LPSTR, nReserved AS DWORD, nFnCB AS LONG ) AS LONG; PASCAL FROM "URLDownloadToFileA" LIB "urlmon.dll" but sometimes ...

... WEBVIEW_RUN( hWebView AS LONG ) AS VOID PASCAL FROM "webview_run" LIB hDLL DLL FUNCTION WEBVIEW_NAVIGATE( hWebView AS LONG, cUrl AS LPSTR ) AS VOID PASCAL FROM "webview_navigate" LIB hDLL DLL FUNCTION WEBVIEW_DESTROY( hWebView AS LONG ) AS VOID PASCAL FROM "webview_destroy" ...

... RETURN .T. FUNCTION ISWINXP() RETURN .T. //Faz abertura do dia // DLL32 FUNCTION LECTURA ( cPort AS LPSTR ) AS LONG PASCAL ; // FROM "IniPuertaStr" LIB oDp:nBemaDLL //DLL32 FUNCTION LECTURA( cPort AS STRING ) AS LONG PASCAL FROM "IniPuertaStr"; ...

... @nSectorsByCluster, @nBytesPerSector,                            // @nNumberOfFreeClusters, @nTotalNumberOfClusters --> lResult{   LPSTR lpRootPathName = hb_parc( 1 ); // Error en esta linea   DWORD SectorsPerCluster;   DWORD BytesPerSector;   DWORD NumberOfFreeClusters;  ...

... nPos ) DLL FUNCTION TF_GraphNextOperation( hGraph AS LONG, @nPos AS LONG ) AS LONG LIB hDLL DLL FUNCTION TF_OperationName( hOperation AS LONG ) AS LPSTR LIB hDLL DLL FUNCTION TF_OperationOpType( hOperation AS LONG ) AS LPSTR LIB hDLL DLL FUNCTION TF_OperationDevice( hOperation AS LONG ) AS LPSTR ...