[Gambas-user] Drawing
javier romero
cjro99 at ...67...
Mon Apr 24 15:36:41 CEST 2006
Ok, thanks, its works but the print is very small, i try scaling with this:
draw.Begin(printer)
draw.drawing(p1,350,350, Printer.Width, Printer.Height)
draw.End
but dosent works the print is the same, little, i try then with
draw.Begin(printer)
draw.drawing(p1,350,350, p1.Width, p1.Height)
draw.End
and the same, very little, in both dont change
How i scale?
sorry about my very bad english
Regards
Javier
----------------------------------------
> From: christian.faurebouvard at ...357...
> To: gambas-user at lists.sourceforge.net
> Subject: Re: [Gambas-user] Drawing
> Date: Sat, 22 Apr 2006 17:50:15 -0400
>
> El Viernes 21 Abril 2006 09:48, javier romero escribió:
> > PUBLIC p1 AS Drawing
> > PUBLIC pag AS DrawingArea
> >
> > PUBLIC SUB _new()
> > p1 = NEW Drawing
> > draw.Begin(p1)
> > draw.Text("Hello", 0, 0)
> > draw.End
> >
> > END
> >
> > PUBLIC SUB Form_Open()
> >
> > pag = NEW DrawingArea(sv1)
> >
> > pag.Cached = TRUE
> > pag.Clear
> > pag.BackColor = color.White
> > pag.Width = printer.Width
> > pag.Height = printer.Height
> > pag.Border = 1
> > draw.Begin(pag)
> > draw.Drawing(p1, 0, 0)
> > draw.End
> > ' This works OK
> > pag.Visible = TRUE
> >
> > END
> >
> > PUBLIC SUB Button1_Click()
> >
> > draw.Begin(printer)
> > draw.drawing(p1,0,0, pag.Width, pag.Height)
> > draw.End
> > ' This doesn't works
> > END
>
> Hi Javier,
>
> Some printers can't print in (0,0)
> Try
> draw.drawing(p1, 350, 350)
>
> it work, but very small, need to be scaled.
>
> Regards,
> Christian
>
>
> -------------------------------------------------------
> Using Tomcat but need to do more? Need to support web services, security?
> Get stuff done quickly with pre-integrated technology to make your job easier
> Download IBM WebSphere Application Server v.1.0.1 based on Apache Geronimo
> http://sel.as-us.falkag.net/sel?cmd=k&kid0709&bid&3057&dat1642
> _______________________________________________
> Gambas-user mailing list
> Gambas-user at lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
_________________________________________________________________
Descarga gratis la Barra de Herramientas de MSN
http://www.msn.es/usuario/busqueda/barra?XAPID=2031&DI=1055&SU=http%3A//www.hotmail.com&HL=LINKTAG1OPENINGTEXT_MSNBH
More information about the User
mailing list