2019r3 differences Desktop MacOS 64 bit Class Application new Public Property AllowAutoQuit As Boolean new Public Property AllowHiDPI As Boolean chg Attributes( "Deprecated" = "AllowAutoQuit" ) Public Property AutoQuit As Boolean new Public Function Window(index As Integer) As Window new Public Function WindowCount() As Integer new Public Property LastWindowIndex As Integer new Public Sub HideTooltip() new Public Sub RefreshMenuBar() new Public Sub ShowTooltip(tip As String, x As Integer, y As Integer, autoHide As Boolean = True) chg Attributes( "Deprecated" = "AllowHiDPI" ) Public Property SupportsHiDPI As Boolean End Class Class BevelButton new Event MenuSelected(selectedItem As MenuItem) chg Attributes( "Deprecated" = "AllowFocus" ) Public Property AcceptFocus As Boolean new Public Property AllowFocus As Boolean chg Attributes( "Deprecated" = "BackgroundColor" ) Public Property BackColor As Color new Public Property BackgroundColor As Color chg Attributes( "Deprecated" = "BevelStyle" ) Public Property Bevel As Integer new Public Property BevelStyle As BevelStyles new Public Enum BevelStyles As Integer new Small = 0 new Normal = 1 new Large = 2 new Rounded = 3 new None = 4 new Round = 5 new LargeRound = 6 new Disclosure = 7 new End Enum new Public Property ButtonStyle As ButtonStyles new Public Enum ButtonStyles As Integer new PushButton = 0 new ToggleButton = 1 new StickyButton = 2 new End Enum chg Attributes( "Deprecated" = "ButtonStyle" ) Public Property ButtonType As integer chg Attributes( "Deprecated" = "CaptionAlignment" ) Public Property CaptionAlign As Integer new Public Property CaptionAlignment As CaptionAlignments new Public Enum CaptionAlignments As Integer new Left = 0 new Right = 1 new SystemDirection = 2 new Centered = 3 new End Enum chg Attributes( "Deprecated" = "CaptionPosition" ) Public Property CaptionPlacement As Integer chg Public Property CaptionPosition As CaptionPositions chg Get new Public Enum CaptionPositions As Integer new SystemDirection = 0 new Normal = 1 new RightOfIcon = 2 new LeftOfIcon = 3 new BelowIcon = 4 new AboveIcon = 5 new End Enum new Public Property FontName As string new Public Property FontSize As single new Public Property FontUnit As FontUnits new Public Function List(row As Integer) As String chg Attributes( "Deprecated" = "HasBackgroundColor" ) Public Property HasBackColor As Boolean new Public Property HasBackgroundColor As Boolean chg Attributes( "Deprecated" = "MenuStyle" ) Public Property HasMenu As Integer chg Attributes( "Deprecated" = "IconAlignment" ) Public Property IconAlign As Integer new Public Property IconAlignment As IconAlignments new Public Enum IconAlignments As Integer new SystemDirection = 0 new Centered = 1 new Left = 2 new Right = 3 new Top = 4 new Bottom = 5 new Topleft = 6 new BottomLeft = 7 new TopRight = 8 new BottomRight = 9 new End Enum new Public Property IconDeltaX As Integer new Public Property IconDeltaY As Integer chg Attributes( "Deprecated" = "IconDeltaX" ) Public Property IconDX As Integer chg Attributes( "Deprecated" = "IconDeltaY" ) Public Property IconDY As Integer new Public Property Menu As MenuItem new Public Property MenuStyle As MenuStyles new Public Enum MenuStyles As Integer new None = 0 new Down = 1 new Right = 2 new End Enum chg Attributes( "Deprecated" = "Use MenuSelected event" ) Public Property MenuValue As Integer chg Attributes( "Deprecated" = "FontName" ) Public Property TextFont As string chg Attributes( "Deprecated" = "FontSize" ) Public Property TextSize As single chg Attributes( "Deprecated" = "FontUnit" ) Public Property TextUnit As FontUnits End Class Class BinaryStream new Public Property BytePosition As UInt64 new Public Function EndOfFile() As Boolean new Public Function Handle(type As IOStreamHandleTypes) As Ptr chg Attributes( "Deprecated" ) Public Property LastErrorCode As Integer chg Attributes( "Deprecated" = "BytePosition" ) Public Property Position As UInt64 End Class new Module Boolean new Protected Function FromString(value As String) As Boolean new Global Function ToString(Extends value As Boolean) As String new End Module chg Attributes( "DefaultEvent" = "Paint" ) Class Canvas chg Attributes( "Deprecated" = "AllowFocus" ) Public Property AcceptFocus As Boolean chg Attributes( "Deprecated" = "AllowTabs" ) Public Property AcceptTabs As Boolean new Public Property AllowFocus As Boolean new Public Property AllowFocusRing As Boolean new Public Property AllowTabs As Boolean chg Attributes( "Deprecated" ) Public Property DoubleBuffer As Boolean chg Attributes( "Deprecated" = "AllowFocusRing" ) Public Property UseFocusRing As Boolean End Class chg Attributes( "DefaultEvent" = "Action" ) Class CheckBox new Public Property FontName As String new Public Property FontSize As Single new Public Property FontUnit As FontUnits chg Attributes( "Deprecated" = "VisualState" ) Public Property State As CheckedStates chg Attributes( "Deprecated" = "FontName" ) Public Property TextFont As String chg Attributes( "Deprecated" = "FontSize" ) Public Property TextSize As Single chg Attributes( "Deprecated" = "FontUnit" ) Public Property TextUnit As FontUnits new Public Property VisualState As VisualStates new Public Enum VisualStates As Integer new Unchecked = 0 new Checked = 1 new Indeterminate = 2 new End Enum End Class Class Clipboard new Public Function RawData(macType As String, Assigns value As String) As String End Class Module Color new Protected Function CMY(cyan As Double, magenta As Double, yellow As Double, alpha As Double) As Color new Protected Function DarkBevelColor() As Color new Protected Function DarkTingeColor() As Color new Protected Function DisabledTextColor() As Color new Protected Function FillColor() As Color new Protected Function FrameColor() As Color new Protected Function HighlightColor() As Color chg Protected Function HSV(h As Double, s As Double, v As Double, alpha As Integer = 0) As Color new Protected Function IsDarkMode() As Boolean new Protected Function LightBevelColor() As Color new Protected Function LightTingeColor() As Color chg Protected Function RGB(r As Integer, g As Integer, b As Integer, alpha As Integer = 0) As Color new Protected Function SelectedFromDialog(ByRef selectedColor As Color, prompt As String, showAlpha As Boolean = False) As Boolean new Protected Function TextColor() As Color End Module new Class ColorGroup new Public Dim UndefinedColorCallback As UndefinedColorDelegate new Public Delegate Function UndefinedColorDelegate (ByRef c As Color) As Boolean new Public Function Mode(platform As ColorGroup.Platforms = ColorGroup.Platforms.Current) As ColorGroup.Modes new Public Function Name() As String new Public Shared Function NamedColor(name As String) As Color new Public Function Operator_Convert() As Color new Public Function Values() As Color() new Public Enum Modes As Integer new None = 0 new Single = 1 new Dual = 2 new Named = 3 new End Enum new Public Enum Platforms As Integer new Current = -1 new Default = 0 new Desktop = 1 new Mobile = 2 new Web = 3 new End Enum new Public Sub AddColor(platform As Platforms, aColor As Color) new Public Sub AddColorPair(platform As Platforms, lightColor As Color, darkColor As Color) new Public Sub AddNamedColor(platform As platforms, name As String) new Public Sub Constructor() new Public Sub Constructor(defaultColor As Color) new Public Sub Constructor(defaultLightColor As Color, defaultDarkColor As Color) new Public Sub Constructor(name As String) new Public Sub Operator_Convert(aColor As Color) new Public Sub Operator_Convert(name As String) new Public Sub Operator_Convert(value As ColorGroup) new Public Sub Operator_Convert(value As UInt64) new End Class Module COM Protected Class IEnumVARIANT chg Public Function Next_(numElements As UInt32, ByRef variable As Variant, ByRef fetched As UInt32) As Boolean End Class End Module chg Attributes( "DefaultEvent" = "TextChanged" ) Class ComboBox chg Public Property AllowAutoComplete As Boolean new Public Property AllowFocusRing As Boolean new Attributes( "Deprecated" = "AllowAutoComplete" ) Public Property AutoComplete As Boolean new Public Property Hint As String new Public Property SelectionLength As Integer new Public Property SelectionStart As Integer chg Attributes( "Deprecated" = "SelectionLength" ) Public Property SelLength As Integer chg Attributes( "Deprecated" = "SelectionStart" ) Public Property SelStart As Integer chg Attributes( "Deprecated" = "Value" ) Public Property Text As String chg Attributes( "Deprecated" = "AllowFocusRing" ) Public Property UseFocusRing As Boolean new Public Property Value As String End Class Class ContainerControl chg Attributes( "Deprecated" = "AllowFocus" ) Public Property AcceptFocus As Boolean chg Attributes( "Deprecated" = "AllowTabs" ) Public Property AcceptTabs As Boolean new Public Property AllowAutoDeactivate As Boolean new Public Property AllowFocus As Boolean new Public Property AllowFocusRing As Boolean new Public Property AllowTabs As Boolean chg Attributes( "Deprecated" = "AllowAutoDeactivate" ) Public Property AutoDeactivate As Boolean new Public Property Composited As Boolean chg Attributes( "Deprecated" = "Composited" ) Public Property DoubleBuffer As Boolean chg Attributes( "Deprecated" = "Tooltip" ) Public Property HelpTag As String new Public Property Tooltip As String chg Attributes( "Deprecated" = "AllowFocusRing" ) Public Property UseFocusRing As Boolean End Class Module Crypto chg Attributes( "Deprecated" = "HashAlgorithms" ) Protected Enum Algorithm As Integer End Enum new Protected Function Hash(data As MemoryBlock, hashAlgorithm As HashAlgorithms) As MemoryBlock new Protected Enum HashAlgorithms As Integer new MD5 = 0 new SHA = 1 new SHA256 = 2 new SHA512 = 3 new End Enum End Module Module Currency new Protected Function FromString(value As String, locale As Locale = Nil) As Currency new Global Function ToString(Extends value As Currency, locale As Locale = Nil) As String End Module Class Database chg Attributes( "Deprecated" = "DatabaseException" ) Public Property Error As Boolean chg Attributes( "Deprecated" = "DatabaseException" ) Public Property ErrorCode As Integer chg Attributes( "Deprecated" = "DatabaseException" ) Public Property ErrorMessage As String new Public Function SelectSQL(sql As String, values() As Variant) As RowSet new Public Function SelectSQL(sql As String, ParamArray values() As Variant) As RowSet new Public Function TableColumns(tableName As String) As RowSet new Public Function TableIndexes(tableName As String) As RowSet new Public Function Tables() As RowSet new Public Sub AddRow(tableName As String, dbRecord As DatabaseRow) new Public Sub BeginTransaction() new Public Sub CommitTransaction() new Public Sub Connect() new Public Sub ExecuteSQL(sql As String, ParamArray values() As Variant) new Public Sub ExecuteSQL(sql As String, values() As Variant) new Public Sub RollbackTransaction() End Class new Class DatabaseColumn new Public Property BlobValue As String new Public Property BooleanValue As Boolean new Public Property CurrencyValue As Currency new Public Property DateTimeValue As DateTime new Public Property DateValue As Date new Public Property DoubleValue As Double new Public Function Operator_Convert() As Boolean new Public Function Operator_Convert() As DateTime new Public Function Operator_Convert() As Double new Public Function Operator_Convert() As Integer new Public Function Operator_Convert() As Picture new Public Function Operator_Convert() As String new Public Property Int64Value As Int64 new Public Property IntegerValue As Integer new Public Property Name As String new Public Property NativeValue As String new Public Property PictureValue As Picture new Public Property StringValue As String new Protected Sub Constructor() new Public Sub Constructor(row As DatabaseRow, columnName As String) new Public Sub PictureValue(format As Picture.Formats, quality As Integer = Picture.QualityDefault, Assigns value As Picture) new Public Property Type As Integer new Public Property Value As Variant new End Class rem Class DatabaseCursor rem Public Property BOF As Boolean rem Public Property EOF As Boolean rem Public Property FieldCount As Integer rem Public Function ColumnType(Index As Integer) As Integer rem Public Function Field(Name As String) As DatabaseField rem Public Function IdxField(Index As Integer) As DatabaseField rem Public Function RecordCount() As Integer rem Public Sub Close() rem Public Sub DeleteRecord() rem Public Sub Edit() rem Public Sub MoveFirst() rem Public Sub MoveLast() rem Public Sub MoveNext() rem Public Sub MovePrevious() rem Public Sub Update() rem End Class rem Class DatabaseCursorField rem Public Property BooleanValue As Boolean rem Public Property CurrencyValue As Currency rem Public Property DateValue As Date rem Public Property DoubleValue As Double rem Public Function getString() As String rem Public Function Operator_Convert() As Boolean rem Public Function Operator_Convert() As Date rem Public Function Operator_Convert() As Double rem Public Function Operator_Convert() As Integer rem Public Function Operator_Convert() As Picture rem Public Function Operator_Convert() As String rem Public Property Int64Value As Int64 rem Public Property IntegerValue As Integer rem Attributes( "Deprecated" = "PictureValue" ) Public Property JPEGValue As Picture rem Public Property Name As String rem Public Property NativeValue As String rem Public Property StringValue As String rem Public Sub setString(v As String) rem Public Property Value As Variant rem End Class new Class DatabaseException new Inherits RuntimeException new End Class chg Attributes( "Deprecated" = "DatabaseColumn" ) Class DatabaseField rem Inherits DatabaseCursorField new Public Property BooleanValue As Boolean new Public Property CurrencyValue As Currency new Public Property DateTimeValue As DateTime new Public Property DateValue As Date new Public Property DoubleValue As Double new Public Function getString() As String new Public Function Operator_Convert() As Boolean new Public Function Operator_Convert() As Date new Public Function Operator_Convert() As Double new Public Function Operator_Convert() As Integer new Public Function Operator_Convert() As Picture new Public Function Operator_Convert() As String new Public Property Int64Value As Int64 new Public Property IntegerValue As Integer new Attributes( "Deprecated" = "PictureValue" ) Public Property JPEGValue As Picture new Public Property Name As String new Public Property NativeValue As String new Public Property StringValue As String new Public Sub setString(v As String) new Public Property Value As Variant End Class chg Attributes( "Deprecated" = "DatabaseRow" ) Class DatabaseRecord End Class new Class DatabaseRow new Public Function Column(name As String) As DatabaseColumn new Public Function ColumnAt(index As Integer) As DatabaseColumn new Public Function ColumnCount() As Integer new Public Sub Constructor() new Public Sub Constructor(rs As RowSet) new End Class chg Attributes( "Deprecated" ) Class DataControl End Class chg Attributes( "Deprecated" = "DateTime" ) Class Date End Class new Class DateInterval new Public Dim Days As Integer new Public Dim Hours As Integer new Public Dim Minutes As Integer new Public Dim Months As Integer new Public Dim Nanoseconds As Integer new Public Dim Seconds As Integer new Public Dim Years As Integer new Public Sub Constructor(years As Integer = 0, months As Integer = 0, days As Integer = 0, hours As Integer = 0, minutes As Integer = 0, seconds As Integer = 0, nanoseconds As Integer = 0) new End Class new Class DateTime new Public Property Day As Integer new Public Property DayOfWeek As Integer new Public Property DayOfYear As Integer new Public Enum FormatStyles As Global.Integer new Short = 0 new Medium = 1 new Long = 2 new Full = 3 new None = 4 new End Enum new Public Function AddInterval(years As Integer = 0, months As Integer = 0, days As Integer = 0, hours As Integer = 0, minutes As Integer = 0, seconds As Integer = 0, nanoseconds As Integer = 0) As DateTime new Public Shared Function FromString(dateValue As String, locale As Locale = Nil, timezone As TimeZone = Nil) As DateTime new Public Shared Function Now(timezone As TimeZone = Nil) As DateTime new Public Function Operator_Add(interval As DateInterval) As DateTime new Public Function Operator_Compare(someDate As DateTime) As Integer new Public Function Operator_Convert() As Date new Public Function Operator_Subtract(interval As DateInterval) As DateTime new Public Function Operator_Subtract(other As DateTime) As DateInterval new Public Function SubtractInterval(years As Integer = 0, months As Integer = 0, days As Integer = 0, hours As Integer = 0, minutes As Integer = 0, seconds As Integer = 0, nanoseconds As Integer = 0) As DateTime new Public Function ToString(format As String, locale As Locale = Nil) As String new Public Function ToString(loc As Locale = Nil, dateStyle As FormatStyles = FormatStyles.Medium, timeStyle As FormatStyles = FormatStyles.Medium) As String new Public Property Hour As Integer new Public Property IsDaylightSavingsTime As Boolean new Public Property Minute As Integer new Public Property Month As Integer new Public Property Nanosecond As Integer new Public Property Second As Integer new Public Property SecondsFrom1970 As Double new Public Property SQLDate As String new Public Property SQLDateTime As String new Public Sub Constructor(secondsFrom1970 As Double, timezone As TimeZone = Nil) new Public Sub Constructor(source As Date) new Public Sub Constructor(source As DateTime) new Public Sub Constructor(year As integer, month As integer, day As integer, hour As integer = 0, minute As integer = 0, second As integer = 0, nanoseconds As Integer = 0, timezone As TimeZone = Nil) new Public Sub Operator_Convert(value As Date) new Public Property Timezone As TimeZone new Public Property WeekOfYear As Integer new Public Property Year As Integer new End Class Class Dictionary chg Implements Iterable new Public Delegate Function KeyComparisonDelegate (leftKey As Variant, rightKey As Variant) As Integer chg Attributes( "Deprecated" = "KeyCount" ) Public Property Count As Integer new Public Function Clone() As Dictionary new Public Function Iterator() As Iterator new Public Property KeyCount As Integer new Public Sub Constructor(keyComparison As KeyComparisonDelegate) new Public Sub RemoveAll() End Class new Class DictionaryEntry new Public Dim Key As Variant new Public Dim Value As Variant new End Class Class DisclosureTriangle chg Attributes( "Deprecated" = "AllowFocus" ) Public Property AcceptFocus As Boolean new Public Property AllowFocus As Boolean chg Attributes( "Deprecated" = "FacingDirection" ) Public Property Facing As Integer new Public Property FacingDirection As FacingDirections new Public Enum FacingDirections As Integer new Right = 0 new Left = 1 new End Enum End Class Module Double chg Protected Function FromString(value As String, locale As Locale = Nil) As Double new Protected Function FromText(theText As Text, Optional locale As Xojo.Core.Locale) As Double rem Protected Function Parse(theText As Text, Optional locale As Xojo.Core.Locale) As Double new Protected Function Parse(value As String, locale As Locale = Nil) As Double new Global Function ToString(Extends value As Double, locale As Locale = Nil) As String new Global Function ToString(Extends value As Double, locale As Locale = Nil, format As String) As String End Module Class EasyTCPSocket chg Public Sub Event_Error(err As RuntimeException) Handles Error End Class Class EasyUDPSocket chg Public Sub Event_Error(err As RuntimeException) Handles Error End Class Class EndOfLine chg Attributes( "Deprecated" = "Chr(13)" ) Public Shared Property Macintosh As String new Public Shared Property macOS As String chg Attributes( "Deprecated" = "macOS" ) Public Shared Property OSX As String End Class Class FigureShape new Public Function CurveAt(index As Integer) As CurveShape new Public Sub AddCurve(curveShape As CurveShape) new Public Sub AddCurveAt(index As Integer, curveShape As CurveShape) new Public Sub CurveAt(index As Integer, Assigns _value As CurveShape) new Public Sub RemoveCurve(curveShape As CurveShape) new Public Sub RemoveCurveAt(index As Integer) End Class Class FolderItem rem Public Const CarbonLib As String = "Carbon.framework" chg Attributes( "Deprecated" = "PathModes.Native" ) Public Const PathTypeAbsolute = 0 chg Attributes( "Deprecated" = "PathModes.Native" ) Public Const PathTypeNative = 3 chg Attributes( "Deprecated" = "PathModes.Shell" ) Public Const PathTypeShell = 1 chg Attributes( "Deprecated" = "PathModes.URL" ) Public Const PathTypeURL = 2 chg Attributes( "Deprecated" ) Public Const SaveInfoDefaultMode = 0 chg Attributes( "Deprecated" ) Public Const SaveInfoRelativeMode = 1 rem Attributes( "Deprecated" = "NativePath" ) Public Property AbsolutePath As String chg Attributes( "Deprecated" = "IsAlias" ) Public Property Alias As Boolean new Public Property CreationDateTime As DateTime chg Attributes( "Deprecated" = "IsFolder" ) Public Property Directory As Boolean new Public Shared Property DriveCount As Integer chg Public Function Child(name As String, followAlias As Boolean = True) As FolderItem new Public Function ChildAt(index As Integer, followAlias As Boolean = True) As FolderItem new Public Function Children(followAlias As Boolean = True) As Iterable rem Public Shared Function CreateFromMacFSRef(theFSRef As MemoryBlock) As FolderItem new Public Shared Function DriveAt(index As Integer) As FolderItem new Public Shared Function FromSaveInfo(saveInfo As String) As FolderItem chg Public Function Item(oneBasedIndex As Integer) As FolderItem rem Public Function MacFSRef() As MemoryBlock rem Public Function OpenResourceMovie(Index As Integer) As Movie new Public Function SaveInfo(relativeTo As FolderItem, saveInfoMode As SaveInfoModes = SaveInfoModes.Default) As String new Public Shared Function ShowOpenFileDialog(filter As String) As FolderItem new Public Shared Function ShowSaveFileDialog(filter As String, defaultName As String) As FolderItem new Public Shared Function ShowSelectFolderDialog() As FolderItem new Public Shared Function TemporaryFile() As FolderItem chg Public Function TrueItem(oneBasedIndex As Integer) As FolderItem new Public Property IsAlias As Boolean new Public Property IsFolder As Boolean new Public Shared Property LastDriveIndex As Integer chg Attributes( "Deprecated" = "IOException" ) Public Property LastErrorCode As Integer rem Public Property MacCreator As String rem Attributes( "Deprecated" ) Public Property MacDirID As Integer rem Attributes( "Deprecated" ) Public Property MacType As String rem Public Property MacVRefNum As Integer new Public Property ModificationDateTime As DateTime new Public Enum PathModes As Global.Integer new Native = 3 new Shell = 1 new URL = 2 new End Enum new Public Enum SaveInfoModes As Global.Integer new Default = 0 new Full = 2 new Relative = 1 new End Enum rem Public Property ResourceForkLength As Integer new Public Sub Constructor(path As String, pathMode As PathModes, followAlias As Boolean = True) new Public Sub CopyTo(Destination As FolderItem) new Public Sub CreateFolder() new Public Sub MoveTo(Destination As FolderItem) new Public Sub Open(activate As Boolean = True) new Public Sub Open(parameters As String, activate As Boolean = True) new Public Sub Remove() End Class Class FolderItemDialog chg Attributes( "Deprecated" = "InitialFolder" ) Public Property InitialDirectory As FolderItem new Public Property InitialFolder As FolderItem End Class Class Graphics rem Public Const HandleTypeCGrafPtr = 2 rem Public Const HandleTypeGDIPlusGraphics = 6 chg Attributes( "Deprecated" = "AntiAliased" ) Public Property AntiAlias As Boolean new Public Property AntiAliased As Boolean new Public Property DrawingColor As Color new Public Property FontAscent As Double new Public Property FontName As String new Public Property FontSize As Single new Public Property FontUnit As FontUnits chg Attributes( "Deprecated" = "DrawingColor" ) Public Property ForeColor As Color new Public Function Handle(type As HandleTypes) As Ptr new Public Function TextDirection(value As String) As TextDirections new Public Function TextHeight() As Double new Public Function TextHeight(Text As String, WrapWidth As Double) As Double new Public Function TextWidth(Text As String) As Double new Public Enum HandleTypes As Integer new CairoContext = 7 new CGContextRef = 5 new HDC = 1 new Direct2DRenderTarget = 8 new End Enum chg Public Property Height As Double chg Attributes( "Deprecated" = "PenSize" ) Public Property PenHeight As Double new Public Property PenSize As Double chg Attributes( "Deprecated" = "PenSize" ) Public Property PenWidth As Double new Public Sub ClearRectangle(x As Double, y As Double, width As Double, height As Double) new Public Sub DrawPath(path As GraphicsPath, autoClose As Boolean = False) new Public Sub DrawRectangle(x As Double, y As Double, width As Double, height As Double) new Public Sub DrawRoundRectangle(x As Double, y As Double, width As Double, height As Double, arcWidth As Double, arcHeight As Double) new Public Sub DrawText(str As String, x As Double, y As Double, width As Double = 0, condense As Boolean = False) new Public Sub FillPath(path As GraphicsPath, autoClose As Boolean = False) new Public Sub FillRectangle(x As Double, y As Double, width As Double, height As Double) new Public Sub FillRoundRectangle(x As Double, y As Double, width As Double, height As Double, arcWidth As Double, arcHeight As Double) chg Attributes( "Deprecated" = "FontAscent" ) Public Property TextAscent As Double new Public Enum TextDirections As Global.Integer new Unknown = 0 new LeftToRight = 1 new RightToLeft = 2 new End Enum chg Attributes( "Deprecated" = "FontName" ) Public Property TextFont As String rem Public Property TextHeight As Double chg Attributes( "Deprecated" = "FontSize" ) Public Property TextSize As Single chg Attributes( "Deprecated" = "FontUnit" ) Public Property TextUnit As FontUnits rem Attributes( "Deprecated" ) Public Property UseOldRenderer As Boolean chg Public Property Width As Double End Class new Class GraphicsPath new Public Property CurrentPoint As Point new Public Property IsEmpty As Boolean new Public Property IsRectangle As Boolean new Public Sub AddArc(x As Double, y As Double, radius As Double, startRadian As Double, endRadian As Double, clockwise As Boolean) new Public Sub AddCurveToPoint(cp1X As Double, cp1Y As Double, cp2X As Double, cp2Y As Double, x As Double, y As Double) new Public Sub AddLineToPoint(x As Double, y As Double) new Public Sub AddQuadraticCurveToPoint(cpX As Double, cpY As Double, x As Double, y As Double) new Public Sub AddRectangle(x As Double, y As Double, width As Double, height As Double) new Public Sub AddRoundRectangle(x As Double, y As Double, width As Double, height As Double, cornerWidth As Double, cornerHeight As Double) new Public Sub MoveToPoint(x As Double, y As Double) new End Class Class Group2D new Public Sub AddObject(object2D As Object2D) new Public Sub AddObjectAt(index As Integer, object2D As Object2D) new Public Sub RemoveObject(object2D As Object2D) new Public Sub RemoveObjectAt(index As Integer) End Class chg Attributes( "DefaultEvent" = "Open" ) Class GroupBox new Public Property FontName As String new Public Property FontSize As Single new Public Property FontUnit As FontUnits chg Attributes( "Deprecated" = "FontName" ) Public Property TextFont As String chg Attributes( "Deprecated" = "FontSize" ) Public Property TextSize As Single chg Attributes( "Deprecated" = "FontUnit" ) Public Property TextUnit As FontUnits End Class Class HTMLViewer rem Event CancelLoad(URL As String) As Boolean rem Event Close() rem Event DocumentBegin(URL As String) rem Event DocumentComplete(URL As String) rem Event DocumentProgressChanged(URL As String, percentageComplete As Integer) rem Event Error(errorNumber As Integer, errorMessage As String) rem Event NewWindow() As HTMLViewer rem Event Open() rem Event StatusChanged(newStatus As String) rem Event TitleChanged(newTitle As String) rem Public Function Event_CancelLoad(URL As String) As Boolean Handles CancelLoad rem Public Function Event_NewWindow() As Object Handles NewWindow rem Public Sub Event_Close() Handles Close rem Public Sub Event_DocumentBegin(url As String) Handles DocumentBegin rem Public Sub Event_DocumentComplete(url As String) Handles DocumentComplete rem Public Sub Event_DocumentProgressChanged(URL As String, percentage As Integer) Handles DocumentProgressChanged rem Public Sub Event_Error(errorNumber As Integer, errorMessage As String) Handles Error rem Public Sub Event_Open() Handles Open rem Public Sub Event_StatusChanged(newStatus As String) Handles StatusChanged rem Public Sub Event_TitleChanged(title As String) Handles TitleChanged End Class Class HTTPSecureSocket chg Public Sub Event_Error(err As RuntimeException) Handles Error End Class Class HTTPSocket chg Public Sub Event_Error(err As RuntimeException) Handles Error End Class Module Int16 rem Protected Function FromBinary(theText As Text) As Int16 rem Protected Function FromHex(theText As Text) As Int16 rem Protected Function FromOctal(theText As Text) As Int16 new Protected Function FromBinary(value As String) As Int16 new Protected Function FromHex(value As String) As Int16 new Protected Function FromOctal(value As String) As Int16 new Protected Function FromString(value As String, locale As Locale = Nil) As Int16 rem Protected Function Parse(theText As Text, Optional locale As Xojo.Core.Locale) As Int16 new Protected Function Parse(value As String, locale As Locale = Nil) As Int16 new Global Function ToString(Extends value As Int16, locale As Locale = Nil) As String new Global Function ToString(Extends value As Int16, locale As Locale = Nil, format As String) As String End Module Module Int32 rem Protected Function FromBinary(theText As Text) As Int32 rem Protected Function FromHex(theText As Text) As Int32 rem Protected Function FromOctal(theText As Text) As Int32 new Protected Function FromBinary(value As String) As Int32 new Protected Function FromHex(value As String) As Int32 new Protected Function FromOctal(value As String) As Int32 new Protected Function FromString(value As String, locale As Locale = Nil) As Int32 rem Protected Function Parse(theText As Text, Optional locale As Xojo.Core.Locale) As Int32 new Protected Function Parse(value As String, locale As Locale = Nil) As Int32 new Global Function ToString(Extends value As Int32, locale As Locale = Nil) As String new Global Function ToString(Extends value As Int32, locale As Locale = Nil, format As String) As String End Module Module Int64 rem Protected Function FromBinary(theText As Text) As Int64 rem Protected Function FromHex(theText As Text) As Int64 rem Protected Function FromOctal(theText As Text) As Int64 new Protected Function FromBinary(value As String) As Int64 new Protected Function FromHex(value As String) As Int64 new Protected Function FromOctal(value As String) As Int64 new Protected Function FromString(value As String, locale As Locale = Nil) As Int64 rem Protected Function Parse(theText As Text, Optional locale As Xojo.Core.Locale) As Int64 new Protected Function Parse(value As String, locale As Locale = Nil) As Int64 new Global Function ToString(Extends value As Int64, locale As Locale = Nil) As String new Global Function ToString(Extends value As Int64, locale As Locale = Nil, format As String) As String End Module Module Int8 rem Protected Function FromBinary(theText As Text) As Int8 rem Protected Function FromHex(theText As Text) As Int8 rem Protected Function FromOctal(theText As Text) As Int8 new Protected Function FromBinary(value As String) As Int8 new Protected Function FromHex(value As String) As Int8 new Protected Function FromOctal(value As String) As Int8 new Protected Function FromString(value As String, locale As Locale = Nil) As Int8 rem Protected Function Parse(theText As Text, Optional locale As Xojo.Core.Locale) As Int8 new Protected Function Parse(value As String, locale As Locale = Nil) As Int8 new Global Function ToString(Extends value As Int8, locale As Locale = Nil) As String new Global Function ToString(Extends value As Int8, locale As Locale = Nil, format As String) As String End Module Module Integer rem Protected Function FromBinary(theText As Text) As Integer rem Protected Function FromHex(theText As Text) As Integer rem Protected Function FromOctal(theText As Text) As Integer new Protected Function FromBinary(value As String) As Integer new Protected Function FromHex(value As String) As Integer new Protected Function FromOctal(value As String) As Integer new Protected Function FromString(value As String, locale As Locale = Nil) As Integer rem Protected Function Parse(theText As Text, Optional locale As Xojo.Core.Locale) As Integer new Protected Function Parse(value As String, locale As Locale = Nil) As Integer End Module Class InternetHeaders chg Public Function Name(zeroBasedIndex As integer) As string new Public Function ValueAt(index As integer) As string new Public Sub AddHeader(name As string, value As string) chg Public Sub Delete(name As string, zeroBasedIndex As integer) new Public Sub RemoveAllHeaders() new Public Sub RemoveHeader(name As String, index As Integer = -1) chg Public Sub SetHeader(name As string, value As string, zeroBasedIndex As integer) new Public Sub Value(name As String, Assigns value As String) new Public Sub Value(name As String, value As String, index As Integer) new End Class new Class InvalidArgumentException new Inherits RuntimeException new End Class new Class InvalidJSONException new Inherits RuntimeException new Public Property Offset As UInteger new End Class Class IPCSocket chg Event Error(err As RuntimeException) new Public Function EndOfFile() As Boolean End Class new Interface Iterable new Function Iterator() As Iterator new End Interface new Interface Iterator new Function MoveNext() As Boolean new Function Value() As Variant new End Interface Class JSONItem chg Protected Const version = 2.0000000000000000000 new Public Function ChildAt(Index As Integer) As JSONItem new Public Function NameAt(index As integer) As String new Public Function ValueAt(index As Integer) As Variant new Public Sub Add(Value As Variant) new Public Sub AddAt(index As integer, value As Variant) chg Public Sub Child(index As Integer, Assigns value As JSONItem) new Public Sub ChildAt(Index As Integer, Assigns obj As JSONItem) new Public Sub RemoveAll() new Public Sub RemoveAt(Index As Integer) new Public Sub ValueAt(index As Integer, Assigns value As Variant) End Class Class KeychainItem new Public Sub Remove() End Class chg Attributes( "DefaultEvent" = "AcceleratorKey" ) Class Label chg Attributes( "Deprecated" = "TextAlignments.Center" ) Public Const AlignCenter = 1 chg Attributes( "Deprecated" = "TextAlignments.Left" ) Public Const AlignLeft = 0 chg Attributes( "Deprecated" = "TextAlignments.Right" ) Public Const AlignRight = 2 new Public Property FontName As String new Public Property FontSize As Single new Public Property FontUnit As FontUnits chg Attributes( "Deprecated" = "Value" ) Public Property Text As String chg Attributes( "Deprecated" = "TextAlignment" ) Public Property TextAlign As Integer new Public Property TextAlignment As TextAlignments chg Attributes( "Deprecated" = "FontName" ) Public Property TextFont As String chg Attributes( "Deprecated" = "FontSize" ) Public Property TextSize As Single chg Attributes( "Deprecated" = "FontUnit" ) Public Property TextUnit As FontUnits new Public Property Value As String End Class chg Attributes( "DefaultEvent" = "Open" ) Class Line chg Attributes( "Deprecated" = "Thickness" ) Public Property BorderWidth As Double new Public Property Thickness As Double chg Public Property X1 As Double chg Public Property X2 As Double chg Public Property Y1 As Double chg Public Property Y2 As Double End Class chg Attributes( "DefaultEvent" = "Change" ) Class Listbox chg Attributes( "Deprecated" = "Alignments.Center" ) Public Const AlignCenter = 2 chg Attributes( "Deprecated" = "Alignments.Decimal" ) Public Const AlignDecimal = 4 chg Attributes( "Deprecated" = "Alignments.Default" ) Public Const AlignDefault = 0 chg Attributes( "Deprecated" = "Alignments.Left" ) Public Const AlignLeft = 1 chg Attributes( "Deprecated" = "Alignments.Right" ) Public Const AlignRight = 3 new Public Const AllColumns = -1 new Public Const AllRows = -1 chg Attributes( "Deprecated" = "Borders.Default" ) Public Const BorderDefault = 0 chg Attributes( "Deprecated" = "Borders.DoubleThinSolid" ) Public Const BorderDoubleThinSolid = 5 chg Attributes( "Deprecated" = "Borders.None" ) Public Const BorderNone = 1 chg Attributes( "Deprecated" = "Borders.ThickSolid" ) Public Const BorderThickSolid = 4 chg Attributes( "Deprecated" = "Borders.ThinDotted" ) Public Const BorderThinDotted = 2 chg Attributes( "Deprecated" = "Borders.ThinSolid" ) Public Const BorderThinSolid = 3 new Public Const NoSelection = -1 chg Attributes( "Deprecated" = "RowSelectionTypes.Multiple" ) Public Const SelectionMultiple = 1 chg Attributes( "Deprecated" = "RowSelectionTypes.Single" ) Public Const SelectionSingle = 0 chg Attributes( "Deprecated" = "SortDirections.Ascending" ) Public Const SortAscending = 1 chg Attributes( "Deprecated" = "SortDirections.Descending" ) Public Const SortDescending = -1 chg Attributes( "Deprecated" = "SortDirections.None" ) Public Const SortNone = 0 chg Attributes( "Deprecated" = "CellTypes.Checkbox" ) Public Const TypeCheckbox = 2 chg Attributes( "Deprecated" = "CellTypes.Default" ) Public Const TypeDefault = 0 chg Attributes( "Deprecated" = "CellTypes.TextField" ) Public Const TypeEditable = 3 chg Attributes( "Deprecated" = "CellTypes.TextArea" ) Public Const TypeEditableTextArea = 4 chg Attributes( "Deprecated" = "CellTypes.TextField" ) Public Const TypeEditableTextField = 3 chg Attributes( "Deprecated" = "CellTypes.Normal" ) Public Const TypeNormal = 1 chg Attributes( "Deprecated" = "ActiveTextControl" ) Public Property ActiveCell As TextEdit new Public Property ActiveTextControl As TextEdit new Public Enum Alignments As Global.Integer new Default = 0 new Left = 1 new Center = 2 new Right = 3 new Decimal = 4 new End Enum new Public Property AllowAutoHideScrollbars As Boolean new Public Property AllowExpandableRows As Boolean new Public Property AllowFocusRing As Boolean new Public Property AllowResizableColumns As Boolean new Public Property AllowRowDragging As Boolean new Public Property AllowRowReordering As Boolean chg Attributes( "Deprecated" = "AllowAutoHideScrollbars" ) Public Property AutoHideScrollbars As Boolean chg Attributes( "Deprecated" = "HasBorder" ) Public Property Border As Boolean new Public Enum Borders As Global.Integer new Default = 0 new None = 1 new ThinDotted = 2 new ThinSolid = 3 new ThickSolid = 4 new DoubleThinSolid = 5 new End Enum new Public Enum CellTypes As Global.Integer new Default = 0 new Normal = 1 new CheckBox = 2 new TextField = 3 new TextArea = 4 new End Enum chg Attributes( "Deprecated" = "AllowResizableColumns" ) Public Property ColumnsResizable As Boolean new Public Property DropIndicatorVisible As Boolean chg Attributes( "Deprecated" = "AllowRowDragging" ) Public Property EnableDrag As Boolean chg Attributes( "Deprecated" = "AllowRowReordering" ) Public Property EnableDragReorder As Boolean new Public Property FontName As String new Public Property FontSize As Single new Public Property FontUnit As FontUnits new Public Function CellAlignmentAt(row As Integer, column As Integer) As Alignments new Public Function CellAlignmentOffsetAt(row As Integer, column As Integer) As Integer new Public Function CellBorderBottomAt(row As Integer, column As Integer) As Borders new Public Function CellBorderLeftAt(row As Integer, column As Integer) As Borders new Public Function CellBorderRightAt(row As Integer, column As Integer) As Borders new Public Function CellBorderTopAt(row As Integer, column As Integer) As Borders new Public Function CellCheckBoxStateAt(row As Integer, column As Integer) As CheckBox.VisualStates new Public Function CellCheckBoxValueAt(row As Integer, column As Integer) As Boolean new Public Function CellTagAt(row As Integer, column As Integer) As Variant new Public Function CellTooltipAt(row As Integer, column As Integer) As String new Public Function CellTypeAt(row As Integer, column As Integer) As CellTypes new Public Function CellValueAt(row As Integer, column As Integer) As String new Public Function ColumnAlignmentAt(index As Integer) As Alignments new Public Function ColumnAlignmentOffsetAt(index As Integer) As Integer new Public Function ColumnAt(index As Integer) As ListColumn new Public Function ColumnSortDirectionAt(index As Integer) As SortDirections new Public Function ColumnSortTypeAt(column As Integer) As SortTypes new Public Function ColumnTagAt(column As Integer) As Variant new Public Function ColumnTypeAt(index As Integer) As CellTypes new Public Function ExpandableRowAt(row As Integer) As Boolean new Public Function HeaderAt(index As Integer) As String new Public Function RowDepthAt(row As Integer) As Integer new Public Function RowExpandedAt(v As Integer) As Boolean new Public Function RowImageAt(index As Integer) As Picture new Public Function Rows() As Iterable new Public Function RowTagAt(row As Integer) As Variant chg Attributes( "Deprecated" = "GridLinesHorizontalStyle" ) Public Property GridLinesHorizontal As Integer new Public Property GridLinesHorizontalStyle As Borders chg Attributes( "Deprecated" = "GridLinesVerticalStyle" ) Public Property GridLinesVertical As Integer new Public Property GridLinesVerticalStyle As Borders new Public Property HasBorder As Boolean new Public Property HasHeader As Boolean chg Attributes( "Deprecated" = "HasHeader" ) Public Property HasHeading As Boolean new Public Property HasHorizontalScrollbar As Boolean new Public Property HasVerticalScrollbar As Boolean chg Attributes( "Deprecated" = "AllowExpandableRows" ) Public Property Hierarchical As Boolean new Public Property LastAddedRowIndex As Integer new Public Property LastColumnIndex As Integer chg Attributes( "Deprecated" = "LastAddedRowIndex" ) Public Property LastIndex As Integer new Public Property LastRowIndex As Integer chg Attributes( "Deprecated" = "RowCount" ) Public Property ListCount As Integer chg Attributes( "Deprecated" = "SelectedRowIndex" ) Public Property ListIndex As Integer new Public Property RowCount As Integer new Public Property RowSelectionType As RowSelectionTypes new Public Enum RowSelectionTypes As Global.Integer new Single = 0 new Multiple = 1 new End Enum chg Attributes( "Deprecated" = "HasHorizontalScrollbar" ) Public Property ScrollBarHorizontal As Boolean chg Attributes( "Deprecated" = "HasVerticalScrollbar" ) Public Property ScrollBarVertical As Boolean chg Attributes( "Deprecated" = "SelectedRowCount" ) Public Property SelCount As Integer new Public Property SelectedRowCount As Integer new Public Property SelectedRowIndex As Integer new Public Property SelectedRowValue As String chg Attributes( "Deprecated" = "RowSelectionType" ) Public Property SelectionType As Integer chg Attributes( "Deprecated" = "DropIndicatorVisible""" ) Public Property ShowDropIndicator As Boolean new Public Enum SortDirections As Global.Integer new Descending = -1 new None = 0 new Ascending = 1 new End Enum chg Attributes( "Deprecated" = "SortingColumn" ) Public Property SortedColumn As Integer new Public Property SortingColumn As Integer new Public Enum SortTypes As Integer new Sortable = 0 new NotSortable = 1 new End Enum new Public Sub AddExpandableRow(Text As String) new Public Sub AddExpandableRowAt(row As Integer, text As String, indent As Integer = 0) new Public Sub AddRowAt(row As Integer, text As String, indent As Integer = 0) new Public Sub CellAlignmentAt(row As Integer, column As Integer, Assigns value As Alignments) new Public Sub CellAlignmentOffsetAt(row As Integer, column As Integer, Assigns _value As Integer) new Public Sub CellBorderBottomAt(row As Integer, column As Integer, Assigns value As Borders) new Public Sub CellBorderLeftAt(row As Integer, column As Integer, Assigns value As Borders) new Public Sub CellBorderRightAt(row As Integer, column As Integer, Assigns value As Borders) new Public Sub CellBorderTopAt(row As Integer, column As Integer, Assigns value As Borders) new Public Sub CellCheckBoxStateAt(row As Integer, column As Integer, Assigns _value As CheckBox.VisualStates) new Public Sub CellCheckBoxValueAt(row As Integer, column As Integer, Assigns _value As Boolean) chg Public Sub CellTag(row As Integer, column As Integer, Assigns value As Variant) new Public Sub CellTagAt(row As Integer, column As Integer, Assigns value As Variant) new Public Sub CellTooltipAt(row As Integer, column As Integer, Assigns _value As String) new Public Sub CellTypeAt(row As Integer, column As Integer, Assigns _value As CellTypes) new Public Sub CellValueAt(row As Integer, column As Integer, Assigns _value As String) new Public Sub ColumnAlignmentAt(Index As Integer, Assigns value As Alignments) new Public Sub ColumnAlignmentOffsetAt(Index As Integer, Assigns _value As Integer) new Public Sub ColumnAt(Index As Integer, Assigns _value As ListColumn) chg Public Sub ColumnSortDirection(Index As Integer, Assigns value As Integer) new Public Sub ColumnSortDirectionAt(Index As Integer, Assigns sortDirection As SortDirections) new Public Sub ColumnSortTypeAt(column As Integer, Assigns value As SortTypes) chg Public Sub ColumnTag(column As Integer, Assigns value As Variant) new Public Sub ColumnTagAt(column As Integer, Assigns value As Variant) new Public Sub ColumnTypeAt(Index As Integer, Assigns _value As CellTypes) new Public Sub EditCellAt(row As Integer, column As Integer) new Public Sub ExpandableRowAt(row As Integer, Assigns value As Boolean) new Public Sub HeaderAt(Index As Integer, Assigns _value As String) new Public Sub RemoveAllRows() new Public Sub RemoveRowAt(index As Integer) new Public Sub RowExpandedAt(v As Integer, Assigns _value As Boolean) new Public Sub RowImageAt(Index As Integer, Assigns _value As Picture) new Public Sub RowTagAt(row As Integer, Assigns _value As Variant) chg Attributes( "Deprecated" = "SelectedRowValue" ) Public Property Text As String chg Attributes( "Deprecated" = "FontName" ) Public Property TextFont As String chg Attributes( "Deprecated" = "FontSize" ) Public Property TextSize As Single chg Attributes( "Deprecated" = "FontUnit" ) Public Property TextUnit As FontUnits chg Attributes( "Deprecated" = "AllowFocusRing" ) Public Property UseFocusRing As Boolean End Class new Class ListboxColumn new Public Property Tag As Variant new Public Property Type As Listbox.CellTypes new Public Property Value As String new End Class new Class ListboxRow new Public Function Columns() As Iterable new Public Function ColumnTagAt(column As Integer) As Variant new Public Function ColumnTypeAt(column As Integer) As Listbox.CellTypes new Public Function ColumnValueAt(column As Integer) As String new Public Property Selected As Boolean new Public Sub Constructor(lb As Listbox, row As Integer) new Public Property Tag As Variant new End Class new Class Locale new Public Property CurrencySymbol As String new Public Property DecimalSeparator As String new Public Shared Function Current() As Locale new Public Shared Function Raw() As Locale new Public Property GroupingSeparator As String new Public Property Identifier As String new Public Sub Constructor(localeIdentifier As String) new End Class Class MenuItem chg Attributes( "Deprecated" = "AutoEnabled" ) Public Property AutoEnable As Boolean new Public Property AutoEnabled As Boolean chg Attributes( "Deprecated" = "HasCheckMark" ) Public Property Checked As Boolean new Public Function LastRowIndex() As Integer new Public Function MenuAt(index As Integer) As MenuItem new Public Property HasCheckMark As Boolean chg Attributes( "Deprecated" = "Shortcut" ) Public Property KeyboardShortcut As String new Public Property Shortcut As String new Public Sub AddMenu(item As MenuItem) new Public Sub AddMenuAt(index As Integer, item As MenuItem) new Public Sub RemoveMenuAt(index As Integer) chg Attributes( "Deprecated" = "Value" ) Public Property Text As String new Public Property Value As String End Class Class MessageDialog chg Attributes( "Deprecated" = "IconTypes.Caution" ) Public Const GraphicCaution = 1 chg Attributes( "Deprecated" = "IconTypes.None" ) Public Const GraphicNone = -1 chg Attributes( "Deprecated" = "IconTypes.Note" ) Public Const GraphicNote = 0 chg Attributes( "Deprecated" = "IconTypes.Question" ) Public Const GraphicQuestion = 3 chg Attributes( "Deprecated" = "IconTypes.Stop" ) Public Const GraphicStop = 2 chg Attributes( "Deprecated" = "IconType" ) Public Property Icon As Integer new Public Property IconType As IconTypes new Public Enum IconTypes As Integer new Caution = 1 new None = -1 new Note = 0 new Question = 3 new Stop = 2 new End Enum new Public Shared Sub Show(Message As String) End Class Class MessageDialogButton chg Attributes( "Deprecated" = "IsCancel" ) Public Property Cancel As Boolean chg Attributes( "Deprecated" = "IsDefault" ) Public Property Default As Boolean new Public Property IsCancel As Boolean new Public Property IsDefault As Boolean new Public Property IsVisible As Boolean End Class Class Movie new Public Shared Function Open(movieFile As FolderItem) As Movie new Public Shared Function OpenURL(url As String) As Movie chg Public Property Handle As Ptr End Class chg Attributes( "DefaultEvent" = "Play" ) Class MoviePlayer new Public Property AutoAdjustToMovieSize As Boolean new Public Property AutoRepeat As Boolean chg Attributes( "Deprecated" = "AutoAdjustToMovieSize" ) Public Property AutoResize As Boolean chg Attributes( "Deprecated" = "HasController" ) Public Property Controller As Integer new Public Property HasController As Boolean chg Attributes( "Deprecated" = "HasStepControls" ) Public Property HasStep As Boolean new Public Property HasStepControls As Boolean new Public Property HasVolumeControl As Boolean chg Attributes( "Deprecated" = "AutoRepeat" ) Public Property Looping As Boolean chg Attributes( "Deprecated" = "OLEMovieObject" ) Public Property MovieController As OLEObject new Public Property OLEMovieObject As OLEObject chg Attributes( "Deprecated" = "RepeatInReverse" ) Public Property Palindrome As Boolean new Public Property RepeatInReverse As Boolean chg Attributes( "Deprecated" = "HasVolumeControl" ) Public Property Speaker As Boolean End Class new Class NetworkException new Inherits RuntimeException new End Class new Class ObjCBlock new Public Property Handle As Ptr new Public Sub Constructor(theDelegate As Object) new End Class Class Object2D chg Attributes( "Deprecated" = "BorderOpacity" ) Public Property Border As Double new Public Property BorderOpacity As Double chg Attributes( "Deprecated" = "FillOpacity" ) Public Property Fill As Double new Public Property FillOpacity As Double End Class chg Attributes( "Deprecated" = "OpenFileDialog" ) Class OpenDialog chg Public Function Item(index As Integer) As FolderItem End Class new Class OpenFileDialog new Inherits FolderItemDialog new Public Property AllowMultipleSelections As Boolean new Public Property Count As Integer new Public Function SelectedFiles(followAlias As Boolean = True) As Iterable new Public Sub Constructor() new End Class chg Attributes( "DefaultEvent" = "Open" ) Class Oval chg Public Property BorderThickness As Double new Attributes( "Deprecated" = "BorderThickness" ) Public Property BorderWidth As Integer End Class chg Attributes( "DefaultEvent" = "Change" ) Class PagePanel rem Public Property Enabled As Boolean new Public Property LastAddedPanelIndex As Integer new Public Property SelectedPanelIndex As Integer new Public Sub AddPanel() new Public Sub AddPanelAt(index As Integer) new Public Sub RemovePanelAt(index As Integer) chg Attributes( "Deprecated" = "SelectedPanelIndex" ) Public Property Value As Integer End Class Class Paragraph chg Attributes( "Deprecated" = "TextAlignment" ) Public Property Alignment As Integer new Public Property TextAlignment As TextAlignments End Class Class Picture chg Attributes( "Deprecated" = "QualityMaximum" ) Public Const QualityMax = 100 new Public Const QualityMaximum = 100 new Attributes( "Deprecated" = "QualityMinimum" ) Public Const QualityMin = 0 chg Public Const QualityMinimum = 0 new Public Enum Formats As Integer new BMP = 350 new GIF = 402 new JPEG = 151 new PNG = 150 new TIFF = 403 new End Enum new Public Function ImageAt(v As Integer) As Picture rem Public Shared Function IsExportFormatSupported(format As String) As Boolean rem Public Shared Function IsImportFormatSupported(format As String) As Boolean new Public Shared Function IsExportFormatSupported(format As Picture.Formats) As Boolean new Public Shared Function IsImportFormatSupported(format As Picture.Formats) As Boolean new Public Shared Function OpenVector(file As FolderItem) As Picture new Public Function ToData(format As Picture.Formats, quality As Integer = QualityDefault) As MemoryBlock new Public Sub Save(file As FolderItem, format As Picture.Formats, quality As Integer = QualityDefault) chg Attributes( "Deprecated" = "Alpha channels" ) Public Property Transparent As Integer End Class Class PixmapShape chg Public Property SourceLeft As Double chg Public Property SourceTop As Double End Class Class POP3SecureSocket chg Attributes( "Deprecated" = "IsEncryptPassword" ) Public Dim encryptPassword As boolean new Public Dim IsEncryptPassword As boolean new Event LoginSucceeded() new Event MessagesCounted(count As integer) new Event RollbackSucceeded() new Event ServerReplied(command As string, data As string) chg Public Sub Event_Error(err As RuntimeException) Handles Error new Public Sub RequestMessageAt(id As integer) new Public Sub RequestMessages() new Public Sub RequestMessages(id As integer) new Public Sub RetrieveLinesAt(id As integer, lineCount As integer) new Public Sub RetrieveMessageAt(index As integer) new Public Sub SendCommand(command As string) End Class Class POP3Socket chg Public Sub Event_Error(err As RuntimeException) Handles Error End Class Class PopupArrow chg Attributes( "Deprecated" = "FacingDirection" ) Public Property Facing As Integer new Public Property FacingDirection As FacingDirections new Public Enum FacingDirections As Integer new East = 0 new West = 1 new North = 2 new South = 3 new SmallEast = 4 new SmallWest = 5 new SmallNorth = 6 new SmallSouth = 7 new End Enum End Class chg Attributes( "DefaultEvent" = "Change" ) Class PopupMenu new Public Const NoSelection = -1 new Public Property FontName As String new Public Property FontSize As Single new Public Property FontUnit As FontUnits new Public Function RowTagAt(index As Integer) As Variant new Public Function RowValueAt(index As Integer) As String new Public Property LastAddedRowIndex As Integer new Public Property LastRowIndex As Integer chg Attributes( "Deprecated" = "RowCount" ) Public Property ListCount As Integer chg Attributes( "Deprecated" = "SelectedRowIndex" ) Public Property ListIndex As Integer new Public Property RowCount As Integer new Public Property SelectedRowIndex As Integer new Public Property SelectedRowValue As String new Public Sub AddAllRows(rows() As String) chg Public Sub AddRow(item As String) new Public Sub AddRowAt(row As Integer, str As String) new Public Sub RemoveAllRows() new Public Sub RemoveRowAt(index As Integer) new Public Sub RowTagAt(Index As Integer, Assigns _value As Variant) chg Attributes( "Deprecated" = "SelectedRowValue" ) Public Property Text As String chg Attributes( "Deprecated" = "FontName" ) Public Property TextFont As String chg Attributes( "Deprecated" = "FontSize" ) Public Property TextSize As Single chg Attributes( "Deprecated" = "FontUnit" ) Public Property TextUnit As FontUnits End Class Class PrefsMenuItem new Event MenuItemSelected() As Boolean End Class Interface PreparedSQLStatement chg Sub BindType(index As Integer, type As Integer) new Sub ExecuteSQL(ParamArray bindItems() As Variant) new Function SelectSQL(ParamArray bindItems() As Variant) As RowSet End Interface Interface PreparedSQLStatementInterface chg Sub BindType(index As Integer, type As Integer) End Interface Class PrinterSetup new Public Shared Function OpenPrinter(setup As PrinterSetup) As Graphics new Public Function ShowPageSetupDialog(parentWindow As Window = Nil) As Boolean new Public Function ShowPrinterDialog(parentWindow As Window = Nil) As Graphics new Public Property IsLandscape As Boolean chg Attributes( "Deprecated" = "IsLandscape" ) Public Property Landscape As Boolean chg Attributes( "Deprecated" = "MaximumHorizontalResolution" ) Public Property MaxHorizontalResolution As Integer new Public Property MaximumHorizontalResolution As Integer new Public Property MaximumVerticalResolution As Integer chg Attributes( "Deprecated" = "MaximumVerticalResolution" ) Public Property MaxVerticalResolution As Integer new Public Property Settings As String chg Attributes( "Deprecated" = "Settings" ) Public Property SetupString As String End Class chg Attributes( "DefaultEvent" = "Open" ) Class ProgressBar new Public Property Indeterminate As Boolean chg Attributes( "Deprecated" = "MaximumValue" ) Public Property Maximum As Integer new Public Property MaximumValue As Integer chg Public Property Value As Double End Class chg Attributes( "DefaultEvent" = "Action" ) Class PushButton chg Attributes( "Deprecated" = "MacButtonStyles" ) Public Enum ButtonFrameStyle As Integer chg Attributes( "Deprecated" = "MacButtonStyle" ) Public Property ButtonStyle As ButtonFrameStyle new Public Property FontName As String new Public Property FontSize As Single new Public Property FontUnit As FontUnits new Public Property MacButtonStyle As MacButtonStyles new Public Enum MacButtonStyles As Integer new Push = 0 new Gradient = 1 new Recessed = 3 new Textured = 4 new RoundedTextured = 5 new Square = 6 new Bevel = 7 new Round = 8 new Help = 9 new End Enum new Public Sub Press() chg Attributes( "Deprecated" = "FontName" ) Public Property TextFont As String chg Attributes( "Deprecated" = "FontSize" ) Public Property TextSize As Single chg Attributes( "Deprecated" = "FontUnit" ) Public Property TextUnit As FontUnits End Class Class QuitMenuItem new Event MenuItemSelected() As Boolean End Class chg Attributes( "DefaultEvent" = "Action" ) Class RadioButton new Public Property FontName As String new Public Property FontSize As Single new Public Property FontUnit As FontUnits chg Attributes( "Deprecated" = "FontName" ) Public Property TextFont As String chg Attributes( "Deprecated" = "FontSize" ) Public Property TextSize As Single chg Attributes( "Deprecated" = "FontUnit" ) Public Property TextUnit As FontUnits End Class Class Range chg Attributes( "Deprecated" = "EndPosition" ) Public Property EndPos As Integer new Public Property EndPosition As Integer chg Attributes( "Deprecated" = "StartPosition" ) Public Property StartPos As Integer new Public Property StartPosition As Integer End Class Interface Readable new Function EndOfFile() As Boolean End Interface Module REALbasic chg Global Function BitwiseXor(value As UInt64, value2 As UInt64) As Integer chg Global Function SelectColor(ByRef value As Color, prompt As String, ShowAlpha As Boolean = False) As Boolean chg Protected Function System() As _SystemClass chg Attributes( "Deprecated" = "Xojo.Point" ) Protected Class Point End Class Protected Class Rect new Public Function Operator_Convert() As Rect new Public Sub Operator_Convert(r As Rect) End Class chg Attributes( "Deprecated" = "Xojo.Size" ) Protected Class Size End Class End Module Attributes( "Deprecated" = "SQLiteBlob" ) Class REALSQLBlob new Public Function EndOfFile() As Boolean End Class Attributes( "Deprecated" = "SQLitePreparedStatement" ) Class REALSQLPreparedStatement new Public Function SelectSQL(ParamArray params() As Variant) As RowSet new Public Sub ExecuteSQL(ParamArray params() As Variant) End Class chg Attributes( "Deprecated" = "RowSet" ) Class RecordSet rem Inherits DatabaseCursor chg Attributes( "Deprecated" = "RowSet.BeforeFirstRow" ) Public Property BOF As Boolean chg Attributes( "Deprecated" = "RowSet.AfterLastRow" ) Public Property EOF As Boolean chg Attributes( "Deprecated" = "RowSet.ColumnCount" ) Public Property FieldCount As Integer chg Public Function IdxField(oneBasedIndex As Integer) As DatabaseField End Class Interface RecordSetInterface chg Function ColumnType(index As UInt32) As Integer chg Function IdxField(index As UInt32) As DatabaseFieldInterface End Interface chg Attributes( "DefaultEvent" = "Open" ) Class Rectangle chg Public Property BorderThickness As Double new Attributes( "Deprecated" = "BorderThickness" ) Public Property BorderWidth As Integer End Class Class RectControl new Public Property AllowAutoDeactivate As Boolean new Public Property AllowTabStop As Boolean chg Attributes( "Deprecated" = "AllowAutoDeactivate" ) Public Property AutoDeactivate As Boolean chg Attributes( "Deprecated" = "Tooltip" ) Public Property HelpTag As String new Public Property Tooltip As String End Class Module Reports Protected Class RBReport new Public Function Run(rs As RowSet, printerSettings As PrinterSetup) As Boolean End Class Protected Class RecordSetQuery new Public Sub Constructor(source As RowSet) End Class End Module chg Attributes( "DefaultEvent" = "Open" ) Class RoundRectangle new Public Property BorderThickness As Double chg Attributes( "Deprecated" = "BorderThickness" ) Public Property BorderWidth As Integer new Public Property CornerHeight As Double new Public Property CornerWidth As Double End Class new Class RowSet new Implements Iterable new Public Property AfterLastRow As Boolean new Public Property BeforeFirstRow As Boolean new Public Property ColumnCount As Integer new Public Function Column(Name As String) As DatabaseColumn new Public Function ColumnAt(index As Integer) As DatabaseColumn new Public Function ColumnType(index As Integer) As Integer new Public Function Iterator() As Iterator new Public Function RowCount() As Integer new Public Property LastColumnIndex As Integer new Public Sub Close() new Protected Sub Constructor() new Public Sub EditRow() new Public Sub MoveToFirstRow() new Public Sub MoveToLastRow() new Public Sub MoveToNextRow() new Public Sub MoveToPreviousRow() new Public Sub RemoveRow() new Public Sub SaveRow() new End Class Module Runtime new Global Enum IOStreamHandleTypes As Global.Integer new FileNumber = 3 new FilePointer = 2 new Win32 = 1 new End Enum End Module Class RuntimeException new Public Function StackFrames() As StackFrame() new Public Sub Constructor() new Public Sub Constructor(message As String, errorCode As Integer = 0) End Class chg Attributes( "Deprecated" = "SaveFileDialog" ) Class SaveAsDialog End Class new Class SaveFileDialog new Inherits FolderItemDialog new Public Sub Constructor() new End Class Class Screen new Public Property ColorDepth As Integer chg Attributes( "Deprecated" = "ColorDepth" ) Public Property Depth As Integer new Public Shared Function ScreenAt(index As Integer) As Screen new Public Shared Property LastScreenIndex As Integer new Public Shared Property ScreenCount As Integer End Class chg Attributes( "DefaultEvent" = "ValueChanged" ) Class ScrollBar chg Attributes( "Deprecated" = "AllowFocus" ) Public Property AcceptFocus As Boolean new Public Property AllowFocus As Boolean new Public Property AllowLiveScrolling As Boolean chg Attributes( "Deprecated" = "AllowLiveScrolling" ) Public Property LiveScroll As Boolean chg Attributes( "Deprecated" = "MaximumValue" ) Public Property Maximum As Integer new Public Property MaximumValue As Integer chg Attributes( "Deprecated" = "MinimumValue" ) Public Property Minimum As Integer new Public Property MinimumValue As Integer End Class new Class Segment new Public Property Enabled As Boolean new Public Property Icon As Picture new Public Property Selected As Boolean new Public Property Title As String new Public Property Tooltip As String new Public Property Width As Integer new End Class new Class SegmentedButton new Inherits RectControl new Event Pressed(segmentIndex As integer) new Public Function SegmentAt(index As Integer) As Segment new Public Property LastSegmentIndex As Integer new Public Property MacButtonStyle As MacButtonStyles new Public Enum MacButtonStyles As Integer new Automatic = 0 new Capsule = 1 new RoundRectangle = 2 new Rounded = 3 new TexturedRounded = 4 new TexturedSquare = 5 new SmallSquare = 6 new End Enum new Public Property SegmentCount As Integer new Public Property SelectedSegment As Segment new Public Property SelectedSegmentIndex As Integer new Public Property SelectionStyle As SelectionStyles new Public Enum SelectionStyles As Integer new Single = 0 new Multiple = 1 new None = 2 new End Enum new Public Sub AddSegment(segment As Segment) new Public Sub AddSegmentAt(index As Integer, segment As Segment) new Public Sub Event_CreatePane() Handles CreatePane new Public Sub RemoveAllSegments() new Public Sub RemoveSegmentAt(index As Integer) new Public Sub ResizeSegmentsToFit() new End Class chg Attributes( "Deprecated" = "SegmentedButton" ) Class SegmentedControl End Class chg Attributes( "Deprecated" = "SerialConnection" ) Class Serial new Public Function EndOfFile() As Boolean End Class new Class SerialConnection new Implements Writeable new Implements Readable new Public Const AccessDenied = 100 new Public Const Baud115200 = 14 new Public Const Baud1200 = 2 new Public Const Baud14400 = 9 new Public Const Baud1800 = 3 new Public Const Baud19200 = 10 new Public Const Baud230400 = 15 new Public Const Baud2400 = 4 new Public Const Baud28800 = 11 new Public Const Baud300 = 0 new Public Const Baud3600 = 5 new Public Const Baud38400 = 12 new Public Const Baud4800 = 6 new Public Const Baud57600 = 13 new Public Const Baud600 = 1 new Public Const Baud7200 = 7 new Public Const Baud9600 = 8 new Public Const Bits5 = 0 new Public Const Bits6 = 1 new Public Const Bits7 = 2 new Public Const Bits8 = 3 new Public Const BreakCondition = 103 new Public Const FramingError = 104 new Public Const InvalidOptions = 102 new Public Const NoError = 0 new Public Const PortNotFound = 101 new Event DataReceived() new Event Error(e As RuntimeException) new Event LineStateChanged(changedLines() As LineStates) new Public Property Baud As Integer new Public Property Bits As Integer new Public Property BytesAvailable As Integer new Public Property BytesLeftToSend As Integer new Public Property ClearToSend As Boolean new Public Property CTS As Boolean new Public Property DataCarrierDetect As Boolean new Public Property DataSetReady As Boolean new Public Property DataTerminalReady As Boolean new Public Property Device As SerialDevice new Public Property DTR As Boolean new Public Function EndOfFile() As Boolean new Public Function EOF() As Boolean new Public Function LookAhead(encoding As TextEncoding = Nil) As String new Public Function Read(byteCount As Integer, encoding As TextEncoding = Nil) As String new Public Function ReadAll(encoding As TextEncoding = Nil) As String new Public Function ReadError() As Boolean new Public Function WriteError() As Boolean new Public Property Handle As Integer new Public Enum LineStates As Global.Integer new ClearToSend = 4 new DataCarrierDetect = 8 new DataSetReady = 32 new DataTerminalReady = 1 new RequestToSend = 2 new RingIndicator = 16 new End Enum new Public Enum Parities As Global.Integer new None = 0 new Odd = 1 new Even = 2 new End Enum new Public Property Parity As Parities new Public Property RequestToSend As Boolean new Public Property RingIndicator As Boolean new Public Property StopBit As StopBits new Public Enum StopBits As Global.Integer new None = -1 new One = 0 new OnePointFive = 1 new Two = 2 new End Enum new Public Sub ClearBreak() new Public Sub Close() new Public Sub Connect() new Public Sub Flush() new Public Sub LeaveDTROnClose() new Public Sub Poll() new Public Sub RequestLineChangeNotification(linesToWatch() As LineStates) new Public Sub RequestLineChangeNotification(ParamArray linesToWatch() As LineStates) new Public Sub Reset() new Public Sub SetBreak() new Public Sub Write(str As String) new Public Sub XmitWait() new Public Property XON As Boolean new End Class new Class SerialDevice new Public Shared Property Count As Integer new Public Shared Function At(index As Integer) As SerialDevice new Public Shared Function WithName(name As String) As SerialDevice new Public Property InputDriverName As String new Public Shared Property LastIndex As Integer new Public Property MaximumSpeed As Integer new Public Property Name As String new Public Property OutputDriverName As String new Public Property RatedSpeed As Integer new End Class chg Attributes( "Deprecated" = "SerialDevice" ) Class SerialPort End Class Class ServerSocket chg Event Error(ErrorCode As Integer, err As RuntimeException) new Event SocketRequested() As TCPSocket End Class Class Shell chg Attributes( "Deprecated" = "ExitCode" ) Public Property ErrorCode As Integer new Public Property ExecuteMode As ExecuteModes new Public Enum ExecuteModes As Integer new Synchronous = 0 new Asynchronous = 1 new Interactive = 2 new End Enum new Public Property ExitCode As Integer chg Attributes( "Deprecated" = "ExecuteMode" ) Public Property Mode As Integer End Class Module Single new Protected Function FromString(value As String, locale As Locale = Nil) As Single rem Protected Function Parse(theText As Text, Optional locale As Xojo.Core.Locale) As Single new Protected Function Parse(value As String, locale As Locale = Nil) As Single new Global Function ToString(Extends value As Single, locale As Locale = Nil) As String new Global Function ToString(Extends value As Single, locale As Locale = Nil, format As String) As String End Module chg Attributes( "DefaultEvent" = "ValueChanged" ) Class Slider new Public Property AllowLiveScrolling As Boolean chg Attributes( "Deprecated" = "AllowLiveScrolling" ) Public Property LiveScroll As Boolean chg Attributes( "Deprecated" = "MaximumValue" ) Public Property Maximum As Integer new Public Property MaximumValue As Integer chg Attributes( "Deprecated" = "MinimumValue" ) Public Property Minimum As Integer new Public Property MinimumValue As Integer new Public Property TickMarkStyle As TickMarkStyles new Public Enum TickMarkStyles As Integer new None = 0 new TopLeft = 1 new BottomRight = 2 new End Enum chg Attributes( "Deprecated" = "TickMarkStyle" ) Public Property TickStyle As TickStyles chg Attributes( "Deprecated" = "TickMarkStyles" ) Public Enum TickStyles As Integer End Enum End Class Class SMTPSecureSocket new Public Property SMTPConnectionType As SMTPConnectionTypes new Public Enum SMTPConnectionTypes As Integer new STARTTLS = 0 new SSLTLS = 1 new End Enum new Public Sub RemoveAllMessages() End Class Class SMTPSocket End Class chg Attributes( "Deprecated" ) Class SOAPException End Class chg Attributes( "Deprecated" ) Class SOAPMethod End Class chg Attributes( "Deprecated" ) Class SOAPResult End Class Class SocketCore chg Event Error(err As RuntimeException) chg Attributes( "Deprecated" = "Error event" ) Public Property LastErrorCode As Integer End Class Class Sound new Public Shared Function Open(flie As FolderItem) As Sound End Class Class SpecialFolder new Public Shared Function Resource(name As String) As FolderItem rem Public Shared Property Var As FolderItem rem Public Shared Property VarLog As FolderItem new Public Shared Property Variable As FolderItem new Public Shared Property VariableLog As FolderItem new Attributes( "Deprecated" = "SpecialFolder.VariableLog" ) Public Shared Property VarLog As FolderItem End Class Class SQLiteBlob new Public Function EndOfFile() As Boolean End Class Class SQLiteDatabase chg Attributes( "Deprecated" = "WriteAheadLogging" ) Public Property MultiUser As Boolean new Public Sub AddDatabase(file As FolderItem, databaseName As String, encryptionKey As String) new Public Sub Constructor() new Public Sub Constructor(dbFile As FolderItem) new Public Sub CreateDatabase() new Public Sub RemoveDatabase(databaseName As String) new Public Property WriteAheadLogging As Boolean End Class Class SQLiteException chg Inherits DatabaseException End Class Class SQLitePreparedStatement new Public Function SelectSQL(ParamArray params() As Variant) As RowSet new Public Sub ExecuteSQL(ParamArray params() As Variant) End Class Class SSLSocket chg Event Error(err As RuntimeException) chg Attributes( "Deprecated" = "SSLConnectionType" ) Public Property ConnectionType As Integer chg Attributes( "Deprecated" = "SSLEnabled" ) Public Property Secure As Boolean new Public Property SSLConnectionType As SSLConnectionTypes new Public Enum SSLConnectionTypes As Integer new SSLv23 = 1 new TLSv1 = 3 new TLSv11 = 4 new TLSv12 = 5 new End Enum new Public Property SSLEnabled As Boolean chg Public Sub Event_Error(err As RuntimeException) Handles Error End Class new Class StackFrame new Public Property Address As Ptr new Public Property Name As String new End Class Module String new Global Function AscByte(Extends str As String) As Integer new Global Function BeginsWith(Extends s As String, value As String, options As ComparisonOptions = ComparisonOptions.CaseInsensitive, locale As Locale = Nil) As Boolean new Global Function Bytes(Extends s As String) As Integer new Protected Function ChrByte(value As Integer) As String new Global Function Compare(Extends s As String, other As String, comparison As ComparisonOptions = ComparisonOptions.CaseInsensitive, locale As Locale = Nil) As Integer new Global Function EndsWith(Extends s As String, value As String, options As ComparisonOptions = ComparisonOptions.CaseInsensitive, locale As Locale = Nil) As Boolean new Protected Function FromArray(fields() As String, delimiter As String = " ") As String new Global Function IndexOf(Extends s As String, startPosition As Integer = 0, searchString As String, options As ComparisonOptions = ComparisonOptions.CaseInsensitive, locale As Locale = Nil) As Integer new Global Function IndexOfBytes(Extends source As String, start As Integer = 0, find As String) As Integer new Global Function IsEmpty(Extends s As String) As Boolean new Global Function LeftBytes(Extends str As String, count As Integer) As String new Global Function Length(Extends s As String) As Integer new Global Function Middle(Extends s As String, index As Integer) As String new Global Function Middle(Extends s As String, index As Integer, length As Integer) As String new Global Function MiddleBytes(Extends source As String, start As Integer) As String new Global Function MiddleBytes(Extends source As String, start As Integer, length As Integer) As String new Global Function ReplaceAllBytes(Extends sourceString As String, substring As String, replacementString As String) As String new Global Function ReplaceBytes(Extends sourceString As String, substring As String, replacementString As String) As String new Global Function ReplaceLineEndings(Extends s As String, replacementLineEnding As String) As String new Global Function RightBytes(Extends str As String, count As Integer) As String new Global Function SplitBytes(Extends source As String, delimiter As String = " ") As String() new Global Function ToArray(Extends s As String, delimiter As String = " ") As String() new Global Function ToDouble(Extends s As String) As Double new Global Function ToInt64(Extends s As String) As Int64 new Global Function ToInteger(Extends s As String) As Integer new Global Function TrimLeft(Extends s As String) As String new Global Function TrimRight(Extends s As String) As String End Module chg Attributes( "Deprecated" = "TextShape" ) Class StringShape End Class Class StyledText new Public Function FontName(Start As Integer, Length As Integer = 1) As String new Public Sub AddStyleRun(Run As StyleRun) new Public Sub AddStyleRunAt(Run As StyleRun, Index As Integer) new Public Sub FontName(Start As Integer, Length As Integer = 1, Assigns _value As String) new Public Sub ParagraphTextAlignment(Index As Integer, Assigns _value As TextAlignments) new Public Sub RemoveStyleRunAt(Index As Integer) End Class Class StyleRun new Public Property FontSize As Single new Public Property IsBold As Boolean new Public Property IsItalic As Boolean new Public Property IsUnderline As Boolean chg Attributes( "Deprecated" = "FontSize" ) Public Property Size As Single End Class new Module System new Protected Const LogLevelAlert = 1001 new Protected Const LogLevelCritical = 1002 new Protected Const LogLevelDebug = 1007 new Protected Const LogLevelEmergency = 1000 new Protected Const LogLevelError = 1003 new Protected Const LogLevelInformation = 1006 new Protected Const LogLevelNotice = 1005 new Protected Const LogLevelSuccess = 1008 new Protected Const LogLevelWarning = 1004 new Protected Const PenTypeEraser = 2 new Protected Const PenTypeNone = 0 new Protected Const PenTypeTip = 1 new Protected Function CommandLine() As String new Protected Function EnvironmentVariable(Name As String) As String new Protected Function FontAt(index As Integer) As String new Protected Function FontCount() As Integer new Protected Function Gestalt(code As String, ByRef result As Integer) As Boolean new Protected Function GetNetworkInterface(index As Integer = -1) As NetworkInterface new Protected Function IsFunctionAvailable(functionName As String, libraryName As String) As Boolean new Protected Function Keychain() As Keychain new Protected Function Microseconds() As Double new Protected Function Network() As Network new Protected Function NetworkInterface(index As Integer = -1) As NetworkInterface new Protected Function PenButtonPushed(index As Integer) As Boolean new Protected Function Random() As Random new Protected Function SerialPort(index As integer) As SerialPort new Protected Function SerialPort(path As String) As SerialPort new Protected Function Ticks() As Integer new Protected Function Version() As System.VersionData new Protected Property KeychainCount As Integer new Protected Property LastFontIndex As Integer new Protected Property MouseDown As Boolean new Protected Property MouseX As Integer new Protected Property MouseY As Integer new Protected Property NetworkInterfaceCount As Integer new Protected Property PenPressure As Double new Protected Property PenType As Integer new Attributes( "Deprecated" = "SerialDevice.Count" ) Protected Property SerialPortCount As Integer new Protected Sub Beep() new Protected Sub DebugLog(msg As String) new Protected Sub EnvironmentVariable(Name As String, Assigns _value As String) new Protected Sub Keychain(Assigns value As Keychain) new Protected Sub Log(level As Integer, msg As String) new Protected Sub Speak(phrase As String, allowInterrupt As Boolean = False) new Protected Class VersionData new Public Function Operator_Compare(versionString As String) As Integer new Public Function ToString() As String new Public Property MajorVersion As Integer new Public Property MinorVersion As Integer new Public Property PatchVersion As Integer new End Class new End Module Class TabPanel rem Public Property Enabled As Boolean new Public Property FontName As String new Public Property FontSize As Single new Public Property FontUnit As FontUnits new Public Function CaptionAt(Index As Integer) As String new Public Sub AddTab(name As String) new Public Sub CaptionAt(Index As Integer, Assigns _value As String) chg Attributes( "Deprecated" = "FontName" ) Public Property TextFont As String chg Attributes( "Deprecated" = "FontSize" ) Public Property TextSize As Single chg Attributes( "Deprecated" = "FontUnit" ) Public Property TextUnit As FontUnits End Class Class TCPSocket new Public Function EndOfFile() As Boolean End Class chg Attributes( "DefaultEvent" = "TextChange" ) Class TextArea chg Attributes( "Deprecated" = "AllowTabs" ) Public Property AcceptTabs As Boolean chg Attributes( "Deprecated" = "TextAlignment" ) Public Property Alignment As Integer new Public Property AllowFocusRing As Boolean new Public Property AllowStyledText As Boolean new Public Property AllowTabs As Boolean chg Attributes( "Deprecated" = "BackgroundColor" ) Public Property BackColor As Color new Public Property BackgroundColor As Color chg Attributes( "Deprecated" = "HasBorder" ) Public Property Border As Boolean chg Attributes( "Deprecated" ) Public Property DataField As String chg Attributes( "Deprecated" ) Public Property DataSource As String new Public Property FontName As String new Public Property FontSize As Single new Public Property FontUnit As FontUnits new Public Function CharacterPosition(lineNumber As Integer) As Integer new Public Function CharacterPosition(x As Double, y As Double) As Integer new Public Function InsertionPosition(x As Double, y As Double) As Integer new Public Function LineNumber(position As Integer) As Integer new Public Function VerticalScrollPosition() As Integer new Public Property HasBorder As Boolean new Public Property HasHorizontalScrollbar As Boolean new Public Property HasVerticalScrollbar As Boolean new Public Property HorizontalScrollPosition As Integer chg Attributes( "Deprecated" = "MaximumCharactersAllowed" ) Public Property LimitText As Integer chg Attributes( "Deprecated" ) Public Property LiveUpdate As Boolean chg Attributes( "Deprecated" = "ValidationMask" ) Public Property Mask As String new Public Property MaximumCharactersAllowed As Integer chg Attributes( "Deprecated" = "HasHorizontalScrollbar" ) Public Property ScrollBarHorizontal As Boolean chg Attributes( "Deprecated" = "HasVerticalScrollbar" ) Public Property ScrollBarVertical As Boolean chg Attributes( "Deprecated" = "SelectionAlignment" ) Public Property SelAlignment As Integer chg Attributes( "Deprecated" = "SelectionBold" ) Public Property SelBold As Boolean new Public Property SelectedText As String new Public Property SelectionAlignment As Integer new Public Property SelectionBold As Boolean new Public Property SelectionFontName As String new Public Property SelectionFontSize As Single new Public Property SelectionItalic As Boolean new Public Property SelectionLength As Integer new Public Property SelectionPlain As Boolean new Public Property SelectionStart As Integer new Public Property SelectionTextColor As Color new Public Property SelectionUnderline As Boolean chg Attributes( "Deprecated" = "SelectionItalic" ) Public Property SelItalic As Boolean chg Attributes( "Deprecated" = "SelectionLength" ) Public Property SelLength As Integer chg Attributes( "Deprecated" = "SelectionPlain" ) Public Property SelPlain As Boolean chg Attributes( "Deprecated" = "SelectionStart" ) Public Property SelStart As Integer chg Attributes( "Deprecated" = "SelectedText" ) Public Property SelText As String chg Attributes( "Deprecated" = "SelectionTextColor" ) Public Property SelTextColor As Color chg Attributes( "Deprecated" = "SelectionFontName" ) Public Property SelTextFont As String chg Attributes( "Deprecated" = "SelectionFontSize" ) Public Property SelTextSize As Single chg Attributes( "Deprecated" = "SelectionUnderline" ) Public Property SelUnderline As Boolean chg Attributes( "Deprecated" = "AllowStyledText" ) Public Property Styled As Boolean new Public Sub AddText(text As String) new Public Sub VerticalScrollPosition(Assigns _value As Integer) chg Attributes( "Deprecated" = "Value" ) Public Property Text As String new Public Property TextAlignment As TextAlignments chg Attributes( "Deprecated" = "FontName" ) Public Property TextFont As String chg Attributes( "Deprecated" = "FontSize" ) Public Property TextSize As Single chg Attributes( "Deprecated" = "FontUnit" ) Public Property TextUnit As FontUnits chg Attributes( "Deprecated" = "AllowFocusRing" ) Public Property UseFocusRing As Boolean new Public Property ValidationMask As String new Public Property Value As String End Class Class TextEdit chg Attributes( "Deprecated" = "AllowTabs" ) Public Property AcceptTabs As Boolean new Public Property AllowFocusRing As Boolean new Public Property AllowSpellChecking As boolean new Public Property AllowTabs As Boolean chg Attributes( "Deprecated" = "AllowSpellChecking" ) Public Property AutomaticallyCheckSpelling As boolean chg Attributes( "Deprecated" = "BackgroundColor" ) Public Property BackColor As Color new Public Property BackgroundColor As Color chg Attributes( "Deprecated" = "IsBold" ) Public Property Bold As Boolean chg Attributes( "Deprecated" = "HasBorder" ) Public Property Border As Boolean chg Attributes( "Deprecated" ) Public Property DataSource As String new Public Property FontName As String new Public Property FontSize As Single new Public Property FontUnit As FontUnits new Public Function CharacterPosition(lineNumber As Integer) As Integer new Public Function CharacterPosition(x As Double, y As Double) As Integer new Public Function InsertionPosition(x As Double, y As Double) As Integer new Public Function LineNumber(position As Integer) As Integer new Public Property HasBorder As Boolean new Public Property HorizontalScrollPosition As Integer new Public Property IsBold As Boolean new Public Property IsItalic As Boolean new Public Property IsReadOnly As Boolean new Public Property IsUnderline As Boolean chg Attributes( "Deprecated" = "IsItalic" ) Public Property Italic As Boolean chg Attributes( "Deprecated" ) Public Property LiveUpdate As Boolean chg Attributes( "Deprecated" = "ValidationMask" ) Public Property Mask As String chg Attributes( "Deprecated" = "IsReadOnly" ) Public Property ReadOnly As Boolean new Public Property SelectedText As String new Public Property SelectionLength As Integer new Public Property SelectionStart As Integer chg Attributes( "Deprecated" = "SelectionLength" ) Public Property SelLength As Integer chg Attributes( "Deprecated" = "SelectionStart" ) Public Property SelStart As Integer chg Attributes( "Deprecated" = "SelectedText" ) Public Property SelText As String new Public Sub AddText(text As String) chg Attributes( "Deprecated" = "Value" ) Public Property Text As String new Public Property TextAlignment As TextAlignments chg Attributes( "Deprecated" = "FontName" ) Public Property TextFont As String chg Attributes( "Deprecated" = "FontSize" ) Public Property TextSize As Single chg Attributes( "Deprecated" = "FontUnit" ) Public Property TextUnit As FontUnits chg Attributes( "Deprecated" = "IsUnderline" ) Public Property Underline As Boolean chg Attributes( "Deprecated" = "AllowFocusRing" ) Public Property UseFocusRing As Boolean new Public Property ValidationMask As String new Public Property Value As String End Class chg Attributes( "DefaultEvent" = "TextChange" ) Class TextField chg Attributes( "Deprecated" = "AllowTabs" ) Public Property AcceptTabs As Boolean chg Attributes( "Deprecated" = "TextAlignment" ) Public Property Alignment As Integer new Public Property AllowFocusRing As Boolean new Public Property AllowTabs As Boolean chg Attributes( "Deprecated" = "BackgroundColor" ) Public Property BackColor As Color new Public Property BackgroundColor As Color chg Attributes( "Deprecated" = "HasBorder" ) Public Property Border As Boolean chg Attributes( "Deprecated" = "Hint" ) Public Property CueText As String chg Attributes( "Deprecated" ) Public Property DataField As String chg Attributes( "Deprecated" ) Public Property DataSource As String new Public Property FontName As String new Public Property FontSize As Single new Public Property FontUnit As FontUnits new Public Function CharacterPosition(lineNumber As Integer) As Integer new Public Function CharacterPosition(x As Double, y As Double) As Integer new Public Function InsertionPosition(x As Double, y As Double) As Integer new Public Function LineNumber(position As Integer) As Integer new Public Property HasBorder As Boolean new Public Property Hint As String new Public Property HorizontalScrollPosition1 As Integer chg Attributes( "Deprecated" = "MaximumCharactersAllowed" ) Public Property LimitText As Integer chg Attributes( "Deprecated" ) Public Property LiveUpdate As Boolean chg Attributes( "Deprecated" = "ValidationMask" ) Public Property Mask As String new Public Property MaximumCharactersAllowed As Integer new Public Property SelectedText As String new Public Property SelectionLength As Integer new Public Property SelectionStart As Integer chg Attributes( "Deprecated" = "SelectionLength" ) Public Property SelLength As Integer chg Attributes( "Deprecated" = "SelectionStart" ) Public Property SelStart As Integer chg Attributes( "Deprecated" = "SelectedText" ) Public Property SelText As String new Public Sub AddText(text As String) chg Attributes( "Deprecated" = "Value" ) Public Property Text As String new Public Property TextAlignment As TextAlignments chg Attributes( "Deprecated" = "FontName" ) Public Property TextFont As String chg Attributes( "Deprecated" = "FontSize" ) Public Property TextSize As Single chg Attributes( "Deprecated" = "FontUnit" ) Public Property TextUnit As FontUnits chg Attributes( "Deprecated" = "AllowFocusRing" ) Public Property UseFocusRing As Boolean new Public Property ValidationMask As String new Public Property Value As String End Class Class TextInputStream new Public Property BytePosition As UInt64 new Public Function EndOfFile() As Boolean new Public Function Handle(type As IOStreamHandleTypes) As Ptr chg Attributes( "Deprecated" ) Public Property LastErrorCode As Integer chg Attributes( "Deprecated" = "BytePosition" ) Public Property PositionB As UInt64 new Public Sub Constructor(handle As Ptr, type As IOStreamHandleTypes) rem Get rem Set rem End Get rem End Set rem End Property End Class Class TextOutputStream new Public Property Encoding As TextEncoding new Public Function Handle(type As IOStreamHandleTypes) As Ptr new Public Shared Function Open(file As FolderItem) As TextOutputStream chg Attributes( "Deprecated" ) Public Property LastErrorCode As Integer new Public Sub Constructor(handle As Ptr, type As IOStreamHandleTypes) End Class new Class TextShape new Inherits Object2D new Public Enum Alignment As Integer new Left = 0 new Top = 1 new Center = 2 new BaseLine = 3 new Right = 4 new Bottom = 5 new End Enum new Public Property Bold As Boolean new Public Property FontName As String new Public Property FontSize As Double new Public Property FontUnit As FontUnits new Public Property HorizontalAlignment As Alignment new Public Property Italic As Boolean new Attributes( "Deprecated" = "Value" ) Public Property Text As String new Public Property Underline As Boolean new Public Property Value As String new Public Property VerticalAlignment As Alignment new End Class Class Thread chg Attributes( "Deprecated" = "ThreadStates.NotRunning" ) Public Const NotRunning = 4 chg Attributes( "Deprecated" = "ThreadStates.Running" ) Public Const Running = 0 chg Attributes( "Deprecated" = "ThreadStates.Sleeping" ) Public Const Sleeping = 3 chg Attributes( "Deprecated" = "ThreadStates.Paused" ) Public Const Suspended = 2 chg Attributes( "Deprecated" = "ThreadStates.Waiting" ) Public Const Waiting = 1 new Event UserInterfaceUpdate(data() As Dictionary) chg Attributes( "Deprecated" = "ThreadState" ) Public Property State As Integer new Public Sub AddUserInterfaceUpdate(data As Dictionary) new Public Sub AddUserInterfaceUpdate(ParamArray data() As Pair) new Public Sub Pause() new Public Sub Start() new Public Sub Stop() new Public Property ThreadState As ThreadStates new Public Enum ThreadStates As Integer new Running = 0 new Waiting = 1 new Paused = 2 new Sleeping = 3 new NotRunning = 4 new End Enum End Class Class Timer chg Attributes( "Deprecated" = "RunModes.Multiple" ) Public Const ModeMultiple = 2 chg Attributes( "Deprecated" = "RunModes.Off" ) Public Const ModeOff = 0 chg Attributes( "Deprecated" = "RunModes.Single" ) Public Const ModeSingle = 1 new Public Delegate Sub TimerCallLater () new Public Delegate Sub TimerCallLaterWithValue (value As Variant) chg Attributes( "Deprecated" = "RunMode" ) Public Property Mode As Integer new Public Property RunMode As RunModes new Public Enum RunModes As Integer new Off = 0 new Single = 1 new Multiple = 2 new End Enum new Public Shared Sub CallLater(afterMilliseconds As Integer, method As TimerCallLater) new Public Shared Sub CallLater(afterMilliseconds As Integer, method As TimerCallLaterWithValue, value As Variant) new Public Shared Sub CancelCallLater(method As TimerCallLater) new Public Shared Sub CancelCallLater(method As TimerCallLaterWithValue) new Public Property Tolerance As Integer End Class new Class TimeZone new Public Property Abbreviation As String new Public Shared Function Current() As TimeZone new Public Property SecondsFromGMT As Integer new Public Sub Constructor(gmtOffsetInSeconds As Integer) new Public Sub Constructor(name As String) new Public Sub Constructor(tz As Xojo.Core.TimeZone) new End Class chg Attributes( "DefaultEvent" = "Action" ) Class Toolbar new Public Function ButtonAt(index As Integer) As ToolbarItem chg Public Function Item(index As Integer) As ToolItem new Public Sub AddButton(item As ToolbarItem) new Public Sub AddButtonAt(index As Integer, item As ToolbarItem) chg Public Sub Insert(index As Integer, item As ToolItem) chg Public Sub Remove(index As Integer) new Public Sub RemoveButtonAt(index As Integer) End Class new Class ToolbarButton new Inherits ToolbarItem new Public Property ButtonStyle As ButtonStyles new Public Enum ButtonStyles As Integer new PushButton = 0 new ToggleButton = 2 new Separator = 1 new DropDownMenu = 3 new SeparatorDropDownMenu = 4 new Space = 5 new FlexibleSpace = 6 new End Enum new Public Property Icon As Picture new Public Property Menu As MenuItem new Public Property Pressed As Boolean new End Class new Class ToolbarItem new Inherits ToolItem new End Class chg Attributes( "Deprecated" = "ToolbarButton" ) Class ToolButton End Class Class ToolItem chg Attributes( "Deprecated" = "Tooltip" ) Public Property HelpTag As String new Public Property Tooltip As String End Class Class TrayItem chg Attributes( "Deprecated" = "Tooltip" ) Public Property HelpTag As String new Public Enum PressTypes As Global.Integer new DoubleClick = 102 new LeftClick = 100 new RightClick = 101 new End Enum new Public Property Tooltip As String End Class Module UInt16 rem Protected Function FromBinary(theText As Text) As UInt16 new Protected Function FromBinary(value As String) As UInt16 rem Protected Function FromHex(theText As Text) As UInt16 rem Protected Function FromOctal(theText As Text) As UInt16 new Protected Function FromHex(value As String) As UInt16 new Protected Function FromOctal(value As String) As UInt16 new Protected Function FromString(value As String, locale As Locale = Nil) As UInt16 rem Protected Function Parse(theText As Text, Optional locale As Xojo.Core.Locale) As UInt16 new Protected Function Parse(value As String, locale As Locale = Nil) As UInt16 new Global Function ToString(Extends value As UInt16, locale As Locale = Nil) As String new Global Function ToString(Extends value As UInt16, locale As Locale = Nil, format As String) As String End Module Module UInt32 rem Protected Function FromBinary(theText As Text) As UInt32 rem Protected Function FromHex(theText As Text) As UInt32 rem Protected Function FromOctal(theText As Text) As UInt32 new Protected Function FromBinary(value As String) As UInt32 new Protected Function FromHex(value As String) As UInt32 new Protected Function FromOctal(value As String) As UInt32 new Protected Function FromString(value As String, locale As Locale = Nil) As UInt32 rem Protected Function Parse(theText As Text, Optional locale As Xojo.Core.Locale) As UInt32 new Protected Function Parse(value As String, locale As Locale = Nil) As UInt32 new Global Function ToString(Extends value As UInt32, locale As Locale = Nil) As String new Global Function ToString(Extends value As UInt32, locale As Locale = Nil, format As String) As String End Module Module UInt64 rem Protected Function FromBinary(theText As Text) As UInt64 rem Protected Function FromHex(theText As Text) As UInt64 rem Protected Function FromOctal(theText As Text) As UInt64 new Protected Function FromBinary(value As String) As UInt64 new Protected Function FromHex(value As String) As UInt64 new Protected Function FromOctal(value As String) As UInt64 new Protected Function FromString(value As String, locale As Locale = Nil) As UInt64 rem Protected Function Parse(theText As Text, Optional locale As Xojo.Core.Locale) As UInt64 new Protected Function Parse(value As String, locale As Locale = Nil) As UInt64 new Global Function ToString(Extends value As UInt64, locale As Locale = Nil) As String new Global Function ToString(Extends value As UInt64, locale As Locale = Nil, format As String) As String End Module Module UInt8 rem Protected Function FromBinary(theText As Text) As UInt8 rem Protected Function FromHex(theText As Text) As UInt8 rem Protected Function FromOctal(theText As Text) As UInt8 new Protected Function FromBinary(value As String) As UInt8 new Protected Function FromHex(value As String) As UInt8 new Protected Function FromOctal(value As String) As UInt8 new Protected Function FromString(value As String, locale As Locale = Nil) As UInt8 rem Protected Function Parse(theText As Text, Optional locale As Xojo.Core.Locale) As UInt8 new Protected Function Parse(value As String, locale As Locale = Nil) As UInt8 new Global Function ToString(Extends value As UInt8, locale As Locale = Nil) As String new Global Function ToString(Extends value As UInt8, locale As Locale = Nil, format As String) As String End Module Module UInteger rem Protected Function FromBinary(theText As Text) As UInteger rem Protected Function FromHex(theText As Text) As UInteger rem Protected Function FromOctal(theText As Text) As UInteger new Protected Function FromBinary(value As String) As UInteger new Protected Function FromHex(value As String) As UInteger new Protected Function FromOctal(value As String) As UInteger new Protected Function FromString(value As String, locale As Locale = Nil) As UInteger rem Protected Function Parse(theText As Text, Optional locale As Xojo.Core.Locale) As UInteger new Protected Function Parse(value As String, locale As Locale = Nil) As UInteger chg End Function chg End Module chg Class UnsupportedFormatException chg Inherits RuntimeException chg End Class chg Class UnsupportedOperationException chg Inherits RuntimeException chg End Class chg Class UpDownArrows chg Inherits RectControl chg Event Up() chg Event Down() chg Event GotFocus() chg Event LostFocus() chg Attributes( "Deprecated" = "AllowFocus" ) Public Property AcceptFocus As Boolean chg End Set new Public Property AllowFocus As Boolean End Class Class URLConnection new Public Function ResponseHeaders() As Iterable End Class chg Attributes( "Deprecated" ) Class VirtualVolume End Class rem Class WebAppSecurityOptions rem Public Dim ConnectionType As ConnectionTypes rem Public Dim FrameEmbedding As FrameOptions rem Public Enum ConnectionTypes As Integer rem SSLv2 = 0 rem SSLv23 = 1 rem SSLv3 = 2 rem TLSv1 = 3 rem TLSv11 = 4 rem TLSv12 = 5 rem End Enum rem Public Enum FrameOptions As Integer rem Deny = 0 rem SameOrigin = 1 rem Allow = 2 rem End Enum rem End Class Class Window chg Attributes( "Deprecated" = "BackgroundColor" ) Public Property BackColor As Color new Public Property BackgroundColor As Color chg Public Property Bounds As Xojo.Rect new Public Property Changed As Boolean chg Attributes( "Deprecated" = "HasCloseButton" ) Public Property CloseButton As Boolean chg Attributes( "Deprecated" = "Changed" ) Public Property ContentsChanged As Boolean new Public Property DefaultLocation As Locations chg Attributes( "Deprecated" = "Type" ) Public Property Frame As Integer chg Attributes( "Deprecated" = "HasFullScreenButton" ) Public Property FullScreenButton As Boolean new Public Function Controls() As Iterable chg Attributes( "Deprecated" = "HasBackgroundColor" ) Public Property HasBackColor As Boolean new Public Property HasBackgroundColor As Boolean new Public Property HasCloseButton As Boolean new Public Property HasFullScreenButton As Boolean new Public Property HasMaximizeButton As Boolean new Public Property HasMinimizeButton As Boolean new Public Enum Locations As Global.Integer new Default = 0 new ParentWindow = 1 new MainScreen = 2 new ParentWindowScreen = 3 new Staggered = 4 new End Enum chg Attributes( "Deprecated" = "MaximumHeight" ) Public Property MaxHeight As Integer chg Attributes( "Deprecated" = "HasMaximizeButton" ) Public Property MaximizeButton As Boolean new Public Property MaximumHeight As Integer new Public Property MaximumWidth As Integer chg Attributes( "Deprecated" = "MaximumWidth" ) Public Property MaxWidth As Integer chg Attributes( "Deprecated" ) Public Property MenuBarVisible As Boolean chg Attributes( "Deprecated" = "MinimumHeight" ) Public Property MinHeight As Integer chg Attributes( "Deprecated" = "HasMinimizeButton" ) Public Property MinimizeButton As Boolean new Public Property MinimumHeight As Integer new Public Property MinimumWidth As Integer chg Attributes( "Deprecated" = "MinimumWidth" ) Public Property MinWidth As Integer chg Attributes( "Deprecated" = "DefaultLocation" ) Public Property Placement As Integer new Public Property Type As Types new Public Enum Types As Global.Integer new Document = 0 new MovableModal = 3 new ModalDialog = 2 new Floating = 1 new PlainBox = 4 new ShadowedBox = 5 new Rounded = 6 new GlobalFloating = 7 new Sheet = 10 new ModelessDialog = 12 new End Enum End Class Module Xojo new Global Enum ComparisonOptions As Global.Integer new CaseInsensitive = 0 new CaseSensitive = 1 new End Enum new Global Function GenerateJSON(value As Variant, expanded As Boolean = False) As String new Global Function ParseJSON(json As String) As Variant new Global Class Point new Public Dim X As Double new Public Dim Y As Double new Public Function Clone() As Point new Public Function Distance(Other As Point) As Double new Public Function DistanceTo(other As Point) As Double new Public Function Operator_Compare(target As Xojo.Point) As Double new Public Sub Constructor() new Public Sub Constructor(X As Double, Y As Double) new Public Sub Offset(DeltaX As Double, DeltaY As Double) new Public Sub Translate(deltaX As Double, deltaY As Double) new End Class new Global Class Rect new Public Dim Origin As Point new Public Dim Size As Size new Public Property Bottom As Double new Get new Set new End Get new End Set new End Property new Public Property Center As Point new Get new Set new End Get new End Set new End Property new Public Function Clone() As Rect new Public Function Contains(Other As Rect) As Boolean new Public Function Contains(P As Point) As Boolean new Public Function Contains(X As Double, Y As Double) As Boolean new Public Function Intersection(Other As Rect) As Rect new Public Function Intersects(Other As Rect) As Boolean new Public Function LocalPoint(P As Point) As Point new Public Function LocalRect(Other As Rect) As Rect new Public Function Operator_Compare(Target As Xojo.Rect) As Double new Public Function Operator_Convert() As Realbasic.Rect new Public Function SplitHorizontal(X As Double) As Xojo.Rect new Public Function SplitVertical(Y As Double) As Xojo.Rect new Public Function Union(Other As Rect) As Rect new Public Property Height As Double new Public Property HorizontalCenter As Double new Public Property Left As Double new Public Property Right As Double new Public Sub Constructor() new Public Sub Constructor(X As Double, Y As Double, Width As Double, Height As Double) new Public Sub Offset(DeltaX As Double, DeltaY As Double) new Public Sub Operator_Convert(r As Realbasic.Rect) new Public Property Top As Double new Public Property VerticalCenter As Double new Public Property Width As Double new End Class new Global Class Size new Public Dim Height As Double new Public Dim Width As Double new Public Property Area As Double new Get new End Get new End Property new Public Function Clone() As Size new Public Function Operator_Compare(Target As Xojo.Size) As Double new Public Sub Constructor() new Public Sub Constructor(Width As Double, Height As Double) new End Class new Global Sub MessageBox(message As String) new Global Enum TextAlignments As Integer new Default = 0 new Left = 1 new Center = 2 new Right = 3 new End Enum End Module chg Global Const RBVersion = 2019.0299999999999727 chg Global Const RBVersionString = "2019r3" chg Global Const XojoVersion = 2019.0299999999999727 chg Global Const XojoVersionString = "2019r3"