Mensajes

Y como hago que las firmas coincidan? xD

Que son las firmas?

Lo del puntero seguro, el delegado, no me ha quedado muy claro...
Esto es mas difícil que vete tu a saber que cosa... xD



Esto es epico, si pongo este trozo de code:

Código [Seleccionar] Expandir

 
    Private Sub WebBrowser1_MouseDown(ByVal sender As Object, ByVal e As HtmlElementEventArgs)
        If e.MouseButtonsPressed = Windows.Forms.MouseButtons.Left Then
            MsgBox("Botón izquiero presionado")
        End If

No me sale ningún error

[does not have a signature compatible with delegate]

Hombre soy muy newbie y esos errores son nuevos, así que no se que hacer al respecto... Seguramente, la próxima vez no tenga que preguntar nada.
PD: De los errores se aprende...

Otro error:

Error   2   Method 'Private Sub WebBrowser1_MouseDown(sender As Object, e As System.Windows.Forms.MouseEventArgs)' does not have a signature compatible with delegate 'Delegate Sub HtmlElementEventHandler(sender As Object, e As System.Windows.Forms.HtmlElementEventArgs)'.   C:\Users\Alvaro\Documents\IkillLauncher\IkillLauncher\frmMain.vb   31   83   IkillLauncher

A mi el error que me pongas me suena a chino, habrá que ir aprendiendo de donde salen. Soy primerizo...

PD: Voy a intentar entender algo:

does not have a signature compatible with delegate

no tiene una firma compatible con el delegado

Quien es el delegado? xD

PD: Soy muy lioso...

Un saludo.  



Ahhhh Vale... xD No se a lo que se refería cuando decía que El evento MouseMove no es válido para este control ActiveX

Examine the corresponding parameters and, if they are present, return types to determine which pair is not compatible.

Pero ayúdame con mi topic no? xDDD



PD: Te recomiendo que uses sombras con Photoshop:



Como puedes observar no hay ningún borde robusto...  

Puedes usar un proxy para ir de vacaciones

Lel, también es verdad...
PD: En un principio no había pillado a que te referías... xD

Yo creo que es algo así como lo de la obsolescencia programada...

Vi un documental en el que le metían un chip a una impresora para que a las X impresiones el cabezal se llenase de tinta y no pudiese imprimir más...

Yo creo que es algo así.

Este es el documental: http://www.youtube.com/watch?v=chJT_uxSqNk
Pero está bloqueado en España. 

El picture se llama MyBase?  
PD: Soy bastante noob/newbie. xD



A ver, si nos entendemos, ese code es para solo el Form, yo necesito algo que me vaya con un WebBrowser...

Si es que estoy invadiendo un post... Ayudadme por el mio... 

Se supone que lo que voy a tratar de hacer es

Quitar el formulario,

FormBorderStyle = None
y añado funciones de mover formulario desde la imagen

Yo justamente necesito ayuda con un WebBrowser cabrón, me podrías ayudar? xD  
PD: Me refiero para mover el formulario desde el mismo.

[HardDisckCentinel.]

Hola, de las opciones que planteas, esa es la correcta.

El encender y apagar repetidamente un HDD, merma, a la larga su duración, la info de los reinicios queda grabada en la PCB y acorta la perfomance de dicho HDD, lo puedes comprobar con HardDisckCentinel..


Salu2.

Sí, pero tu piensa un momento...
Si los tienes en medio-standby, no se calentarán mucho, pero si están haciendo cosas pues como que se lo va a cargar igualmente...

Cuando los dejas encendidos, hacen algo o solo están encendidos?

Si es la primera opción (están haciendo cosas todo el rato), haz lo que te dije yo, o ponle a los pobres unos ventiladores
Si es la segunda opción (no hacen nada), pues dejalos encendidos todo el día....

Yo pienso que un HDD es como el caso contrario a un Cargador de portatil, cuanto más lo renicies más te lo vas a cargar... Le vas acortar vida como dice simorg.... Pero si lo dejas encendido todo el día, si estñan en stand-by que le puede pasar?

(Se van a estropear más lentamente que si los renicias, o si los dejas encendidos y haciendo cosas)

No se si te ha quedado claro... XD

En mi opinión las dos cosas son malas, es decir deberías hacer una mezcla y no tener todo el día los discos encendidos, si no, encenderlos por ejemplo, medio día o 16 horas y apagarlo lo que quede de día. Y así, te durarán más...

PD: Si apagas el ordenador se apagan los HDS? o van por otro lado? No me quedo muy claro... 

Un saludo.

[Hola,]

Hola, tengo mi WebBrowser que muestra una imagen con marquee infinito; quiero saber si es posible mediante este código transformarlo en el WebBrowser1 que es el control de mi WebBrowser...

Código (vbnet) [Seleccionar] Expandir

Option Explicit On
Option Strict On

Public Class Form1
   ' variables
   Private x As Integer
   Private y As Integer
   Private mover As Boolean

   Private Sub Form1_MouseDown( _
       ByVal sender As Object, _
       ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseDown

       If e.Button = Windows.Forms.MouseButtons.Left Then
           ' habilitar el flag
           mover = True
           ' guardar las coordenadas
           x = e.X
           y = e.Y
           ' cambiar el cursor del mouse
           Me.Cursor = Cursors.NoMove2D
       End If
   End Sub

   Private Sub Form1_MouseMove( _
       ByVal sender As Object, _
       ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseMove

       If mover Then
           ' establecer la nueva posición
           Me.Location = New Point((Me.Left + e.X - x), (Me.Top + e.Y - y))
       End If

   End Sub

   Private Sub Form1_MouseUp( _
       ByVal sender As Object, _
       ByVal e As System.Windows.Forms.MouseEventArgs) Handles Me.MouseUp
       ' reestablecer
       mover = False
       Me.Cursor = Cursors.Default
   End Sub
End Class

Cual es el problema?
Lo he intentado cambiando Form1 por WebBrowser1 y lockeando el mismo WebBrowser, pero cuando voy a arrastrar el Form, lo que arrastro  es la imagen que lleva el WebBrowser dentro, es decir lo que está mostrando...

Alguna idea?

Un saludo.



He estado modificando un poco el código:

Código (vbnet) [Seleccionar] Expandir

   Private Mover As Boolean = False
   Private p_Mouse As Point = Nothing

   Private Sub WebBrowser1_MouseDown( _
       ByVal sender As Object, _
       ByVal e As System.Windows.Forms.MouseEventArgs) _
           Handles WebBrowser1.MouseDown

       Me.Cursor = Cursors.Hand
       Mover = True
       ' guarda rl el x e y donde se hizo clic
       p_Mouse.X = e.X
       p_Mouse.Y = e.Y
   End Sub

   Private Sub WebBrowser1_MouseMove( _
       ByVal sender As Object, _
       ByVal e As System.Windows.Forms.MouseEventArgs) _
       Handles WebBrowser1.MouseMove

       If Mover Then
           ' referencia al control
           Dim unControl As Control = CType(sender, Control)

           ' cambiar las coordenadas
           Dim p1 As Point = unControl.PointToScreen(e.Location)

           Dim p2 As Point = unControl.Parent.PointToClient(p1)

           ' asignar el left y el top - laposición del mouse donde se hizo clic
           unControl.Left = p2.X - p_Mouse.X
           unControl.Top = p2.Y - p_Mouse.Y

       End If

   End Sub

   Private Sub WebBrowser1_MouseUp( _
       ByVal sender As Object, _
       ByVal e As System.Windows.Forms.MouseEventArgs) Handles WebBrowser1.MouseUp
       ' cambiar el  cursors
       Me.Cursor = Cursors.Default
       ' flag para mover el control
       Mover = False
   End Sub

Pero me sale este error, y no se porqué:



He estado buscando información, pero no he encontrado nada... Soy muy noob, o soy retarded xD





Lo mismo pasa si uso este code:

Código (vbnet) [Seleccionar] Expandir

    Dim oPoint As New System.Drawing.Point
    Dim posicionX, posicionY As Integer

    Private Sub WebBrowser1_MouseDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles WebBrowser1.MouseDown
        If e.Button = MouseButtons.Left Then
            'resta la posición del control que manda a la posición de la forma...
            posicionX = Control.MousePosition.X - Me.Location.X
            'centro del control.
            posicionY = Control.MousePosition.Y - Me.Location.Y
        End If
    End Sub

    Private Sub WebBrowser1_MouseMove(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles WebBrowser1.MouseMove
        If e.Button = MouseButtons.Left Then
            oPoint = Control.MousePosition
            oPoint.X -= (posicionX)
            oPoint.Y -= (posicionY)
            Me.Location = oPoint
            My.Settings.Save()
        End If
    End Sub