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 - aaronduran2

#321
Las películas de Dragon Ball Z en castellano (España), y a poder ser por torrent.

Gracias.
#322
El caso es que acabo de instalar los drivers originales que venían con el ordenador, descargados desde la página de Compaq, y mejoró mucho el rendimiento :xD
#323
Vale, gracias por la ayuda.

Saludos.  ;)
#324
Juegos y Consolas / Problema con todo tipo de juegos
23 Diciembre 2008, 15:05 PM
Hola. Si este tema no va aquí por favor cambiadlo. Tengo un AMD Athlon 64 X2 Dual Core Processor+ 2.10 GHz, con 2 GB de RAM, y una tarjeta de vídeo NVIDIA GeForce 6150SE nForce 430 de 1GB de memoria. Cuando lo compré venía con Vista, y juegos como SW Battlefront II funcionaban con la calidad de gráficos alta, pero después instalé XP y ahora volví a Vista. El problema es que ningún juego puede tener los gráficos a un alto nivel, todos deben tenerlos bajos, porque sino se ralentiza mucho. Tengo instalados todos los drivers, pero no me explico que puede pasar.

¿Alguien puede ayudarme?

Gracias de antemano.
#325
Programación Visual Basic / Re: Ayuda please
3 Diciembre 2008, 19:53 PM
Prueba con la coma en vez del punto.
#326
Programación Visual Basic / Re: Ayuda please
3 Diciembre 2008, 19:44 PM
Este es el subforo de VB6, no el .NET.
#327
El problema es que tienes que especificar un argumento en el argumento Color, y al ser RGB, deberás poner tres argumentos (R As Long, G As Long, B As Long) para que puedas personalizarlo.
Código (vb) [Seleccionar]

Public Function Establecer_Color_Menu( _
     ByVal hwndfrm As Long, _
     ByVal R As Long, ByVal G As Long, ByVal B As Long, _
     ByVal SubMenu As Boolean) As Boolean

     Dim Mi As MENUINFO
     Dim flags As Long
     flags = MIM_BACKGROUND

If SubMenu Then
         'si queremos establecer el color al submenú
         'debemos asignarle esta constante al Flag
         flags = flags Or MIM_APPLYTOSUBMENUS
End If

     'Llenamos la estructura MENUINFO
     With Mi
         'Tamaño de la estructura
         .cbSize = Len(Mi)
          'Flag para  determinar el submenu
         .fMask = flags
          'Le enviamos este color a esta variable
          .RhbrBack = CreateSolidBrush(RGB(R, G, B))
     End With
End Function


Saludos  ;)
#328
Pero este código es para VB .NET y este es el subforo de VB6, por lo que los códigos que te pusieron arriba son los correctos.

Saludos.  ;)
#329
Probamos con diferentes puertos y no iba ninguno, ni siquiera mostraba nada. Luego probamos con el 21, y después de conectar (aparecía un mensaje confirmándolo) se desconectaba repentinamente (avisando con otro mensaje).
#330
Lo probé junto a él y no es que de error en el código, es que salta una ventana diciendo que no se puede conectar. Probamos con un puerto y conectó, pero desconectó al instante.