HandCursor Property
Specifies whether a hand cursor will be used in an Hyperlink control
Syntax:
HandCursor <lValue>
Header Property
Sets\/gets the header for a Grid or Browse control specific column
Syntax:
<WindowName>.<ControlName>.Header(nColumn)
It must be specified as a character string.
Sample:
#include "hmg.ch"
Function Main
Local aRows [2] [3]
aRows [1] := {'Simpson','Homer','555-5555'}
aRows [2] := {'Mulder','Fox','324-6432'}
DEFINE WINDOW Form_1 ;
AT 0,0 ;
WIDTH 640 HEIGHT 480 ;
TITLE 'HMG Demo' ;
MAIN
@ 50,50 GRID Grid_1 ;
WIDTH 200 ;
HEIGHT 330 ;
HEADERS {'Last Name','First Name','Phone'} ;
WIDTHS {140,140,140};
ITEMS aRows ;
VALUE 1
Form_1.Grid_1.Header(1) := ‘New Header’
END WINDOW
Form_1.Activate
Return
Headers Property
Set the headers for a Grid or Browse control
Syntax:
Headers <acValues>
It must be specified as a character string array.
Sample:
See sample from Header Property above.
HeaderImages Property
Specifies images for Grid and Browse headers
Syntax:
HeaderImages (acValue)
This is a character array containing image filenames or resourcenames (one for each column).
To change a header's image at runtime you must specify the column position as argument.
Sample (Control definition):
DEFINE GRID Grid_1
ROW 10
COL 10
WIDTH 500
HEIGHT 330
HEADERS {'Last Name','First Name','Phone'}
WIDTHS {140,140,140}
ITEMS LoadItems()
VALUE 1
HEADERIMAGES { '00.bmp' , '01.bmp' , '02.bmp' }
END GRID
Sample (Set image at runtime):
Form_1.Grid_1.HeaderImages(1) := '03.bmp'
Sample (Get Image at runtime):
MsgInfo ( Form_1.Grid_1.HeaderImages(1) )
Height Property
Set \/ Gets heigth of a gui object
Syntax:
Height <nValue> (Control Definition)
<ParentWindowName>.<ControlName>.Height := nHeight
<ParentWindowName>.<ControlName>.Height --> nHeight
HelpId Property
Allows to set the help id for context help
Syntax:
HelpId <nValue>
It may be accessed pressing F1 or using window help button.
Horizontal Property
Specifies whether gripper in a SplitBox is horizontal
Syntax:
Horizontal <lValue>
HotTrack Property
Specifies ‘Hot tracking’ of Tab pages
Syntax:
Hottrack <lValue>
HScrollBar Property
Specifies whether a horizontal scrollbar will be included in an Edit control
Syntax:
HScrollBar <lValue>
Sample (Control Definition):
DEFINE EDITBOX Edit_1
ROW 60
COL 230
WIDTH 120
HEIGHT 120
VALUE ""
HSCROLLBAR .T.
VSCROLLBAR .T.
END EDITBOX