************************************************************************ --- DFSl_mx.pkg Sliding control mixin Copyright (c) 1983-1997 Data Access Corporation, Miami Florida, All rights reserved. DataFlex is a registered trademark of Data Access Corporation. ************************************************************************ Description: Author: Stuart W. Booth 07/25/97 JJT - Converted to a mixin so it can be used with db classes 07/23/96 JJT - New Class names ************************************************************************ expected usage: Class dbTrackbar is a dbFormExternalControl Import_Class_Protocol Trackbar_Mixin Procedure onSetPosition Send ControlValueChanged End_Procedure Procedure Set ControlValue string sVal Set current_Position to (integer(sVal)) End_Procedure Function ControlValue Returns String Function_return (Current_position(self)) End_Function End_Class
Define_TrackBar_Mixin()
m_Minimum_Position
m_Maximum_Position
m_Current_Position
m_Visible_Tick_State
m_Tick_Orientation
m_Orientation_Mode
m_Tick_Frequency
m_Line_Size
m_Page_Size
pbTooltips
SET(integer iTicks)
hWnd
iStyle
iVoid
Tick_Orientation()
SET(integer iOrientation)
hWnd
iStyle
iVoid
Orientation_Mode()
SET(Integer bTicks)
hWnd
iStyle
iVoid
Visible_Tick_State()
SET(integer iMin)
Minimum_Position()
SET(integer iMax)
Maximum_Position()
SET(integer iPos)
Current_Position()
SET(integer iFreq)
Tick_Frequency()
SET(integer iSize)
Line_Size()
SET(integer iSize)
Page_Size()
Notify()
OnSetPosition(Integer iPosition)
OnSliding()
OnFinishedSliding()
OnLineUp()
OnLineDown()
OnPageUp()
OnPageDown()
OnGoneToStart()
OnGoneToEnd()
Private_SliderNotification(integer wParam integer lParam)
hWnd
iOldPos
iNewPos
PreInitializeWindow()
InitializeWindow()
iPage| Module | Line |
|---|---|
| dbTrckbr.pkg | 62 |
| Trckbr.pkg | 62 |
| Module | Containing Symbol | Line |
|---|