Beginner Questions

[bbjimmy]

This may come in handy:

Code:

sub ptext(lne,position,text$, view$)

local charheight, charwidth
charheight = draw get "Max-Text-Height", view$
charheight=charheight
charwidth = DRAW GET "Text-Width", "█", view$
if charwidth=0 then
charwidth = DRAW GET "Text-Width", "-", view$
endif

draw text (position*charwidth),((lne)*charheight), text$, view$


end sub

I use this to ptint text on a view, it gives me good control over text placement. One needs to use a fixed face font to make it work well.