Page 1 of 1
Obtener el Path actual
Posted: Fri Jul 01, 2016 9:36 pm
by abinfra
Hola, con Clipper utilizaba para obtener el path actual en la variable cVia:
cVia:=GETENV('PATH')
Si dejo esta instrucción, el path que me sale comienza por:
C:\ProgramData\Oracle\Java\javapatch;C:\Windows\system32;........
que no es el que debe salir.
Con HMG, como puedo obtener el Path.
Gracias y saludos cordiales.
Re: Obtener el Path actual
Posted: Fri Jul 01, 2016 9:38 pm
by danielmaximiliano
El Path actual
Re: Obtener el Path actual
Posted: Fri Jul 01, 2016 9:43 pm
by abinfra
Perdona Daniel, pero no entiendo tu respuesta.
Concretamente que instrucción debo poner en HMG para obtener el path en el que me encuentre cuando ponga la instrucción?
Re: Obtener el Path actual
Posted: Fri Jul 01, 2016 9:57 pm
by danielmaximiliano
Mirando la Referencia de HMG encuentras lo que necesitas Abinfra.
GetCurrentFolder() --> cCurrentFolder
Re: Obtener el Path actual
Posted: Fri Jul 01, 2016 10:04 pm
by abinfra
Perdona mi ignorancia Daniel.
He puesto:
cVia := GetCurrentFolder()
Y al enlazar me dice:
Error: función referenciada, no encontrada, pero desconocida: GETCURRENTFOLDER()
Re: Obtener el Path actual
Posted: Fri Jul 01, 2016 10:26 pm
by danielmaximiliano
Funciona :
Code: Select all
#include <hmg.ch>
Function Main
Local nTask
DEFINE WINDOW Win_1 ;
AT 0,0 ;
WIDTH 400 ;
HEIGHT 400 ;
TITLE 'Hello World!' ;
MAIN
END WINDOW
msgbox ("el directorio actual es "+ GetCurrentFolder(), "mensaje")
ACTIVATE WINDOW Win_1
Return
Re: Obtener el Path actual
Posted: Fri Jul 01, 2016 10:32 pm
by abinfra
Hola Daniel estoy programando en modo consola, la función GetCurrentFolder() funciona en modo consola?
Re: Obtener el Path actual
Posted: Fri Jul 01, 2016 11:30 pm
by danielmaximiliano
Si. es una funcion de Windows
Re: Obtener el Path actual
Posted: Fri Jul 01, 2016 11:37 pm
by pctoledo
cVia:=DiskName() + ":\" + CurDir()
Re: Obtener el Path actual
Posted: Sat Jul 02, 2016 3:13 am
by abinfra
Gracias.