Code: Select all
#include <hmg.ch>
FUNCTION MAIN
Use b1emp Shared
DEFINE WINDOW Form_1;
AT 0,0 ;
WIDTH 330;
HEIGHT 240;
MAIN
@ 10, 10 GRID Grid_1;
WIDTH 300;
HEIGHT 160;
HEADERS {"No","Name"};
WIDTHS {140,150};
ROWSOURCE "b1emp" ;
VALUE { 1 , 1 } ;
COLUMNCONTROLS {{'TEXTBOX','NUMERIC','9999'},{'TEXTBOX','CHARACTER'}};
COLUMNFIELDS {'emp_no','emp_name'}
END WINDOW
CENTER WINDOW Form_1
ACTIVATE WINDOW Form_1
RETURNI have been trying do the same things with IDE (see the attachment). I've checked everything twice, and now I wonder, it is a bug or my subsequent eclipse?