VFP 愛用者社區

[yang1032]

在印報表時,讓客戶自由選擇紙張,
報表的尾端總是留者尾巴.如下圖
我試者更改報表檔,但是結果不理想
s_every_page =s_set_plength[nub] /100 *3937 &&1cm =3937 紙張的高度
locate for objtype =9 and objcode =1 &&頁標題高度
s_every_page =s_every_page -Height
locate for objtype =9 and objcode =7 &&頁註腳高度
s_every_page =s_every_page -Height
locate for objtype =9 and objcode =4 &&頁細節高度
s_every_page = int (s_every_page /(Height-100))
******修正頁註腳高度
t_n1 = s_every_page % Height
if t_n1 > Height /2
t_n1 = Height - t_n1
else
t_n1 = t_n1 * -1
endif
* messagebox("t_n1="+str(t_n1)+str(Height))
locate for objtype =9 and objcode =7 &&頁註腳高度
repl Height with Height +t_n1
請請各個位先輩,有無解決之方法,對不起我不知如何附圖
[img]D1.jpg[/img]

[yang1032]

1.上訴之問題出在紙張的上下邊界
2.雖然找到了PageSetupDlg API 但是無法順利使用