在TABLE CONTROL 輸入完一行記錄,按回車的時(shí)候光標(biāo)自動(dòng)移動(dòng)到下一行,另外要考慮翻頁(yè)的問(wèn)題.
剛開始我試著用TABLE CONTROL 的向?qū)ё詣?dòng)生成程序,后來(lái)發(fā)現(xiàn)實(shí)現(xiàn)起來(lái)有點(diǎn)麻煩.

其實(shí)大家只要在程序的PAI里面獲得TC的當(dāng)前行數(shù)并加1.

? CURRENT_LINE = TCON_9000-CURRENT_LINE + 1.


然后在PBO里面加上下面的代碼.
IF ENTER_FLAG IS INITIAL.
? IF CURRENT_LINE = 0.
? ? CURRENT_LINE = 1.
? ENDIF.
? TCON_9000-TOP_LINE = CURRENT_LINE .
? ENTER_FLAG = 'X'.
ENDIF.
? ? SET CURSOR '1' '1'. ? "將光標(biāo)定位到第一行的第一個(gè)字段.

CLEAR CURRENT_LINE.

備注: ENTER_FLAG是回車命令的標(biāo)識(shí).目的是為了只有按回車的才執(zhí)行,別的情況下不執(zhí)行,如通過(guò)滑動(dòng)鼠標(biāo)等.

總結(jié)

以上是生活随笔為你收集整理的在TABLE CONTROL 输入完一行记录,按回车的时候光标自动移动到下一行的全部?jī)?nèi)容，希望文章能夠幫你解決所遇到的問(wèn)題。

如果覺(jué)得生活随笔網(wǎng)站內(nèi)容還不錯(cuò)，歡迎將生活随笔推薦給好友。