Zero MidiPlayer

[Zero 0]

Olá novamente!

Para não deixar a seção na mesmisse, aqui está uma nova DLL que eu desenvolvi! http://forum.otserv.com.br/style_emoticons/<#EMO_DIR#>/smile.gif

 

A Zero MidiPlayer possui uma propriedade e duas rotinas.

A propriedade é a File, ela armazena o caminho para o arquivo midi que será acessado.

 

Suas rotinas são: PlaySound() e StopSound(), e não possuem nenhum parâmetro!

 

Exemplo em VB 6:

Private Sub Command1_Click()  Dim ZMP As New ZMidiPlayer  ZMP.File = App.Path & "back.mid"  ZMP.PlaySound  ZMP.StopSoundEnd Sub

Nota¹: Não deve haver espaços na propriedade File!

Nota²: Por VB 6 não suportar Multithreading a aplicação ficará ocupada até a música acabar.

 

No download disponibilizo um arquivo back.mid que estou utilizando de fundo musical no meu projeto de game demo de batalha do Zelda!

 

Download:

 

Abraços!

[Canhao Revenger 0]

=X boiei nissu ai :S opAKOAkoa

[DuDz 0]

Para evitar flood, irei fechar o tópico.

 

O usuário já foi suspenso.

 

Fechado.

 

Abraços,

 

//DuD