xBrowser: Is it possible to change alignment on the fly?

Otto · Post by **Otto** » Sat Dec 15, 2007 12:35 am

nDataStrAlign := AL_RIGHT

Is it possible to change alignment on the fly?
Thanks in advance
Otto

Post by **Antonio Linares** » Sat Dec 15, 2007 10:43 am

Otto,

Have you tried to change it and refresh the browse ?

Otto · Post by **Otto** » Sat Dec 15, 2007 9:44 pm

Thank you. Yes I tried with refresh().
Here is my code:

func f_DataStrAlign(r,c,f,o)

oBrw:nRowDividerStyle := 0 // I put this to proof that refresh is working

oBrw:aCols[ o:nPos ]:nDataStrAlign := AL_RIGHT

oBrw:refresh()

return nil

The text does not move.
Regards,
Otto

Post by **Antonio Linares** » Mon Dec 17, 2007 10:30 am

Otto,

Try it this way:

oCol = oBrw:aCols[ o:nPos ]
oCol:nDataStrAlign := AL_RIGHT
oCol:nDataStyle := oCol:DefStyle( oCol:nDataStrAlign, ( oCol:oBrw:nDataLines == 1 ) )

Otto · Post by **Otto** » Mon Dec 17, 2007 1:13 pm

Alignment changes but Al_right is not displayed well.
See screen:

Mon Dec 17, 2007 1:30 pm

Try to RTrim() the column data.

EMG

Post by **nageswaragunupudi** » Mon Dec 17, 2007 1:59 pm

Working perfectly

Post by **nageswaragunupudi** » Mon Dec 17, 2007 2:08 pm

Code: Select all

METHOD	DataAlign( nAlign ) CLASS TXBrwColumn

	if ! ( ::nDataStrAlign == nAlign )  // tolerate nil param
	   ::nDataStrAlign := AL_RIGHT
      ::nDataStyle := ::DefStyle( ::nDataStrAlign, ( ::oBrw:nDataLines == 1 ) )
   endif

RETURN ::nDataStrAlign

Otto · Post by **Otto** » Mon Dec 17, 2007 2:40 pm

Thank you Enrico.
I changed it in METHOD PaintData:
if ::bStrData != nil
cData := RTRIM( Eval( ::bStrData, Self ))
else
cData := ""
endif

Otto · Post by **Otto** » Mon Dec 17, 2007 2:42 pm

To nageswaragunupudi:
If I insert the method DataAlign I get all centered.
Regaqrds,
Otto

Post by **nageswaragunupudi** » Mon Dec 17, 2007 2:51 pm

Mr Otto

Obviously the values should be rtimmed for right justification. My proposed method is only for changing justification on the fly.

If you change the paint method you may like to cover the cases of left, center and riight justifcations and all other possibilities. For non left justified painting probably alltrim(,,,) may be better, We should also keep in mind multiple line painting. Paint is a very generic method. Should we change this paint method or specify bStrData appropriately?

James Bott · Post by **James Bott** » Mon Dec 17, 2007 9:01 pm

It is most common to right justify numbers and left justify text in tables. Numbers need to be right justified to make the decimals aline. I can't think of a good reason to right justify text.

James

Otto · Post by **Otto** » Mon Dec 17, 2007 9:47 pm

Hello James,

to learn to use xBrowser I created a little tool xBTool to build a xBrowser visually.
There I want to click on the header and select if the column should be right aligned or left.

Doing this I saw that text fields do not align accurately. Therefore I pointed this problem out.

Regards,
Otto