proceduretformmain.chinareport;//中國式報表
varsqlstr:string;
i,j:integer;
begin
sqlstr:='select*into#mytempfrompassword1';
cn.execute(sqlstr);//將需列印的內容裝入臨時表
sqlstr:='select*from#mytemp';
pubcs.recordset:=cn.execute(sqlstr);
if(pubcs.recordcountmod
27)<>0
then
//27是一頁可以顯示的記錄資料,請先用普通報表列印後檢視
begin
j:=27-(pubcs.recordcountmod
27);//j為還需要補齊的記錄數
fori:=1
tojdo
//插入不夠一頁的行記錄
begin
sqlstr:='insert#mytemp(username,password,usertype,inputname)values('
''','
''',null,'
''')';
cn.execute(sqlstr);
end;
end;
trysqlstr:='select*from#mytemporderbyid';//按id號排序,將新增的空記錄放在最後
pubcs.close;
pubcs.sql.text:=sqlstr;
pubcs.open;
frxdb1.dataset:=pubcs;//將補齊記錄的資料裝入報表資料來源
report1.showreport;
finally
cn.execute('droptable#mytemp');//列印成功與否都要將臨時表刪除
frxdb1.dataset:=nil;
end;
end;
//以上是建立中國式報表的主要**,如果您調式成功了,請up一下;如果您還不能明白,請上我們的:18833620,我是人魚傳說,請向我要**就行了!
中國式離職
好象有乙個電視劇集叫 中國式離婚 挺火的,偶不看肥皂劇,因此不知火在 it職場也是乙個離離合合的舞台,而且也頗有中國特色,因此此文就叫 中國式離職。年已過了,各地的人才市場開始變得熱火朝天,這是乙個容易蠢蠢欲動的時期,許許多多的程式設計師經過一年的努力工作與追求後,對現在所服務的企業與 boss 有...
中國式管理
泰巖網路工作室 吳旻最近一直在思考軟體管理方面的事情。這裡我所講的管理,更多的還是人和技術的管理和規劃。其實很多時間我們都知道,我們是不會做管理的 或者說,外來的管理方式很多,但我們用好的時候少之又少。這裡,我僅將我所見到的常見管理模式列出來,或許可以引起我們的反思。要知道管理必需本地化,才是真的合...
中國式離職
好象有乙個電視劇集叫 中國式離婚 挺火的,偶不看肥皂劇,因此不知火在 it職場也是乙個離離合合的舞台,而且也頗有中國特色,因此此文就叫 中國式離職。年已過了,各地的人才市場開始變得熱火朝天,這是乙個容易蠢蠢欲動的時期,許許多多的程式設計師經過一年的努力工作與追求後,對現在所服務的企業與 boss 有...