//AB/ CLASSDEF Class cWinButton IS A BaseMetaType TextBox ABMetaTextBoxMixin DefineABMetaTextBoxMixin Set Type_Of_Drag To TD_DRAG_CONTROL Set Drop_Allowed To False Set Control_Type To ctBASE Set Floating_Menu_Id To TextBoxFloater.obj Set ClassPackage To "cWinButton.pkg" Set ObjectNameMask To "oWinButton" Set ClassHelpName To "Button" Property Complex Location 0 0 // Object Location (Complex: row, column) Property Always_Generate Complex Size 15 60 // Object Size (Complex: height, width) // Colors Property Color Color clBtnFace // Background Color Property Color TextColor clWindowText // Text Color // Hot tracking Property No_Execute Boolean pbHotTrack False // Enables hot tracking for the button Property No_Execute Color piHotColor clBlue // Defines hot tracking color // Gradient fill Property No_Execute Mode Gradient_Mode GRADIENT_NONE GRADIENT_NONE GRADIENT_VERTICAL GRADIENT_HORIZONTAL GRADIENT_TOPBOTTOM GRADIENT_LEFTRIGHT // Sets/Get Gradient fill mode. TOPBOTTOM mode fills the button background from top to center, then from center to bottom. LEFTRIGHT mode fills background from left to center, then from center to right. Property No_Execute Color GradientFromColor clBlue // First gradient color (from) Property No_Execute Color GradientToColor clNavy // Second gradient color (to) // Font/Label Property String Label // Text/Label associated with this Control Property No_Execute String Status_Help "" // Status_Help and/or psToolTip text. If you don't set the psToolTip, this text will be used. Property No_Execute Mode ButtonTextAlign BTA_CENTER BTA_CENTER BTA_VCENTER BTA_HCENTER BTA_TOP BTA_LEFT BTA_RIGHT BTA_BOTTOM // Sets/Gets the label text alignment mode Property Complex FontSize 12 0 // Text Font size (Complex) Property Integer FontWeight 400 // Text Font weight Property String TypeFace "MS SANS SERIF" // Font to be used for Text Property Boolean FontItalics False //If set to true, this property will italicize the current font. Property Boolean FontUnderline False // If true, font will be printed with underscores at the base of the character. If false, the font will be printed normally. Property No_Execute Boolean FontStrikeOut False // This property sets the strikeout state for the label // Appearance/Behaviour Property No_Execute Boolean pbDrawBorder True // Allows for the button to do not have a border. True by default. Property No_Execute Boolean pbDrawFocus True // Allows focus border (dotted rectangle) to be drawn when button gets a focus. Property No_Execute Boolean pbFlatState False // Allows flat state for the button. Property No_Execute Boolean Pointer_Only_State False // This determines how button will respond to the mouse. When set to true, the button will never take the focus // Bitmaps Property No_Execute String Bitmap // Bitmap file name (workspace bitmaps supported only!) Property No_Execute Mode piBitmapAlign BBA_CENTER BBA_CENTER BBA_VCENTER BBA_HCENTER BBA_TOP BBA_LEFT BBA_RIGHT BBA_BOTTOM // Bitmap position on the button face Property No_Execute Color piTransparentColor clFuchsia // This property sets the transparent color of the bitmap // Tooltips Property No_Execute String psToolTip "" // Gets/Sets control tooltip Property No_Execute String psToolTipTitle "" // Gets/Sets button tooltip title, shown on the tip in bold, at the Top Property No_Execute Mode piToolTipIcon TTI_INFO TTI_INFO TTI_NONE TTI_WARNING TTI_ERROR // Adds standard icon to the ToolTip. To use this property, psToolTipTitle must be set. Property No_Execute Boolean pbToolTipBalloon False // Indicates that the ToolTip control has the appearance of a cartoon "balloon," with rounded corners and a stem pointing to the item. Property No_Execute Boolean pbToolTips True // Enables/Disable the tooltip. Property No_Execute Boolean pbAutoLabelAsToolTipTitle True // (pbAutoLabelAsToolTipTitle) If no ToolTipTitle has been specified use the object label as ToolTipTitle? Property No_Execute Boolean pbAutoStatusHelpAsToolTip True // (pbAutoStatusHelpAsToolTip) If no psToolTip has been specified use the Status_Help as ToolTip text? // Other Property No_Execute Anchor peAnchors anNone // When a container is resized this determines how child objects are moved and resized. Objects can be anchored in any combination of left, right, top or bottom. Property No_Execute Boolean Enabled_State True // Disable the button from taking user-input? // Supplement Property No_Visible No_Generate Mode Border_Style Border_Dialog // Border_None Border_Normal Border_Dialog Border_ClientEdge Border_WindowEdge Border_StaticEdge // Border Display style Property No_Visible No_Generate Mode Label_Justification_Mode (jMode_VCenter ior jMode_Center) jMode_VCenter jMode_Top jMode_Bottom // Property No_Visible No_Generate Boolean Auto_Size_State False // Size (and resize) textbox based on text contents End_Class