Rafael Copquin wrote on 2015-03-03:

> That's interesting. Can you post an example (code snippet I mean) ?

> I am not very familiarized with the assign method. Could never use it

> properly. Perhaps an example will clarify this issue for me.

>

> TIA

>

> Rafael Copquin

>

> El 03/03/2015 a las 13:42, Dave Crozier escibió:

> Paul,

> Set autosize = .f. then populate the label with appropriate text and

then set autosize .T..

>

> I subclassed the label and did this automatically on the assign method as

it is a known problem with certain fonts/sizes and sometimes the field will

autosize and just miss off the start/end of the label caption depending upon

what fonts are used. If you use the assign to size the label then you can

size the label exactly by using the sysmetric() settings for the font you

are using.

>

Rafael,

Not tested

Define Class baseLabel as Label

Procedure Caption_Assign

LParameters cValue

If This.AutoSize = .T.

This.AutoSize = .F.

This.Caption = cValue

This.AutoSize = .T.

Else

This.Caption = cValue

EndIf

EndProc

EndDefine

I would gather that would be the structure of the method he created.

HTH,

Tracy

Tracy Pearson

PowerChurch Software

_______________________________________________

Post Messages to: ProFox@leafe.com

Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox

OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech

Searchable Archive: http://leafe.com/archives/search/profox

This message: http://leafe.com/archives/byMID/profox/000f01d055e9$c4fc14a0$4ef43de0$@powerchurch.com

** All postings, unless explicitly stated otherwise, are the opinions of the author, and do not constitute legal or medical advice. This statement is added to the messages for those lawyers who are too stupid to see the obvious.