Thank you
regards
Rafael

El 03/03/2015 a las 16:39, Tracy Pearson escibiĆ³:
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


[excessive quoting removed by server]

_______________________________________________
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/54f63a76.1090...@fibertel.com.ar
** 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.

Reply via email to