Definition error for GRID,please help!

[huangchenmin]

Dear Sir:
Folllowing are my code. everytime I compile,error message shows
please HELP!
Best Regards
chen min

Date:09/04/10 Time: 11:42:40
Error BASE/1072 Argument error: <>
Called from _DEFINEGRID(490)
Called from MAIN(41)


*-----------------------------Following are code-----------------------------------------------------------------
* HMG-IDE Form Designer Generated Code
* (c) Roberto Lopez - http://sites.google.com/site/hmgweb

DEFINE WINDOW TEMPLATE AT 22 , 122 WIDTH 1000 HEIGHT 726 VIRTUAL WIDTH Nil VIRTUAL HEIGHT Nil TITLE "" ICON NIL MAIN CURSOR NIL ON INIT Nil ON RELEASE Nil ON INTERACTIVECLOSE Nil ON MOUSECLICK Nil ON MOUSEDRAG Nil ON MOUSEMOVE Nil ON SIZE Nil ON MAXIMIZE Nil ON MINIMIZE Nil ON PAINT Nil BACKCOLOR Nil NOTIFYICON NIL NOTIFYTOOLTIP NIL ON NOTIFYCLICK Nil ON GOTFOCUS Nil ON LOSTFOCUS Nil ON SCROLLUP Nil ON SCROLLDOWN Nil ON SCROLLLEFT Nil ON SCROLLRIGHT Nil ON HSCROLLBOX Nil ON VSCROLLBOX Nil
PRIVATE m_loop1:=0,m_loop2:=0,m_content:="",a_content:=array(10,6),a_header:=array(6)
for m_loop1:=1 to 3
for m_loop2:=1 to 6
a_content[m_loop1][m_loop2]:=time()
*msginfo (a_content[m_loop1][m_loop2])
next
next
a_header:={{"姓名"},{"病歷號"},{"就診日期"},{"就診類別"},{"眼底"},{"腳底"}}
DEFINE MAIN MENU
POPUP "第一項"
ITEM "第一項-1" ACTION MSGINFO ("已選取1-1")
ITEM "第一項-2" ACTION MSGINFO ("已選取1-2")
END POPUP
POPUP "第二項"
ITEM "第二項-1" ACTION MSGINFO ("已選取2-1")
POPUP "第二項-2"
ITEM "第二項-2-1" ACTION MSGINFO ("已選取2-2-1")
ITEM "第二項-2-2" ACTION MSGINFO ("已選取2-2-2")
END POPUP
ITEM "第二項-3" ACTION MSGINFO ("已選取2-2")
END POPUP
END MENU

DEFINE GRID Grid_1
ROW 10
COL 10
WIDTH 968
HEIGHT 380
VALUE {1,1}
HEADERS a_header
WIDTHS {140,140,140,140,140,140}
ITEMS a_content
FONTNAME "Arial"
FONTSIZE 14
FONTBOLD .T.
JUSTIFY {GRID_JTFY_LEFT,GRID_JTFY_CENTER,GRID_JTFY_CENTER,GRID_JTFY_CENTER,GRID_JTFY_CENTER,GRID_JTFY_CENTER}
END GRID

DEFINE BUTTON Button_1
ROW 515
COL 878
WIDTH 100
HEIGHT 28
ACTION Nil
CAPTION "資料同步"
FONTNAME "Arial"
FONTSIZE 14
TOOLTIP ""
FONTBOLD .T.
FONTITALIC .F.
FONTUNDERLINE .F.
FONTSTRIKEOUT .F.
ONGOTFOCUS Nil
ONLOSTFOCUS Nil
HELPID Nil
FLAT .F.
TABSTOP .T.
VISIBLE .T.
TRANSPARENT .F.
MULTILINE .F.
PICTURE Nil
PICTALIGNMENT TOP
END BUTTON

DEFINE BUTTON Button_2
ROW 548
COL 878
WIDTH 100
HEIGHT 28
ACTION Nil
CAPTION "資料上傳"
FONTNAME "Arial"
FONTSIZE 14
TOOLTIP ""
FONTBOLD .T.
FONTITALIC .F.
FONTUNDERLINE .F.
FONTSTRIKEOUT .F.
ONGOTFOCUS Nil
ONLOSTFOCUS Nil
HELPID Nil
FLAT .F.
TABSTOP .T.
VISIBLE .T.
TRANSPARENT .F.
MULTILINE .F.
PICTURE Nil
PICTALIGNMENT TOP
END BUTTON

DEFINE BUTTON Button_3
ROW 581
COL 878
WIDTH 100
HEIGHT 28
ACTION Nil
CAPTION "Button_3"
FONTNAME "Arial"
FONTSIZE 14
TOOLTIP ""
FONTBOLD .T.
FONTITALIC .F.
FONTUNDERLINE .F.
FONTSTRIKEOUT .F.
ONGOTFOCUS Nil
ONLOSTFOCUS Nil
HELPID Nil
FLAT .F.
TABSTOP .T.
VISIBLE .T.
TRANSPARENT .F.
MULTILINE .F.
PICTURE Nil
PICTALIGNMENT TOP
END BUTTON

DEFINE BUTTON Button_4
ROW 614
COL 878
WIDTH 100
HEIGHT 28
ACTION Nil
CAPTION "Button_4"
FONTNAME "Arial"
FONTSIZE 14
TOOLTIP ""
FONTBOLD .T.
FONTITALIC .F.
FONTUNDERLINE .F.
FONTSTRIKEOUT .F.
ONGOTFOCUS Nil
ONLOSTFOCUS Nil
HELPID Nil
FLAT .F.
TABSTOP .T.
VISIBLE .T.
TRANSPARENT .F.
MULTILINE .F.
PICTURE Nil
PICTALIGNMENT TOP
END BUTTON

DEFINE BUTTON Button_5
ROW 647
COL 878
WIDTH 100
HEIGHT 28
ACTION Nil
CAPTION "Button_5"
FONTNAME "Arial"
FONTSIZE 14
TOOLTIP ""
FONTBOLD .T.
FONTITALIC .F.
FONTUNDERLINE .F.
FONTSTRIKEOUT .F.
ONGOTFOCUS Nil
ONLOSTFOCUS Nil
HELPID Nil
FLAT .F.
TABSTOP .T.
VISIBLE .T.
TRANSPARENT .F.
MULTILINE .F.
PICTURE Nil
PICTALIGNMENT TOP
END BUTTON

END WINDOW

[esgici]

Hello Huang

You have add

Code: Select all

CELLNAVIGATION .T.

to GRID definition.

Regards

--

Esgici

[huangchenmin]

Hello Huang

You have add

Code: Select all

CELLNAVIGATION .T.

to GRID definition.

Regards

--

Esgici

Dear esgici
Thank you for replying me.
I made this issue done at 21:37pm 2010/09/04 by following modification
value {1,1,}-> value NIL
I just compare prior with new create both by HMG IDE.
Anyway, I will try your way again tomorrow.
Best Regards
chen min

[esgici]

Hello Chen Min

Yes,

Code: Select all

VALUE 1      // Not array value 

or

Code: Select all

* VALUE {}   // Commented, so VALUE gain default value : NIL 

also eliminate the error.

But CELL NAVIGATION is a handy feature.

When you assign a "non array" numeric value to VALUE property and CELL NAVIGATION is .F. (default), navigation of your GRID in run time will be only row based. And assigning an array (two dimension, with numeric values) to VALUE property and .T. to CELLNAVIGATION; navigation of your GRID in run time will be cell based.

Error is array VALUE and .F. CELLNAVIGATION. So when you change one of them, fixes the error.

Happy HMG'ing

Regards

--

Esgici