[APORTE] Resolucion el Cliente (FenixAO)

[KenJiN] · 06-nov-2008, 17:16

Aca les dejo el codigo de cuando abris el Cliente te pregunta si queres la resolucion a determinada medida.

Es muy facil, incluye Screenshot.

Todo en el CLIENTE

Buscamos:

Código:

 
Public Sub IniciarObjetosDirectX()
On Error Resume Next

Debajo ponemos:

Código:

 
 
If MsgBox("¿Desea Reproducir el Juego en Pantalla Completa?", vbQuestion + vbYesNo, "Resolución") = vbYes Then
        NoRes = 0
        Call WriteVar(App.Path & "/Init/Opciones.opc", "CONFIG", "ModoVentana", 0)
    Else
        NoRes = 1
        Call WriteVar(App.Path & "/Init/Opciones.opc", "CONFIG", "ModoVentana", 1)
    End If

Screenshot:

Luque · 06-nov-2008, 22:28

muy buena aporte corto y,facil y efectivo

**Lobby** · 06-nov-2008, 23:36

Jaja ése código es excelente, sirve muchísimo.

Siempre me jodió tener que entrar al **** AOSetup -.-'

fechh · 12-nov-2008, 15:01

donde estaria esto ::

Public Sub IniciarObjetosDirectX()
On Error Resume Next

Gracias, muy útil !

[KenJiN] · 12-nov-2008, 22:36

Busca:

Public Sub IniciarObjetosDirectX()

Con solo buscar eso encontras lo demas

Herramientas
Mostrar Versión Imprimible Enviar por Correo
Desplegado
Mode Lineal Cambiar a Modo Hibrido Cambiar a Modo Hilado

Remove advertisements Sponsored links

Secciones de Interés