CHAT

NyquisT
07 de Octubre del 2004
Wenas!

Estoy programando un CHAT y surgieron tres problemas a los que no encontré una solución.

Hago una lista de ellos:

1. ¿Cómo hago que el ******* Scroll baje automaticamente al recibir datos y a su vez reproduzca un sonido (de lo posible son el MMControl), tanto en el Servidor como en el Cliente?

2. ¿Cómo lograr que el Servidor respete los colores del texto que fueron elegidos en el Cliente (y viceversa)?

3. ¿Cómo hacer que al pulsar la tecla "ENTER", estando posicionado en la caja de texto donde se escribe en cualquier CHAT, se "envie" el mensaje... o sea, que cumpla la misma función que el botón "Enviar"?

Ya se que son varias, pero agradeceria su ayuda. El VB nunca lo toqué, y hace poco que empecé con él.
Ya estuve leyendo algo, pero aún no le encuentro solución a estos 3 problemas.

Salu2

maxi
07 de Octubre del 2004
supongo que estas usando el control richtextbox

resp1
para que baje el scroll
rtb.selstart=len(rtb.text)
para reproducir un sonido usa esta api
solo reproduce archivos wav

Private Declare Function sndPlaySound Lib "winmm.dll" Alias "sndPlaySoundA" (ByVal lpszSoundName As String, ByVal uFlags As Long) As Long
Const SND_ASYNC = &H1
Const SND_NODEFAULT = &H2

sndPlaySound DireccionArchivo, SND_ASYNC Or SND_NODEFAULT

donde DireccionArchivo es una variable que contiene
una direccion de un archivo wav

para la tecla enter
en el evento keypress
escribe este codigo
if keyascii = 13 and len(rtb.text) > 0 then
cmdenviar_click
end if