Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Shaun E on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Text rotation of 45 degrees 2

Status
Not open for further replies.

lawlerpat

Programmer
Jun 28, 2002
54
US
It appears as if the only options for text object rotation are 0, 90, and 270 (for version 8.0).
I am wanting to put a bunch of column headings on a 45 degree slant.
Has anyone figures out a way to do this?

Thanks
PL
 
Yes, but since you are using CR8 it will work only if your field is 21 characters or less long. Set the font to a monospace type and set the field to "Can Grow"
===================================================
stringvar header:="Up to 21 characters!";//your field here
numbervar loop;
numbervar loopnum:=length(header);
stringvar out;
stringvar hold;
for loop:= 1 to loopnum do(
stringvar return;
if loop=loopnum then return:="" else return:=chr(13);

(out:=replicatestring(" ",loop-1)+header[loop] ;
hold:=hold+out+return));
hold
=================================================== Mike
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top