Programación General > VBA

 Como Posicionar Un Formulario

(1/1)

seba_m:
Buenas, una vez más soy yo, les comentio que se me ocurrio una manera alternativa al tooltiptext, pero necesito algo , el tema es asi, dibujo en un formulario un control picture box cuadrado, y le agrego una imagen bmp, el tema es qe cuando pongo el puntero del mouse sobre el control necesito que aparezca unn formulario y que al sacarlo del control desaparezca, el tema se me presenta cuando pongo el puntero del mouse sobre el control picturebox, ya que el fomulario apareze en cualquier lugar de la pantala, y lo que quiero lograr es que aparezca la esquina superior izquierda del formulario sobre el medio del pcturte box, espero haberme podido esplicar.

Desde ya muchas gracias

Shiquilla:

--- Código: Text ---    Form1.Top = Me.Top + Image.Top    Form1.Left = Me.Left + Image.Left    Form1.Show 
Saludos,

seba_m:
Hola, gracias por tu respespuesta pero por algúna razón no funciono, te adjunto una imagen de lo qu intento lograr,
El tema es así, cree un formulario sin borde ni nadas, y en otro formulario un picturebox, la idea de que al hacer click sobre el picture box, el formulario aparezca de tal forma que la esquina superior izquuierda aparezca en el medio de picture bos, sempre, ty nno en otro sitio.
Desde ya muchas gracias, te dejo mi msn por si las dudas


seba_m@arnet.com.ar

Gracias nuevamente

Shiquilla:
En el Form1:


--- Código: Text ---Option Explicit Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)    Form2.msDescargarFormularioEnd Sub Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)   Form2.Top = Me.Top + Y + Picture1.Top + 300   Form2.Left = Me.Left + X + Picture1.Left   Form2.ShowEnd Sub 
En el Form2:

--- Código: Text ---Option Explicit Public Sub msDescargarFormulario()    On Error Resume Next    Unload Me    On Error GoTo 0End Sub 
Saludos,

Navegación

[0] Índice de Mensajes