Several users have asked me to add support for RTL language but as I only
read/write English the task would be difficult at best.
--
HTH
Stephen Lebanshttp://
www.lebans.com
Access Code, Tips and Tricks
Please respond only to the newsgroups so everyone can benefit.
- Show quoted text -
Stephen Hi,
Thanks for your reply.
Actually I have succesfully done it. Just finished. The only issues
where:
1) the second to the last line was not fully justifying (I think only
when there was one word left on the last line)-- I'm not sure if it is
only because of what I did, or it would be an issue anyway (something
in the comments)-- in any case I changed an >= to > more than and it
seems to have taken care of that.
If x > lngNumTokens Then boolEOF = True Else boolEOF = False
'changed >= to >
2)For the last line (EOF) I had to move it to the right so I added to
eof else
'added for rtl---- used to be *2 but *8 works???
rpt.CurrentX = ((intCurCtlLeft + CtlCurrent.Width -
(lngMargin * 8))) - rpt.TextWidth(strTemp)
'-------------------------------------------------------
i'm not sure why I couldnt move it exactly to the right so i played
and added *8, it seems to be just about right.
3)certain characters such as ' were giving some trouble.
Thanks again and please let me know what you think.