Mensajes

Gracias, si lo he pensado mucho y ya hace un par de semanas que he empezado con C, ya que Python y VB los tengo bastante claros. Una pregunta, qué me dices de VBScript o Proyecto DHTML que viene integrado en la versión "FULL" de Visual Basic 6? Ya que con eso puedo crear documentos HTML.

Gracias nuevamente.

Bueno, miren estoy en una etapa de elección y de prueba, ando probando de todo... he tocado algo de C y C++, pero principalmente programo y los tengo bien claro Python y Basic (no .NET). No se, ustedes que me dicen? En qué lenguaje me centro? Mis intereses están en el entorno de Windows, por ahora. Estaba pensando en empezar un poco con .NET pero es muy parecido a VB6 así que no se si valdrá la pena. También he chequeado un poco C#, ya que me gusta lo Visual. Como verán no he mencionado nada de programación Web, si también pensaba en Java pero solo pensaba, nunca lo he tocado  . Pero bueno... los dejo a ustedes que comenten a ver que me vendría bien, también podría ser un lenguaje que no haya mencionado.

En realidad, no es el recorrer posiciones, si no recorrer posiciones, y en cada posición verificar el color del pixel en donde se encuentra el mouse...

Puedes crear un timer que realice la acción cada determinado tiempo de pasar un segundo o lo que sea, y aparte de ese timer realizas tu acción.

Saludos.

[La dirección solicitada no es válida en este contexto]

Hola, estoy creando un capturador de paquetes. Mi programa usa socket.py, funciona como servidor, recibe los paquetes y los imprime en pantalla (print). Esto funciona perfectamente, pero cuando quiero capturar paquetes de otro programa, coloco la IP a donde envía los paquetes así también los recibe mi programa, y me encuentro con el siguiente error:

Traceback (most recent call last):
   File "Servidor.py", line 8, in <module>
     s.bind(("xxx.xxx.x.xxx", xxxx))
   File "C:\Python27\lib\socket.py", line 224, in meth
     return getattr(self._sock,name)(*args)
socket.error: [Errno 10049] La dirección solicitada no es válida en este contexto

Bien, ese es el error TALCUAL, aclaro que el servidor al cual me conecto no está caido ni nada por el estilo.

Gracias.

Pues por ejemplo, que con un Bucle For recorra, con SetCursorPos, unas 175 posiciones.

Buenas a todos, simplemente una duda: Si yo tengo un bucle en Basic, que tarda, en realizar todo lo indicado, 5 segundos. Al ser C un lenguaje rápido, ese mismo bucle tardaría menos o no tiene nada que ver?  

Gracias¡

P.D: Es bucle For

Como dijieron, usá el control inet, cargando en la URL tu página y obteniendo el contenido del txt. Es fácil.

.
* Jamas uses los controles X como un amacen de datos... es algo que no se deberia de hacer; separa la parte grafica de la parte interna de tu programa...
* A razon de tu problema te dejo esta clase.

Quizas te sirva mi clase.
http://foro.elhacker.net/programacion_visual_basic/source_cpushsort-t340133.0.html

Dulces Lunas!¡.

No he entendido a que te refieres con el primer asterisco, gracias por la respuesta.

Tal vez te funcione llamándolo así

Indice = SendMessage(fMain.List1.hwnd, LB_FINDSTRINGEXACT, -1, ByVal Frase)

Todo depende de la declaración de SendMessage que tengas 

Exactamente eso necesitaba! Gracias! 

Saludos.

Buenas a todos, a continuación les dejo mi código el cual agrega a un listbox el color del píxel en donde se encuentra el mouse, al moverse el mismo. Para saber cuando se mueve he instalado un hook mediante SetWindowsHookEx, pero eso no es lo importante. El problema es que utilizo SendMessage, con la Constante LB_FINDSTRINGEXACT la cual busca una Cadena. Pero me estoy volviendo loco ya que hago una condición (sentencia if) la cual dicta que si devuelva False, la función que busca el Color en el listbox, no agregue al color obtenido. Esto para evitar que se me agreguen múltiples veces el mismo color, y después me vuelvo loco identificando cada uno. Pero no me devuelve false, o algún error estoy cometiendo en el código que no puedo identificar, por eso estoy aqui! He aquí el código:

La función que busca el string:

Código [Seleccionar] Expandir

Public Function Encuentra(Frase As String) As Boolean
 
Dim Indice As Long
     
    ' Tipo de búsqueda
    Indice = SendMessage(fMain.List1.hwnd, LB_FINDSTRINGEXACT, -1, Frase)
     
     
    If Indice < 0 Then
        'no se encontró
        Encuentra = False
    Else
        ' se encontró la frase entonces la selecciona
        Encuentra = True
    End If
   
End Function

Aquí donde se utiliza:

Código [Seleccionar] Expandir

Dim hdc As Long

    Call GetCursorPos(Mouse)

'Get Color
hdc = GetDC(0)
pxColor = GetPixel(hdc, Mouse.x, Mouse.y)
ReleaseDC 0, hdc

'Set color
Picture1.BackColor = pxColor


If Encuentra(Hex(pxColor)) = False Then
    List1.AddItem Hex(pxColor)
End If


Por algúna razón me agrega varias veces el mismo color encontrado, lo cual no debería, si es que lo encuentra en la condición planteada.

Gracias desde ya, saludos!