' Rapid-Q by William Yu (c)1999-2000 . ' ================================================================================ ' Upload_il_tuo_script_su_Rapidq.it ' Qscrollbox ****** QSCROLLBOX Component ****** QScrollBox is a scrolling window control. QScrollBox Properties Field Type R/W Default =================== =================== =================== =================== Align INTEGER RW alNone Align determines how the control aligns within its parent control. AutoScroll INTEGER RW True AutoScroll specifies whether scrollbars appear automatically on the scrolling windowed control if it is not large enough to display all of its controls. BorderStyle INTEGER RW bsSingle Color INTEGER RW Cursor INTEGER RW crDefault Enabled INTEGER RW True Font QFONT W Handle INTEGER R Height INTEGER RW Hint STRING RW HorzIncrement INTEGER RW 8 HorzIncrement determines how far the display moves when the user clicks one of the small end arrows on the scrollbar. HorzMargin INTEGER RW 0 HorzMargin specifies the minimum number of pixels that must separater each control from the edge of the scrollbox. HorzPosition INTEGER RW 0 HorzPosition specifies the position of the thumb tab on the scrollbar. HorzRange INTEGER RW 0 HorzRange determines how far the scrollbox can move. HorzTracking INTEGER RW False HorzTracking determines whether the scrollbox moves before the thumb tab is released. HorzVisible INTEGER RW True Left INTEGER RW 0 Parent QFORM/QPANEL/ W QTABCONTROL PopupMenu QPOPUPMENU W ShowHint INTEGER RW False TabOrder INTEGER RW Tag INTEGER RW Top INTEGER RW 0 Width INTEGER RW VertIncrement INTEGER RW 8 VertMargin INTEGER RW 0 VertPosition INTEGER RW 0 VertRange INTEGER RW 0 VertTracking INTEGER RW False VertVisible INTEGER RW True Visible INTEGER RW True QScrollBox Methods Method Type Description Params =================== =================== =================== =================== Repaint SUB Repaint control 0 QScrollBox Events Event Type Occurs when... Params =================== =================== =================== =================== OnClick VOID User clicked on 0 scrollbox OnDblClick VOID User double clicked 0 on scrollbox OnMouseDown SUB (Button%, X%, Mouse button held 4 Y%, Shift%) down OnMouseMove SUB (X%, Y%, Mouse moves 3 Shift%) OnMouseUp SUB (Button%, X%, Mouse button is 4 Y%, Shift%) released OnResize VOID Scrollbox is 0 resized QScrollBox Examples CREATE Form AS QForm Center CREATE ScrollBox AS QScrollBox Left = 50 CREATE Button AS QButton '-- Create button inside scrollbox END CREATE END CREATE ShowModal END CREATE ' =============================================================================== ' 2003 Holyguard.net - 2007_Abruzzoweb