IDE Unicode V1.2a

HMG en Español

Moderator: Rathinagiri

Post Reply
User avatar
danielmaximiliano
Posts: 2639
Joined: Fri Apr 09, 2010 4:53 pm
Location: Argentina
Contact:

IDE Unicode V1.2a

Post by danielmaximiliano »

Hola a Todos!!!!
desde hace bastantes dias vengo luchando para poder usar las librería libvlc.dll y libvlccore.dll usando libload() y dyncall() pero todo llevaba a mal puerto. Usando ChatGPT me puse a investigar sobre el comportamiento de Libload() en modo 64 bits y se llego a la conclusión de no utilizarlo y crear un nuevo VLC_LoadLib( "libvlc.dll" )

Code: Select all

IF ! VLC_LoadLib( libPath )
     ? "❌ Error: no se pudo cargar", libPath
      RETURN
   ENDIF
   ? "✅ libvlc.dll cargada correctamente."
✅ libvlc.dll cargada correctamente.


una vez cargada la DLL poder utilizar las funciones exportadas de la mismas en este caso

Code: Select all

// --- 4) Llamar a VLC_New()
   inst := VLC_New( NIL )
  
   IF inst == 0
      ? "⚠️ VLC_New devolvió NULL (0)."
      VLC_UnloadLib()
      RETURN
   ELSE
      ? "Instancia creada correctamente:", Hex64( inst )
   ENDIF
Instancia creada correctamente: 0x0000023EAB501700

Ya tengo resuelto todo pero encuentro que el IDE no me permite cargar un archivo .c en el proyecto, si cierro el proyecto y lo edito con Notepad++ y abro el proyecto desaparece del archivo proyecto.hbp
Captura de pantalla 2025-10-18 205459.png
Captura de pantalla 2025-10-18 205459.png (48.39 KiB) Viewed 88 times
esos son todos los archivos que se pueden agregar al proyecto :cry: , hay alguna otra forma de agregarlo o ya que si agrego

Code: Select all

#include "hmg.ch"
#include "vlc_bridge64.c"

#define CRLF  INetCRLF()

FUNCTION Main()
LOCAL cLib     := "libvlc.dll"
LOCAL cPlugins := ".\\plugins"
LOCAL cFile    := "video.mp4"

PUBLIC pMediaPlayer
PUBLIC cCurrentFolder :=  GetCurrentFolder()
PUBLIC oRTSP := RTSPConnection():New( "192.168.100.16", 554 )
PUBLIC pInst
PUBLIC lOk
   
   DEFINE WINDOW Main ;
el contenido de hb_out.log es esto
Application Internal Error - C:\Temp\Camera\Camera.exe
Terminated at: 2025-10-18 21:30:37
Unrecoverable error 9012: Can't locate the starting procedure: 'MAIN'
------------------------------------------------------------------------
*´¨)
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`. Harbour/HMG : It's magic !
(¸.·``··*

Saludos / Regards
DaNiElMaXiMiLiAnO

Whatsapp. := +54901169026142
Telegram Name := DaNiElMaXiMiLiAnO
User avatar
danielmaximiliano
Posts: 2639
Joined: Fri Apr 09, 2010 4:53 pm
Location: Argentina
Contact:

Re: IDE Unicode V1.2a

Post by danielmaximiliano »

Resolví encerrando al final de Main.prg el codigo .c

Code: Select all

#pragma BEGINDUMP
....... C code ......
#pragma ENDDUMP
*´¨)
¸.·´¸.·*´¨) ¸.·*¨)
(¸.·´. (¸.·` *
.·`. Harbour/HMG : It's magic !
(¸.·``··*

Saludos / Regards
DaNiElMaXiMiLiAnO

Whatsapp. := +54901169026142
Telegram Name := DaNiElMaXiMiLiAnO
Post Reply