Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: Powa en 31 Agosto 2009, 17:39 pm


Título: [Ayuda] De nuevo...
Publicado por: Powa en 31 Agosto 2009, 17:39 pm
Hola, necesitaria saber como hacer para que el boton de agrandar/achicar sea  bloqueado, osea que quede el de minimizar y el de salir, el de agrandar/achicar quede bloqueado.

Saludos.

Título: Re: [Ayuda] De nuevo...
Publicado por: .;. en 31 Agosto 2009, 17:43 pm
Simple:

MaxButton = False
MinButton = False

buscalos

Título: Re: [Ayuda] De nuevo...
Publicado por: Powa en 31 Agosto 2009, 20:40 pm
Cita de: P4|3L0 en 31 Agosto 2009, 17:43 pm
Simple:

MaxButton = False
MinButton = False

buscalos

Gracias.

¿Y como hago para que no puedan modificar el tamaño del programa?

Saludos.

Título: Re: [Ayuda] De nuevo...
Publicado por: cassiani en 31 Agosto 2009, 20:56 pm
Hola, juega con la propiedad "borderstyle" del formulario.

Título: Re: [Ayuda] De nuevo...
Publicado por: pungados en 31 Agosto 2009, 21:03 pm
lo más cavernicola que podes hacer es poner un timer que fije el tamaño jajaj xD

O en las propiedades del formulario, dentro de Border Style busca la de Fixed.

Título: Re: [Ayuda] De nuevo...
Publicado por: Powa en 31 Agosto 2009, 21:07 pm
Cita de: pungados en 31 Agosto 2009, 21:03 pm
lo más cavernicola que podes hacer es poner un timer que fije el tamaño jajaj xD

O en las propiedades del formulario, dentro de Border Style busca la de Fixed.

Si pero si le pongo Fixed no puedo minizar.

Saludos.

Título: Re: [Ayuda] De nuevo...
Publicado por: MCKSys Argentina en 31 Agosto 2009, 22:26 pm
Esto es mas complicado, pero funciona.
Código:
Option Explicit
Dim ManualResize As Boolean

Private Sub Form_Load()
ManualResize = False
End Sub

Private Sub Form_Resize()
If ManualResize Or (Me.WindowState = vbMinimized) Then Exit Sub
ManualResize = True
Me.Width = 4800
Me.Height = 3600
ManualResize = False
End Sub

Ahi dejas fijo el form en 3600x4800. Fijate que hay una bandera (ManualResize) que sirve para saber si el usuario redimensiona el form o lo haces tu.

Aparte, impide que el evento Resize se ejecute cuando cambias el Width y el Height del form con el codigo.

Saludos!



Título: Re: [Ayuda] De nuevo...
Publicado por: Powa en 1 Septiembre 2009, 00:55 am
Cita de: MCKSys Argentina en 31 Agosto 2009, 22:26 pm
Esto es mas complicado, pero funciona.
Código:
Option Explicit
Dim ManualResize As Boolean

Private Sub Form_Load()
ManualResize = False
End Sub

Private Sub Form_Resize()
If ManualResize Or (Me.WindowState = vbMinimized) Then Exit Sub
ManualResize = True
Me.Width = 4800
Me.Height = 3600
ManualResize = False
End Sub

Ahi dejas fijo el form en 3600x4800. Fijate que hay una bandera (ManualResize) que sirve para saber si el usuario redimensiona el form o lo haces tu.

Aparte, impide que el evento Resize se ejecute cuando cambias el Width y el Height del form con el codigo.

Saludos!




¿Alguna otra forma?

Título: Re: [Ayuda] De nuevo...
Publicado por: seba123neo en 1 Septiembre 2009, 02:03 am
WM_GETMINMAXINFO


Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines