Headers Property
Set the headers for a Grid or
Browse control
Syntax:
Headers <acValues>
It must be specified as a character string array.
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