| TabSelected |
(TabName As String, TabKey As String)
|
| Change |
(TabSelected As Long)
|
| CloseButtonClick |
(TabKey As String, CloseTab As Boolean)
|
| MouseMove |
(Button As Integer, Shift As Integer, X As Single, Y As Single)
|
| MouseDown |
(Button As Integer, Shift As Integer, X As Single, Y As Single)
|
| MouseUp |
(Button As Integer, Shift As Integer, X As Single, Y As Single)
|
| KeyDown |
(KeyCode As Integer, Shift As Integer)
|
| KeyPress |
(KeyAscii As Integer)
|
| KeyUp |
(KeyCode As Integer, Shift As Integer)
|
| RePaintTab |
(handle As Long, lhDC As Long, plDraw As Integer, State As Integer, cLeft As Long, cTop As Long, cRight As Long, cBottom As Long, TabPosition As Integer)
|
| Resize |
(None)
|
| MouseDown |
(Button, Shift, X, Y)
|
| CloseButtonClick |
(m_Tabs(i)
|
| TabSelected |
(m_Tabs(i)
|
| Change |
(CLng(m_TabSelected)
|
| MouseMove |
(Button, Shift, X, Y)
|
| RePaintTab |
(hwnd, hdc, 0, 0, tabRECT.Left, tabRECT.TOp, tabRECT.Right, tabRECT.Bottom, Me.TabPosition)
|
| RePaintTab |
(hwnd, hdc, 1, 0, CtlRECT.Left, CtlRECT.TOp, CtlRECT.Right, CtlRECT.Bottom, Me.TabPosition)
|
| RePaintTab |
(hwnd, hdc, 1, 1, CtlRECT.Left, CtlRECT.TOp, CtlRECT.Right, CtlRECT.Bottom, Me.TabPosition)
|
| RePaintTab |
(hwnd, hdc, 2, 1, CtlRECT.Right - 20, CtlRECT.TOp + 5, CtlRECT.Right - 7, CtlRECT.TOp + 18, Me.TabPosition)
|
| RePaintTab |
(hwnd, hdc, 1, 3, CtlRECT.Left, CtlRECT.TOp, CtlRECT.Right, CtlRECT.Bottom, Me.TabPosition)
|
| RePaintTab |
(hwnd, hdc, 2, 1, CtlRECT.Right - 20, CtlRECT.TOp + 4, CtlRECT.Right - 7, CtlRECT.TOp + 17, Me.TabPosition)
|
| RePaintTab |
(hwnd, hdc, 1, 2, CtlRECT.Left, CtlRECT.TOp, CtlRECT.Right, CtlRECT.Bottom, Me.TabPosition)
|
| RePaintTab |
(hwnd, hdc, 2, 1, CtlRECT.Right - 20, CtlRECT.TOp + 4, CtlRECT.Right - 7, CtlRECT.TOp + 17, Me.TabPosition)
|
| MouseUp |
(Button, Shift, X, Y)
|
| KeyDown |
(KeyCode, Shift)
|
| KeyPress |
(KeyAscii)
|
| KeyUp |
(KeyCode, Shift)
|