SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: MindEye en Miércoles 4 de Febrero de 2004, 15:37

Título: Re: Como Imprimir Con El Printer, Un Cuadro Con Punta
Publicado por: MindEye en Miércoles 4 de Febrero de 2004, 15:37
- Me prodria decir alguien como puedo imprimir una cuadrado o rectangulo, que tenga las esquinas redondas.

 - Gracias
Título: Re: Como Imprimir Con El Printer, Un Cuadro Con Punta
Publicado por: Brroz en Miércoles 4 de Febrero de 2004, 16:56
En vez de imprimir una línea con BF, pinta 4 líneas a modo de cuadrado, pero sin que lleguen a juntarse, dejando entre ellas una separación igual al radio de la esquina redondeada. Utiliza luego el método Circle, una vez para cada esquina, indicando en los parámetros Inicio y fin el valor en radianes del angulo formado por el arco que deseas trazar.

Por ejemplo, este código dibuja en un PictureBox de (3800 x 3800 twips p.e.)  un cuadrado de esquinas redondeadas:  
Código: Text
  1.  
  2.    Const PI = 3.141516
  3.    Picture1.Cls
  4.    Picture1.Line (600, 100)-(3100, 100)
  5.    Picture1.Line (100, 600)-(100, 3100)
  6.    Picture1.Line (3600, 600)-(3600, 3100)
  7.    Picture1.Line (600, 3600)-(3100, 3600)
  8.    Picture1.Circle (600, 600), 500, , PI / 2, PI
  9.    Picture1.Circle (3100, 600), 500, , 0, PI / 2
  10.    Picture1.Circle (3100, 3100), 500, , 3 * PI / 2, 0
  11.    Picture1.Circle (600, 3100), 500, , PI, 3 * PI / 2
  12.  
  13.  

Chao.