PC SOFT

FOROS PROFESIONALES
WINDEVWEBDEV y WINDEV Mobile

Inicio → WINDEV 2024 → How do you do this in Windev
How do you do this in Windev
Iniciado por patrick, 18,dic. 2003 12:22 - No hay respuesta
Publicado el 18,diciembre 2003 - 12:22
Hello,
i'm rewriting some VB6 stuff into Windev 7.5
For one of the components that i'm using, i need to register the components by means of a procedure.
This is the way it looks in VB :
Declare Function LoadLibrary Lib _
"kernel32" Alias "LoadLibraryA" (ByVal lpLibFileName As String) As Long

Public Declare Sub RegisterMMTOOLSX Lib _
"mmtoolsx2.ocx" Alias "RegisterPackage" (ByVal Package As String)

Public Sub RegisterPackages()
If LoadLibrary("MMTOOLSX2.OCX") Then
RegisterMMTOOLSX ("{81BC82}") 'Basic
RegisterMMTOOLSX ("{1BC82}") 'Wave
RegisterMMTOOLSX ("{1BA81}") 'Visual
RegisterMMTOOLSX ("{81BE83}") 'Mpeg
End If
End Sub

Now how do you do this in Windev ?
Best regards,
Patrick

Carmen