Hi Ken,

That did the trick!

Thanks for your help.  Very much appreciated!

Ray Horsley
Developer, LinkIt! Software


On Feb 7, 2006, at 9:55 PM, Ken Ray wrote:

On 2/7/06 7:12 PM, "Ray Horsley" <[EMAIL PROTECTED]> wrote:

I'm just trying to find out how wide I have to make the button in order to see all the tabs. Unlike other button styles, a tabbed button shows all lines of its contents, but the formattedWidth property only returns
the width of one line of the contents.  I'd like to get the width of
all the contents as they're displayed horizontally.

Thanks for your concern.  Let me know if you've got any ideas.

Here you go, Ray... try this:

on mouseUp
  put tabFormattedWidth(long id of btn 1) into tWidth
  set the width of btn 1 to tWidth
end mouseUp

function tabFormattedWidth pBtnDesc
  put the text of pBtnDesc into tTabs
  lock screen
  put 0 into tWidth
  put the number of lines of tTabs into tNum
  put the label of pBtnDesc into tOrigLabel
  repeat with x = 1 to tNum
    set the label of pBtnDesc to (line x of tTabs)
    put the formattedWidth of pBtnDesc into tFW
    add tFW to tWidth
  end repeat
  put tWidth + (18* tNum) into tWidth
  set the label of pBtnDesc to tOrigLabel
  unlock screen
  return tWidth
end tabFormattedWidth

HTH,

Ken Ray
Sons of Thunder Software
Web site: http://www.sonsothunder.com/
Email: [EMAIL PROTECTED]

_______________________________________________
metacard mailing list
[email protected]
http://lists.runrev.com/mailman/listinfo/metacard


_______________________________________________
metacard mailing list
[email protected]
http://lists.runrev.com/mailman/listinfo/metacard

Reply via email to