Page 1 of 1
Dibujar cuadrado y linea
Posted: Fri Jun 22, 2007 3:14 pm
by jacgsoft
Alguien sabe la funcion que me permita dibujar un cuadrado o rectangulo dentro de un Dialog o Window, y tambien como dibujar una linea o separador?
Alguien tiene un ejemplo?
Att.
Jaime
Posted: Fri Jun 22, 2007 6:13 pm
by Armando
Jaime:
Dale una mirada a estas funciones
Rectangle( oDlg:hDC, nTop,nLeft,nBottom,nRight)
MoveTo(oDlg:hDC, nLeft, nTop - 6)
LineTo(oDlg:hDC, nLeft + nWidth, nTop - 6)
Saludos
Posted: Fri Jun 22, 2007 6:19 pm
by Armando
Jaime:
Aquí tienes una imagen para ver si es lo que necesitas
http://www.mediafire.com/imageview.php? ... gu&thumb=4
Saludos
Posted: Sat Jun 23, 2007 9:45 am
by antolin
Para dibujar lineas, rectángulos, etc. Lo mejor es meterlos en una function a la que llames con oDlg:bPainted := { |hDc| MiFuncion(hDc,...) }
El hDc es fundamental, si no lo llamas desde el bPainted debes activarlo/desactivarlo con oDlG:GetDc() / oDlg:ReleaseDc().
Espero te sea de ayuda.
Saludos