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.
