FiveTech Support Forums

Hi all,

under certain circumstances TSay cuts the last character.




I don´t use any font definitons. Does anyone ever noticed this ?

As a workaround, use SIZE clause.

EMG

I found a solution, nWidth gets a wrong value by default in this line in the method ::New() in TSay



If you replace it with



all is working fine.

In method ::SetText you have to do the same, insert this line before ::SetWindowText (...)



Now also changed text is shown correctly.

Stefan,

We have modified it as per your advise, many thanks

A little modifications in your code:
DEFAULT nWidth := GetTextWidth( 0, ::cCaption, If( oFont != nil, oFont:hFont,;
If( oWnd:oFont != nil, oWnd:oFont:hFont,) ) )

::nWidth := GetTextWidth( 0, ::cCaption, If( ::oFont != nil, ::oFont:hFont,) )

Hello Mr.Antonio

Where to add the changes in SAY.PRG

Thanks

• Ramesh Babu P

Antonio Linares wrote:Stefan,

We have modified it as per your advise, many thanks

My pleasure

Ramesh,
the first change is in method ::new() and the second in method ::SetText(). See also my former post