' Rapid-Q by William Yu (c)1999-2000                                             .
' ================================================================================
' Upload_il_tuo_script_su_Rapidq.it

' Qstatusbar

****** QSTATUSBAR Component ******
QStatusBar implements a Windows status bar.

QStatusBar Internal Types
   TYPE PanelType           '' ie. StatusBar.Panel(0).Caption
     Alignment AS INTEGER   '' Specifies the text alignment, default is
taLeftJustify
     Caption AS STRING
     Width AS INTEGER
   END TYPE
QStatusBar Properties
Field               Type                R/W                 Default
=================== =================== =================== ===================
Align               INTEGER             RW                  alBottom
                    Align determines how the control aligns within its parent
                    control.
Cursor              INTEGER             RW                  crDefault
Enabled             INTEGER             RW                  True
Handle              INTEGER             R
Height              INTEGER             RW
Hint                STRING              RW
Left                INTEGER             RW                  0
Panel               ARRAY of PanelType  RW
Parent              QFORM/QPANEL/       W
                    QTABCONTROL
PopupMenu           QPOPUPMENU          W
ShowHint            INTEGER             RW                  False
SimplePanel         INTEGER             RW                  False
                    SimplePanel determines whether the statusbar displays a
                    single panel or multiple panels.
SimpleText          STRING              RW
                    SimpleText contains the string that is displayed in the
                    statusbar when SimplePanel is true.
SizeGrip            INTEGER             RW                  True
                    SizeGrip determines whether the statusbar is resizable at
                    runtime.
TabOrder            INTEGER             RW
Top                 INTEGER             RW                  0
Width               INTEGER             RW
Visible             INTEGER             RW                  True


QStatusBar Methods
Method              Type                Description         Params
=================== =================== =================== ===================
AddPanels           SUBI                Add panels to       STRING, Infinite
                                        status bar
Clear               SUB                 Clear panels        0

QStatusBar Events
Event               Type                Occurs when...      Params
=================== =================== =================== ===================
OnResize            VOID                Status bar is being 0
                                        resized


QStatusBar Examples
CREATE Form AS QForm
  Center
  CREATE StatusBar AS QStatusBar
    AddPanels "Panel 1", "Panel 2", "Panel 3"
    Panel(1).Width = 100  ' change width of Panel 2
  END CREATE
  ShowModal
END CREATE



' ===============================================================================
'                      2003 Holyguard.net - 2007_Abruzzoweb