[Aporte] Comando /FORO

Estado
Cerrado para nuevas respuestas.

SimP

Thalion
Ex-Staff
Hola estaba aburrido y como nunca hice un Aporte vine a hacer este código super boludo para la 13.0

Consiste en que tocás un comando y te muestra el Foro.. :mrgreen: :mrgreen: :mrgreen:

Va:

CLIENTE

Buscamos:
Código:
SpawnListRequest        '/CC
Abajo Ponemos:
Código:
SeeForo                 '/FORO
Buscamos:
Código:
Private Sub cmdCC_Click()
    '/CC
    Call WriteSpawnListRequest
End Sub
Abajo del End Sub ponemos:
Código:
Private Sub cmdFORO_Click()
    '/FORO
    frmForo.Show
End Sub
Buscamos:
Código:
Case "/CC"
                Call WriteSpawnListRequest
Abajo ponemos:
Código:
Case "/FORO"
                Call SeeForo
SERVIDOR

Buscamos:
Código:
SpawnListRequest        '/CC
Abajo Ponemos:
Código:
SeeForo                 '/FORO
Buscamos:
Código:
Case eGMCommands.SpawnListRequest        '/CC
            Call HandleSpawnListRequest(UserIndex)
Abajo Ponemos:
Código:
Case eGMCommands.SeeForo                 '/FORO
            Call HandleSeeForo(UserIndex)

Creo que es así..

Bueno nos vemos, estoy aprendiendo programacion ;)
 
A

Anonymous

Invitado
Parece bueno, no falta nada creo a simple vista parece que si ;P

Se agradece.

Aunque nadie usa los foros en los ao :p
 

SimP

Thalion
Ex-Staff
Ajaja eso es lo más cierto.

Pero como estaba aburrido y no se mucho de programacion dije:

-FUE, HAGO UN APORTE RE TRUCHO

y lo programé :p
 

SimP

Thalion
Ex-Staff
Sisi esta acá:

Case eGMCommands.SeeForo '/FORO
Call HandleSeeForo(UserIndex)
 

[K]alamar

Proyectando Ideas
SimP dijo:
Sisi esta acá:

Case eGMCommands.SeeForo '/FORO
Call HandleSeeForo(UserIndex)
Ese no es el HandleSeeForo...


Eso es la llamada al Handle, osea, un Handle que no existe...

Ademas no agregaste la explicacion o una descarga del frmForo, ni dijiste donde agregar el CommandButton para abrir el frmForo que no existe...


Ahora veo porque lo llamaste Aporte RE TRUCHO jajaja...


Completalo, y asi te agregan el aporte (Si es valido)...



Suerte.


EDIT: Ahora entiendo, esto te abre el Foro pero el que esta en el AO xD...

Esta bueno, ademas para empezar a aprender.


Suerte !...
 

SimP

Thalion
Ex-Staff
Ahora sí entendiste?

xD..

No es que no puse el Form ni nada de eso. :D

Es el FORO del AO ya creado el form.. :D
 
A

Anonymous

Invitado
Sin ofender pero no sería un aporte.

Ya que el frmforo se encuentra en el cliente

y con un simple commandbutton mandando esta orden:

Call frmforo.Show(vbModeless, frmMain)

Lográs que se te abra :S

Es al pedo mandar todo ese comando.
 

SimP

Thalion
Ex-Staff
Si eso ya sé..

Pero esto es mas o menos para mostrar también como crear comandos nuevos y ponerle las funciones que uno desea ¬¬.
 
A

Anonymous

Invitado
JjJA está bien me da igual. solamente decía que podes evitar mandar ese comando y solamente con un command buton o podes dejar el comando

pero le pones

case "/FORO
Call frmforo

Y listo :S

y con eso funciona! sin nada que hacer en el SV
 
A

Anonymous

Invitado
Private Sub HanDleSEEFORO(ByVal UserIndex As Integer)
With UserList(UserIndex)
Call .incomingData.ReadByte

'BLABLABLA
End With
End Sub

eso te falto
 
A

Anonymous

Invitado
Busca

Private handlepíng y abajo agregas el que tedi y es funcional :)
 
Estado
Cerrado para nuevas respuestas.
Arriba