Page 1 of 1
Windows Média Player
Posted: Tue Jan 31, 2006 11:55 am
by karinha
// a sample managing a Delphi DLL from FiveWin!
#include "fivewin.ch"
FUNCTION Main()
LOCAL oWnd
DEFINE WINDOW oWnd TITLE "FiveWin - Delphi DLL connection"
@ 2, 2 SAY "Click me to run the CdPlayer"
ACTIVATE WINDOW oWnd ON CLICK CdPlay()
RETURN NIL
DLL FUNCTION CdPlay() AS VOID PASCAL LIB "cdplayer.dll"
Antonio, Porque Esto no Funciona Mas en 32 Bits?? O ke Hacer? Gracias, Saludos.
Posted: Tue Jan 31, 2006 3:31 pm
by Antonio Linares
João,
cdplayer.dll es una DLL de 16 bits. Habría que conseguir la equivalente en 32 bits.
Posted: Tue Jan 31, 2006 4:03 pm
by karinha
Antonio Linares wrote:João,
cdplayer.dll es una DLL de 16 bits. Habría que conseguir la equivalente en 32 bits.
Gracias Antonio, Por Favor, donde Puedo Encuentrar CdPlayer.Dll Para 32 bits? O no és Posible?
Posted: Tue Jan 31, 2006 6:04 pm
by Antonio Linares
João,
Puedes usar el OCX del Microsoft Media Player. Revisa el ejemplo samples\media.prg
Posted: Tue Jan 31, 2006 6:55 pm
by karinha
Antonio Linares wrote:João,
Puedes usar el OCX del Microsoft Media Player. Revisa el ejemplo samples\media.prg
Gracias Antonio, Pero no és lo ke jo kiero, asi, me trae el Windows Media Player Standard del Windows.
Jo kiero el Windows Media Player Completo. Mismo asi, Gracias.
Lo resolvi asi:
SEPARATOR
MENUITEM "CDPlay - Entretenimentos " ;
RESOURCE "COMPUTADOR" ;
ACTION( ( Click(), oTimer:DeActivate(), ;
WinExec("C:\Arquivos de Programas\Windows Media Player\wmplayer.exe" ) ), ;
oTimer:Activate() ) ;
MESSAGE ( "Chamar o Windows Media Player " ) + ;
( "Para Tocar Suas Musicas Favoritas e Videos." )
Gracias Por tu Atencion Antonio. Saludos.