Re: Drawing Rectangles and text on a form

Dan Lancour wrote:
> Are there any tools available in dbase V2.6.1.3 that allow you to draw
rectangles, horizontal text and vertical text anywhere on a form based on pixel
coordinates or do you have to resort to using the windows API to accomplish what
VB does in its native language ?

Have you looked at the Paintbox control?

What exactly are you trying to do?

Ken

-- 
/(Opinions expressed are purely my own, not those of dataBased
Intelligence, Inc.)/

*Ken Mayer* [dBVIPS]
/Golden Stag Productions/
dBASE at goldenstag dot net
http://www.goldenstag.net/GSP
http://www.goldenstag.net/dbase/dBASEBooks.htm

> Dan Lancour <danlancour@charter.net> wrote:
> 
> >Are there any tools available in dbase V2.6.1.3 that allow you to draw
rectangles, horizontal text and vertical text anywhere on a form based on pixel
coordinates or do you have to resort to using the windows API to accomplish what
VB does in its native language ?

Ivar, basically, what you provided is what I need to accomplish. However, I need
to be able to draw a variable number of rectangles with text inside the
rectangles and also show some dimension lines. I am a woodworker and I am trying
to figure out a process to design 2D graphics using dBase. I am not concerned
about the process so much as I am concerned about the tools available to
generate the 2D graphics which will be a database driven app.

Thanks for your demo.

Ken Mayer [dBVIPS] Wrote:

> Dan Lancour wrote:
> > Are there any tools available in dbase V2.6.1.3 that allow you to draw
rectangles, horizontal text and vertical text anywhere on a form based on pixel
coordinates or do you have to resort to using the windows API to accomplish what
VB does in its native language ?
> 
> Have you looked at the Paintbox control?
> 
> What exactly are you trying to do?
> 
> Ken
> 
 I need to be able to draw a variable number of rectangles with text inside the
rectangles and also show some dimension lines. I am a woodworker and I am trying
to figure out a process to design 2D graphics using dBase. I am not concerned
about the process so much as I am concerned about the tools available to
generate the 2D graphics which will be a database driven app.


Dan Lancour

On Wed, 06 Feb 2008 11:30:32 -0500, in dbase.how-to, 
Subject: Drawing Rectangles and text on a form, 
Message-ID: <tfnvX2NaIHA.1308@news-server>,  
Dan Lancour <danlancour@charter.net> wrote:

>Are there any tools available in dbase V2.6.1.3 that allow you to draw
rectangles, horizontal text and vertical text anywhere on a form based on pixel
coordinates or do you have to resort to using the windows API to accomplish what
VB does in its native language ?

Run the code below my signature.

Is this the kind of thing you are looking for?


Ivar B. Jessen

//-----
** END HEADER -- do not remove this line
//
// Generated on 06-02-2008
//
parameter bModal
local f
f = new LacourForm()
if (bModal)
   f.mdi = false // ensure not MDI
   f.readModal()
else
   f.open()
endif

class LacourForm of FORM
   with (this)
      height = 16.0
      left = 53.0
      top = 0.0
      width = 40.0
      text = ""
   endwith

   this.RECTANGLE1 = new RECTANGLE(this)
   with (this.RECTANGLE1)
      left = 26.0
      top = 2.0
      width = 12.0
      height = 11.5
      text = "Rectangle1"
      patternStyle = 1	// BDiagonal
      border = false
      borderStyle = 5	// Double
   endwith

   this.TEXT1 = new TEXT(this)
   with (this.TEXT1)
      height = 12.0
      left = 2.0
      top = 1.5
      width = 10.0
      colorNormal = "blue/BtnFace"
      fontSize = 34.0
      fontBold = true
      rotate = 3	// 270 degrees
      text = "Dan Lacour"
   endwith

endclass