Creación de Objetos Elípticos

Esto es para hacer Forms o cualquier otro objeto elíptico.

La primera función es para definir una región, esta función parece devolver un Handle (El Handle de la región que se generó, esta parece ser un objeto dentro de Windows).

Y la segunda llamada es para decirle a Windows que a tal Form u objeto se le aplique esa región. En la segunda llamada hay que enviarle el Handle del Form u objeto que queremos sea elíptico y el Handle de la región que nos devolvió la primera llamada.

Declare Function CreateEllipticRgn Lib "gdi32" Alias "CreateEllipticRgn" (ByVal X1 As Long, ByVal Y1 As Long, _
         ByVal X2 As Long, ByVal Y2 As Long) As Long 
Declare Function SetWindowRgn Lib "user32" Alias "SetWindowRgn" (ByVal hWnd As Long, ByVal hRgn As Long, _ ByVal bRedraw As Boolean) As Long

Enviado por Mariano

Anuncios

Responder

Introduce tus datos o haz clic en un icono para iniciar sesión:

Logo de WordPress.com

Estás comentando usando tu cuenta de WordPress.com. Cerrar sesión /  Cambiar )

Google photo

Estás comentando usando tu cuenta de Google. Cerrar sesión /  Cambiar )

Imagen de Twitter

Estás comentando usando tu cuenta de Twitter. Cerrar sesión /  Cambiar )

Foto de Facebook

Estás comentando usando tu cuenta de Facebook. Cerrar sesión /  Cambiar )

Conectando a %s