A ver, quiero cambiar el midi del inicio, pero cuando modifico lo que está en negrita, no pasa nada... En dónde tengo que tocar para cambiar el midi que se reproduce apenas se abre el juego? :S
Private Sub Image1_Click(Index As Integer)
CurServer = 0
IPdelServidor = IPTxt
PuertoDelServidor = PortTxt
Call PlayWaveDS(SND_CLICK)
Select Case Index
Case 0
If Musica = 0 Then
CurMidi = DirMidi & "7.mid"
LoopMidi = 1
Call CargarMIDI(CurMidi)
Call Play_Midi
End If
Private Sub Image1_Click(Index As Integer)
CurServer = 0
IPdelServidor = IPTxt
PuertoDelServidor = PortTxt
Call PlayWaveDS(SND_CLICK)
Select Case Index
Case 0
If Musica = 0 Then
CurMidi = DirMidi & "7.mid"
LoopMidi = 1
Call CargarMIDI(CurMidi)
Call Play_Midi
End If
