Mensajes

Probá realizar primero un "formato rápido" y luego hacer un formato normal a ver si te lo permite.

Con qué code estás intentando hacerlo? y vemos de repararlo o darte otro mas eficiente, ya que sin nada deberíamos hacer todo de 0 y algunos no disponemos tiempo.


Saludos.

La manera sencilla:

Código (vbnet) [Seleccionar] Expandir

    Dim Fixed_Location As Point ' = New Point(X, Y) ' Seteamos el valor por defecto.

    Private Sub Form1_Shown(sender As Object, e As EventArgs) Handles MyBase.Shown
        ' ...O seteamos el valor por defecto cuando la ventana se haya creado.
        Fixed_Location = New Point(Me.Location.X, Me.Location.Y)
    End Sub

    Private Sub Form1_Move(sender As Object, e As EventArgs) Handles MyBase.Move
        If Me.Visible Then Me.Location = Fixed_Location
    End Sub

Después de hacerlo me he encontrado con el problema de que el layer de la ventana se sigue dibujando por la pantalla si se mantiene el botón del mouse para intentar arrastrarlo, es una cosa sin importancia, pero como me gusta la eficacia, al final he buscado la manera de hacerlo usando los mensajes de Windows:

(Este código no es mío)

Código (vbnet) [Seleccionar] Expandir

#Region " Cancel Move Form "

    ' Examples:
    ' Me.Moveable = False
    ' Me.Moveable = True

    Private Declare Function EnableMenuItem Lib "user32.dll" Alias "EnableMenuItem" (ByVal hMenu As IntPtr, ByVal uIDEnableItem As Int32, ByVal uEnable As Int32) As Int32

    Private bMoveable As Boolean = True

    Public Overridable Property Moveable() As Boolean
        Get
            Return bMoveable
        End Get
        Set(ByVal Value As Boolean)
            If bMoveable <> Value Then
                bMoveable = Value
            End If
        End Set
    End Property

    Protected Overrides Sub WndProc(ByRef m As Message)

        If m.Msg = &H117& Then
            'Handles popup of system menu.
            If m.LParam.ToInt32 \ 65536 <> 0 Then 'divide by 65536 to get hiword.
                Dim AbleFlags As Int32 = &H0&
                If Not Moveable Then AbleFlags = &H2& Or &H1&
                EnableMenuItem(m.WParam, &HF010&, &H0& Or AbleFlags)
            End If
        End If

        If Not Moveable Then
            'Cancels any attempt to drag the window by it's caption.
            If m.Msg = &HA1 Then If m.WParam.ToInt32 = &H2 Then Return
            'Redundant but cancels any clicks on the Move system menu item.
            If m.Msg = &H112 Then If (m.WParam.ToInt32 And &HFFF0) = &HF010& Then Return
        End If

        'Return control to base message handler.
        MyBase.WndProc(m)

    End Sub

#End Region

Saludos...

Lo probe y funciona de 10, gracias por el aporte Electro!

Saludos!

Yo todavía le guardo luto a mi difunto gatito llamado chino, desde el nunca mas volví a tener una mascota.

Si he de tener un mascota, no me gustaría elegirla, me gustaría que llegara a mi o yo a ella de forma casual o del destino, como le quieran llamar.
Saludos

Me paso algo similar con un perro, me re encariñe con el, como que me dejo marcado y no quise volver a tener mascota

Es feo tener que separarse de un ser querido, porque al menos yo lo tenia presente como tal

G Data combina el motor del avast con el del bitdefender, gana en todos los rankings, es como tener dos antivirus...

Y según av-comparatives.org AVIRA se queda al 0.01 %, "con solo un motor y sin dar tantos falsos positivos", cierto es que usan la versión premium ¿pero, lectores, saben qué la diferencia de la Free Edition? Solo una componente, el chequeo de gestor de email, que usando el webmail es como si no tuvieras esa componente.

Probaré.

Te guarda una lista de las vulnerabilidades encontradas por si ese mismo software lo tienes en otro equipo, que te descargues el kaspersky en el para reparalo.
Además es algo muy útil, imagínate que te descargas un skype con una vulnerabilidad que cualquiera puede acceder a tu ordenador mandándote un mensaje ( digo skype por poner un ejemplo de un software conocido) y lo instalas en 3 ordenadores distintos. Al tener la lista y verlo, irás a arreglarlo a los otros equipos también. A mi me parece algo muy útil aún que solo sea por curiosidad.
PD: Claro que no te la muestra como activa por que a desactivado la vulnerabilidad para que no la usen en tu contra. 
Un saludo.

Es cierto yo pienso que es efectivo eso que decis, lo que quiero entender es si está reparada ya no es una vulnerabilidad, por qué me detecta que tengo una (hasta hoy me sigue diciendo que hay una)

Según entiendo si mañana aparece otra, y la desinfecta luego me va a decir 2, entonces eso es un registro de vulnerabilidades y NO vulnerabilidades en si, por eso me mareo, en fin creo que es esto último.

Gracias che, saludos.

Si podés pasa el code de lo que tenés para ayudarte, sino enviame por MP por si no lo querés hacer público porque me late a que algo está interfiriendo y provoca el cierre.

Saludos.

No es un fallo, fíjate en la casilla de la esquina inferior izquierda, pone vulnerabilidades reparadas, clickea y ya ves la vulnerabilidad que YA corrigió kaspersky.

Si aparece, pero por qué me sigue detectando si supuestamente ya la reparó?
Lo peor no es encontrarla de nuevo, lo que veo mal es que no la muestra como activa.

La vulnerabilidad es esta:

Microsoft Internet Explorer: Restablecer página de incio.
No es necesario reparar
Reparar(boton deshabilitado), Revertir (boton habilitado), Detalles (boton habilitado)

Gracias gente

La propiedad FormBorderStyle en valor 0 quita el contorno del Formulario, por lo que no se puede mover, es una alternativa rápida, no se si querés algo mas elaborado y mantener los bordes y botones, habría que trabajar sobre algunos eventos cuando detecte movimiento, creo que es Form_Move no me acuerdo bien.


Saludos.

[Me.Hide()]

Hola, pues, tengo un problema, he estado probando a mostrar un Form que previamente he ocultado (con un Me.Hide()), pero no me deja...

Cuando le doy al boton de mostrar (Comando frmMain.Show())
Se muestra el frmMain por unos segundos y se vuelve a ocultar...

Un saludo.

Usá el comando Visible como dice el colega, pero si utilizas Hide o no para ocultarlo no importa, una vez el Form esté oculto, para mostrarlo otra vez hacelo aparecer con un Visible = True

Saludos.

Pasame por mensaje privado, un ejemplo del video que quisieras bajar, porque así lo comparo a ver si tengo lo mismo y estoy realizando el code sobre el link correcto (estéticamente hablando)

Si bien voy a ampliar el método no quiero que se me escape nada, gracias.


Saludos.