topic-39252

Posts: 418

Joined: Wed Nov 26, 2008 06:33 PM

setenvironmentVariable() de xH a H
Posted: Sun Aug 09, 2020 05:59 PM

Saludos Foro

Esta función la usaba con xHarbour 1.2.3. y ahora con Harbour 3.0 me marca errores

#pragma BEGINDUMP

#include <windows.h>

HB_FUNC( SETENVIRONMENTVARIABLE )
{
   hb_retl( SetEnvironmentVariable( (LPCSTR) hb_parcx( 1 ),
                                     (LPCSTR) hb_parcx( 2 )
                                     ) ) ;
}
#pragma ENDDUMP

Warning W8065 MAUFUNC.PRG 166: Call to function 'hb_parcx' with no prototype in function HB_FUN_SETENVIRONMENTVARIABLE
Warning W8065 MAUFUNC.PRG 167: Call to function 'hb_parcx' with no prototype in function HB_FUN_SETENVIRONMENTVARIABLE
Warning W8065 MAUFUNC.PRG 168: Call to function 'hb_retl' with no prototype in function HB_FUN_SETENVIRONMENTVARIABLE
Error E2356 F:\Harbour\Include\hbapi.h 626: Type mismatch in redeclaration of 'hb_parcx'
Error E2356 F:\Harbour\Include\hbapi.h 686: Type mismatch in redeclaration of 'hb_retl'
Warning W8065 MAUFUNC.PRG 3693: Call to function 'hb_retl' with no prototype in function HB_FUN_VERCAPSLOCK
Warning W8065 MAUFUNC.PRG 3709: Call to function 'hb_retl' with no prototype in function HB_FUN_VERNUMLOCK
Warning W8065 MAUFUNC.PRG 3725: Call to function 'hb_retl' with no prototype in function HB_FUN_VERSCROLLOCK
Warning W8065 MAUFUNC.PRG 3741: Call to function 'hb_retl' with no prototype in function HB_FUN_VERINSERT

Lamentablemente respecto a funcione de xH y H, estoy perdido. Una ayuda....

Noé Aburto Sánchez
Tec. Prog. de Sistemas. -Morelia, Mich. México.
fwh 20.06, Harbour 3.2.0, bcc 7.4
TsBrowse 9.0, TsButton 7.0, xEdit 6.1
naburtos@gmail.com, noeaburto67@hotmail.com

noe aburto

Posts: 418

Joined: Wed Nov 26, 2008 06:33 PM

Re: setenvironmentVariable() de xH a H
Posted: Sun Aug 09, 2020 07:22 PM

Solucionado

solo agregue:

define "hbapi.h"

Noé Aburto Sánchez
Tec. Prog. de Sistemas. -Morelia, Mich. México.
fwh 20.06, Harbour 3.2.0, bcc 7.4
TsBrowse 9.0, TsButton 7.0, xEdit 6.1
naburtos@gmail.com, noeaburto67@hotmail.com

FiveTech Support Forums

Continue the discussion