Example: /MacCocoa/TextHeight calculation

Online Documentation   -   Statistics   -   FAQ   -   Plugin Parts (All, Dependencies)   -   Class hierarchy

New in Version 22.2 22.3 22.4 22.5 23.0 23.1 23.2 23.3 23.4 23.5 24.0 24.1

The list of the   topics,   classes,   interfaces,   controls,   modules,   global methods by category,   global methods by name,   screenshots,   licenses   and   examples.

Platforms to show: All Mac Windows Linux Cross-Platform

/MacCocoa/TextHeight calculation


Required plugins for this example: MBS MacBase Plugin, MBS Main Plugin, MBS MacCocoa Plugin

You find this example project in your Plugins Download as a Xojo project file within the examples folder: /MacCocoa/TextHeight calculation

This example is the version from Fri, 8th Oct 2015.

Project "TextHeight calculation.xojo_binary_project"
Class App Inherits Application
Const kEditClear = "&Delete"
Const kFileQuit = "&Quit"
Const kFileQuitShortcut = ""
End Class
Class Window1 Inherits Window
Control Label1 Inherits Label
ControlInstance Label1 Inherits Label
End Control
Control PushButton1 Inherits PushButton
ControlInstance PushButton1 Inherits PushButton
EventHandler Sub Action() // some graphics environment Dim NSGraphics as New NSGraphicsMBS() // the size of the label we have now dim size as NSSizeMBS = new NSSizeMBS(Label1.Width,Label1.Height) // and the text dim text as string = Label1.Text // make a NSFontMBS and pass it in the options dictionary dim font as NSFontMBS = NSFontMBS.fontWithName("Arial", 12) dim dic as new Dictionary dic.Value(NSAttributedStringMBS.NSFontAttributeName) = font // our options dim options as integer = NSGraphics.NSStringDrawingUsesLineFragmentOrigin + _ NSGraphics.NSStringDrawingUsesFontLeading + _ NSGraphics.NSStringDrawingUsesDeviceMetrics // and calculate the new rectangle Dim rect as NSRectMBS = NSGraphics.boundingRectWithSize(text, size, options, dic) // apply Label1.Height = rect.Height label1.Width = rect.Width End EventHandler
End Control
End Class
MenuBar MenuBar1
MenuItem FileMenu = "&File"
MenuItem FileQuit = "#App.kFileQuit"
MenuItem EditMenu = "&Edit"
MenuItem EditUndo = "&Undo"
MenuItem UntitledMenu1 = "-"
MenuItem EditCut = "Cu&t"
MenuItem EditCopy = "&Copy"
MenuItem EditPaste = "&Paste"
MenuItem EditClear = "#App.kEditClear"
MenuItem UntitledMenu0 = "-"
MenuItem EditSelectAll = "Select &All"
End MenuBar
End Project

The items on this page are in the following plugins: MBS MacCocoa Plugin.


💬 Ask a question or report a problem