Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - Kizar

#221
Programación Visual Basic / Re: Skin en VB
21 Marzo 2006, 20:18 PM
Por aora estoy apañandome con las que trae el CIA y estoy haciendo una...
#222
Programación Visual Basic / Re: Skin en VB
21 Marzo 2006, 20:05 PM
Con el ActiveSkin estoy bien, a mi si que me gusta y las dependencias me dan igual ya que es el editor y viene con el ocx en la carpeta.
Sigo preguntando que si alguno sabe donde puedo conseguir skins para ese programa...
#223
Programación Visual Basic / Re: Skin en VB
21 Marzo 2006, 08:05 AM
Es el que estoy usando yo el activeskin 4.3, en fin me tendre que conformar con eso, porke no hay donde eleguir....

Sabes aluguna pagina para descargarme skins para ese progrma?

Salu2
#224
http://www.vbaccelerator.com/codelib/gfx/savejpeg.zip
http://heliso.tripod.com/programm/jpeg/jpeg.htm

En google tienes muchisimos ejemplos....
Salu2

PD: Si encuentras alguno para convertir a png (codigo no dll) eso si que me interesaria.
#225
Ya puestos posteo lo que encontre.


Private Declare Function mciSendString Lib "winmm.dll" Alias _
  "mciSendStringA" (ByVal lpstrCommand As String, ByVal _
  lpstrReturnString As String, ByVal uReturnLength As Long, _
   ByVal hwndCallback As Long) As Long


Public Function PlayMidiFile(MidiFile As String) As Boolean

'MidiFile = File's Full Path
'Returns: True if successful, false otherwise

Dim lRet As Long

On Error Resume Next

If Dir(MidiFile) = "" Then Exit Function
'Stop any currently playing .mid
lRet = mciSendString("stop midi", "", 0, 0)
lRet = mciSendString("close midi", "", 0, 0)

'Play
lRet = mciSendString("open sequencer!" & MidiFile & " alias midi", "", 0, 0)
lRet = mciSendString("play midi", "", 0, 0)
PlayMidiFile = (lRet = 0)
End Function

Public Function StopMidi() As Boolean

'Stops midi from playing
'Returns: True if successful, false otherwise

Dim lRet As Long

On Error Resume Next

'Stop any currently playing .midi
lRet = mciSendString("stop midi", "", 0, 0)
StopMidi = (lRet = 0)
lRet = mciSendString("close midi", "", 0, 0)


End Function

#226
Programación Visual Basic / Re: Skin en VB
20 Marzo 2006, 19:58 PM
Me referia a algun activex que cambiara la apariencia pror completo, botones, formulario.....
#227
Programación Visual Basic / Re: Skin en VB
19 Marzo 2006, 23:11 PM
El vbskinner solo cambia el formulario no los botones y demas.... Hay alguno mas?
O alguien tiene el ActiveSkin completo registrado?
#228
Programación Visual Basic / Skin en VB
19 Marzo 2006, 19:09 PM
Para las skins en vb estoy utilizando el programa ActiveSkin 4.3 pero cada vez que inicio el programa me recuerda que es uan version de prueba...
Ademas es muy malo, los labels y las imagenes no se ven y solo cambia la apariencia de algunas cosillas
Hay algun programa que me permita poner una skin que sea gratuito o mejor que este?

Salu2
#229
Programación Visual Basic / Reproducir MIDI
19 Marzo 2006, 12:09 PM
He estado mirando codes y demas y para reproducir los MIDI se necesita el directx, se podria hacer de otra manera, aunque sea con una dll...
O algun programa para convertir de MIDI a WAVE para reproducirlo con las apis.
Salu2
#230
Programación Visual Basic / Re: exe-jpg
19 Marzo 2006, 12:05 PM
Lei algo acerca de que el CMD no abre los archivos por la extension sino por el contenido, en ese caso da igual la extension que le pongamos a un archivo si es un exe se abrira como aplicacion... El caso es que hay que conseguir que lo abra con la consola.....

Salu2