Borrar cartel con doble enter (TPAO Style)

» 27 Dic 2011 15:13

Bueno gente despues de tanto tiempo sin frecuentar el foro vuelvo para traerles este pequeño aporte, es muy facil pero para muchos sirve.
Ya que mi hermano me lo pidio para su servidor porque el que le pasaron por aca le generaba un bug en los comandos.

CLIENTE

En el frmMain buscamos

Mostrar Todo el Código | Numero de Linea | Ocultar/Mostrar | Seleccionar todo

Private Sub SendTxt_KeyUp(KeyCode As Integer, Shift As Integer)

Buscamos mas abajo donde dice

Mostrar Todo el Código | Numero de Linea | Ocultar/Mostrar | Seleccionar todo

        'Say
        ElseIf stxtbuffer <> "" Then
            Call SendData(";" & stxtbuffer)
 
        End If

Y agregamos arriba

Mostrar Todo el Código | Numero de Linea | Ocultar/Mostrar | Seleccionar todo

'Borrar cartel
ElseIf stxtbuffer = "" Then
Call SendData(";" & " ")

Eso es todo, muy facil pero eficiente y sin ningun bug

Saludos !

» 27 Dic 2011 15:17

Buen aporte, despues lo pruebo, y edito.

» 27 Dic 2011 15:38

No era mas facil que en la propiedad Text del TexBox colocar un espacio??

» 27 Dic 2011 15:40

Anda, se agradece :ok:

Slds.

» 27 Dic 2011 16:00

BiWolf escribió:No era mas facil que en la propiedad Text del TexBox colocar un espacio??

Nó, porque si creas un Text Box cuando hablas se ve el enter y para poner Comandos y demás no vas a poder,, y se bugearía,

Se agradece el código.

» 27 Dic 2011 16:55

Muy necesario para mi AO

Te doy un Buen aporte loco.

#

Este post ha sido eliminado por Cyrus en 27 Dic 2011 20:29.
Razón: La respuesta era un Offtopic, sin relación con la tematica.

» 27 Dic 2011 20:12

Gracias, lo implemente y me funciono, me gustan los codes simples y que funcionan en mucha variedad de svs. Se agradece

#

Este post ha sido eliminado por Cyrus en 27 Dic 2011 20:29.
Razón: Utiliza MP.

#

Este post ha sido eliminado por Cyrus en 27 Dic 2011 20:59.
Razón: La respuesta era innecesaria. No le agregaba nada nuevo al tema.

» 28 Dic 2011 00:27

Mira, edita con esto:

Para que no aparezca el espacio enviado en consola. (En caso de que tengan los mensajes en consola implementados)

En el servidor, en el case ";" buscan la parte donde manda el mensaje a la consola y ahí hacen un if que sería

Mostrar Todo el Código | Numero de Linea | Ocultar/Mostrar | Seleccionar todo

if rdata = " " Then
Cal senddata bla bla bla
End if

» 28 Dic 2011 00:31

BiWolf escribió:No era mas facil que en la propiedad Text del TexBox colocar un espacio??

No porque agregando un espacio en la propiedad del textbox enviaria siempre el espacio, incluso cuando envies un comando quedaria " /curar" y saldria como texto.
Lo que hace el code es que si no se escribio nada envie un espacio, una de las posibles soluciones para evitar bugs !

» 28 Dic 2011 01:41

Es funcional, pero podrias mejorarlo para no enviar el paquete.

Son pequeñas cosas que mejoran.

» 28 Dic 2011 11:23

Modificando el case hablar solucionaria lo del paquete ?

Borrar cartel con doble enter (TPAO Style)

¿Quién está conectado?