genblock
![Post Post](./styles/prosilver/imageset/icon_post_target.gif)
I have 9 button
when I press a button return allway 9
nRow:=30
For n= 1 to 9
@ nRow,2 BTNBMP aBtnCalc[n] PROMPT ltrim(str(n+1)) FLAT SIZE 20,30 PIXEL of oDlg ;
ACTION AddItems(oInvoice,aItems,GenBlock_(n),@nRowItems,fromdate,Todate)
nRow+=32
NEXt
fUNCTION GenBlock_(n)
RETURN n
and I Wish insert on GenBlock_(n) a right number (n)
when I press a button return allway 9
nRow:=30
For n= 1 to 9
@ nRow,2 BTNBMP aBtnCalc[n] PROMPT ltrim(str(n+1)) FLAT SIZE 20,30 PIXEL of oDlg ;
ACTION AddItems(oInvoice,aItems,GenBlock_(n),@nRowItems,fromdate,Todate)
nRow+=32
NEXt
fUNCTION GenBlock_(n)
RETURN n
and I Wish insert on GenBlock_(n) a right number (n)