============================================================================== Project : SigCj - VDF Classes for Codejock File : cSigCJPushButton.pkg Description : VDF Class for Codejock control Revision : $Rev: 692 $ $Date: 2011-05-04 10:38:15 -0400 (Wed, 04 May 2011) $ $Author: martin $ Martin Pincott Requirements : Visual DataFlex 12.1+ Codejock SuitePro - Version 12.0.0+ Copyright : (c) 2008 VDF SIG UK Visual DataFlex Special Interest Group UK. http://www.vdfsig.co.uk/ dev@vdfsig.co.uk This file is part of SigCj. SigCj is free software: you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation, either version 2.1 of the License, or (at your option) any later version. SigCj is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. If you have the complete SigCj workspace then a copy of the GNU Lesser General Public License is in the Docs folder. If not, see <http://www.gnu.org/licenses/>. ============================================================================== Contributions ============= When Who What ========== ============ ================================================== 2009-02-28 Tom Murphy Default size same as VDF button, Hot tracking, Pointer_Only and code for keyboard & mouse support. 2010-08-13 Katrien Naert Added Tooltip support 2010-11-16 Nils G. Svedmyr Upadte Tooltip support to DAC Standard ==============================================================================

cSigCJPushButton.pkg (view source)

import declarations
cSigCJPushButton : cSigCjComPushButton
{ OverrideProperty=Enabled_State DesignTime=False }
- Construct_Object()
  Inherited from cSigCjComPushButton
  -------------------------------------------------------------------------
  - IntegerPrivate_peAppearance
  - IntegerPrivate_piBackColor
  - IntegerPrivate_piBorderGap
  - StringPrivate_psCaption
  - BooleanPrivate_pbChecked
  - BooleanPrivate_pbDefault
  - BooleanPrivate_pbDrawFocusRect
  - BooleanPrivate_pbEnabled
  - BooleanPrivate_pbEnableMarkup
  - BooleanPrivate_pbFlatStyle
  - IntegerPrivate_piForeColor
  - StringPrivate_psImage
  - IntegerPrivate_peImageAlignment
  - IntegerPrivate_piImageGap
  - BooleanPrivate_pbMultiLine
  - BooleanPrivate_pbRightToLeft
  - IntegerPrivate_peStyle
  - IntegerPrivate_peTextAlignment
  - IntegerPrivate_peTextImageRelation
  - BooleanPrivate_pbUseVisualStyle
  - BooleanPrivate_pbValue
  - booleanPrivate_pbBold
    Property Private_pihWnd Gets the window handle that the control is bound to. Property Private_p OLEDropMode Returns or sets how a target component handles drop operations. Property Private_p Picture Gets or sets a graphic to be displayed in a push button. Property Private_p Transparent Determines if the background of a TabControlPage is visible in WinXP mode.
  - BooleanPrivate_pbItalic
  - BooleanPrivate_pbStrikethrough
  - BooleanPrivate_pbUnderline
  - StringPrivate_psFontName
  - NumberPrivate_pnFontSize
  - HandlePrivate_hoFont
  - StringPrivate_psTooltip
  - HandlephoToolTipController
  - HandlephoDropDownMenu
    ---------------------------------------------------------------------
  - BooleanPrivate_pbInDropDown
  - BooleanpbPointer_Only
    --------------------------------------------------------------------- pbPointer_Only - Prevents the button from taking the focus
  - HandlephoReturn_Focus
    phoReturn_Focus - Store the invoking object so focus can be returned if pointer only
  - BooleanpbEnableHotTrack
  - IntegerpiHotTrackColor
  - BooleanPrivate_pbVisible
  - BooleanPrivate_pbClick_Valid
- OnCreate()
  Inherited from cComActiveXControl
  - IntegerhoFont
- DoChangeTooltipStyle()
  *** Change by Nils G. Svedmyr, 16th of November 2010 *** This sets the tooltip style of the button to the same as DAW's cToolTipController class,
  - IntegerhoTooltip
  - IntegerhoToolTipController
  - VariantvTooltip
  - IntegeriIcon
  - IntegeriStyle
  - IntegeriWidth
  - BooleanbBaloon
  - StringsTitle
- Set(Boolean bState)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- BooleanpbBold()
- Set(Boolean bState)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- BooleanpbItalic()
- Set(Boolean bState)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- BooleanpbStrikethrough()
- Set(Boolean bState)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- BooleanpbUnderline()
- Set(String sName)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- StringpsFontName()
- Set(Number nSize)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- NumberpnFontSize()
- Set(Integer eAppearance)
  Inherited from cSigCJMethods_Mixin
- IntegerpeAppearance()
- Set(Integer iColor)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- IntegerpiBackColor()
- Set(Integer iGap)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- IntegerpiBorderGap()
- Set(String sCaption)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- StringpsCaption()
- Set(String sCaption)
  Inherited from cSigCJMethods_Mixin
  To support standard dataflex button code
- StringLabel()
  Inherited from DFLabel_Mixin
  To support standard dataflex button code
- Set(Boolean bState)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- BooleanpbChecked()
- Set(Boolean bState)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- BooleanpbDefault()
- Set(Boolean bState)
  Inherited from cSigCJMethods_Mixin
  *** Added by Nils G. Svedmyr *** 19 Nov 2010 To support standard dataflex button code
- BooleanDefault_State()
  *** Added by Nils G. Svedmyr *** 19 Nov 2010 To support standard dataflex button code
- Set(Boolean bState)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- BooleanpbDrawFocusRect()
- Set(Boolean bState)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- BooleanpbEnabled()
- Set(Integer bState)
  Inherited from cSigCJMethods_Mixin
  *** Added by Nils G. Svedmyr *** 19 Nov 2010 To support standard dataflex button code
- IntegerEnabled_State()
  Inherited from Shadow_Mixin
  *** Added by Nils G. Svedmyr *** 19 Nov 2010 To support standard dataflex button code
- Set(Boolean bState)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- BooleanpbEnableMarkup()
- Set(Boolean bState)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- BooleanpbFlatStyle()
- Set(Integer iColor)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- IntegerpiForeColor()
- Set(Integer eAlign)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- IntegerpeImageAlignment()
- Set(Integer iGap)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- IntegerpiImageGap()
- Set(Boolean bState)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- BooleanpbMultiLine()
- Set(Boolean bState)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- BooleanpbRightToLeft()
- Set(Integer eStyle)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- IntegerpeStyle()
- Set(Integer eAlign)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- IntegerpeTextAlignment()
- Set(Integer ePosition)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- IntegerpeTextImageRelation()
- Set(Boolean bState)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- BooleanpbUseVisualStyle()
- Set(String sTooltip)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
- StringpsTooltip()
- Set(String sImage)
  Inherited from cSigCJMethods_Mixin
  -------------------------------------------------------------------------
  - IntegeriImageId
  - VariantvImage
- StringpsImage()
- Set(Boolean bVisible)
  Inherited from cSigCJMethods_Mixin
  ========================================================================= Some ActiveX controls do not honour the Visibe_State message event though they're in the parent class (this is one). So we need to use the low level windows message ShowWindow to hide/Show the button. We also need to change the focus mode so the button can't take the focus via keyboard navigation when invisible.
  - IntegeriVoid
- BooleanpbVisible()
- IntegerAdd_Focus(Handle ohParent)
  ------------------------------------------------------------------------- Augment Add_Focus to update the visible state. This has to be done after the control has been painted to the screen
  - IntegeriVoid
  - IntegeriRetval
- KeyAction()
  ------------------------------------------------------------------------- Keyboard methods / events Handle Enter Key (OnKey message in Construct_Object)
- OnClick()
  Martin - Is KeyPress needed? If the button has the focus then the only valid key is entered and that is handled by the OnKey message. Any other navigation keys (esc arrows tab etc) should be handled by the vdf runtime. Procedure OnKeyPress Integer ByRef iKey End_Procedure Procedure OnComKeyPress Short ByRef llKeyAscii Send OnKeyPress llKeyAscii End_Procedure ------------------------------------------------------------------------- Mouse methods / events
- OnComClick()
  Inherited from cSigCjCom_DPushButtonEvents
- MouseMove(Integer iButton Integer iShift Integer iX Integer iY)
  Martin - Toms' code uses OnMouseMove. The VDF 14.1 help shows this to be a valid method, but with different parameters. So I have changed the name to MouseMove. Also do we need an event for mouse move or can this just be coded in the OnComMouseMove? Augmented for Hot Tracking
- OnComMouseMove(Short iButton Short iShift OLE_XPOS_PIXELS iX OLE_YPOS_PIXELS iY)
  Inherited from cSigCjCom_DPushButtonEvents
- MouseDown(Integer iButton Integer iShift Integer iX Integer iY)
  Martin - Ditto - See comments for MouseMove Need to make sure the button can take the focus, i.e. exiting of the current focusable object is successful - this is a DAW bug where the focus is not being moved correctly when using the mouse to click the Codejock button
  - IntegeriRetval
- OnComMouseDown(Short iButton Short iShift OLE_XPOS_PIXELS iX OLE_YPOS_PIXELS iY)
  Inherited from cSigCjCom_DPushButtonEvents
- MouseUp(Integer iButton Integer iShift Integer iX Integer iY)
  Martin - Ditto - See comments for MouseMove After we click and the check if the click was valid. If it wasn't then force the client (view/panel etc.) to redraw where the focus currently is (the object we clicked from) else Move the focus back To where it came From If Pointer only AND the focus is on the button OR thinks it's where we came from. Note we need to activate the button and then the prior Object as DAW sometimes believes the focus can be two places at once.
- OnComMouseUp(Short iButton Short iShift OLE_XPOS_PIXELS iX OLE_YPOS_PIXELS iY)
  Inherited from cSigCjCom_DPushButtonEvents
- IntegerAbsolute_GuiOrigin()
  =========================================================================
  - IntegerhWnd
  - IntegeriRow
  - IntegeriCol
  - IntegeriVoid
  - IntegeriLocation
  - StringsRect
  - IntegerP_sRect
- OnComDropDown()
  Inherited from cSigCjCom_DPushButtonEvents
  - IntegeriLoc
  - IntegeriSize

Module	Line
Calendar_Categories.vw	14
Calendar_Resources.vw	7
cSigCJCalendarControl.pkg	63
SigCJCheckBoxDemo.vw	4
SigCJLibraries.pkg	70
SigCJProgressBarDemo_View.vw	3
SigCJPushButtonDemo.vw	3
SigCJReportControlDemo - Table.vw	12

Module cSigCJPushButton.pkg

References (8):

Field References (0):