功能复杂DBGrid转到QuickReport打印//zswang

王集鹄 2001-12-20 10:17:02

(*/***********************************\*)
(* mailto:wjhu111@21cn.com *)
(* Copyright (c) 2000,04 *)
(*\***********************************/*)

(*/******************\*)
(* [2000-09-01 09:58] *)
(*\******************/*)

//////////////////////////////
//
// 将数据网格转换成报表的单元
//
//*Example
// <Caption>
// <Head>
// ━━━━┯━━━━━┯━━━━━━━━━┯━━━━━━
// │ A2 │ A3 │ A4
// ├─┬─┬─┼─────┬───┼─┬────
// a1 │ │ │ │ B4 │ B5 │ │ B7
// │b1│b2│b3├─┬─┬─┼─┬─┤b6├─┬──
// │ │ │ │c1│c2│c3│c4│c5│ │c6│c7
// ────┼─┼─┼─┼─┼─┼─┼─┼─┼─┼─┼──
// ☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆
// ━━━━┷━┷━┷━┷━┷━┷━┷━┷━┷━┷━┷━━
// <Trail>
//
//*parameter
// Column=(
// [a1],
// [A2_b1],[A2_b2],[A2_b3],
// [A3_B4_c1],[A3_B4_c2],[A3_B4_c3],[A3_B5_c4],[A3_B5_c5],
// [A4_b6],[A4_B7_c6],[A4_B7_c7]
// )
//
// <Caption>.Tag=2
// <Head>.Tag=1
// <Trail>.Tag=0
//
//*replace
// <Code: Word> &p: 当前页; &d: 当前日期; &t当前时间
//
//*alignment
// <Tag: Alig> 0: Left; 1: Right; 2: Center;
//
//*note
// <'~': 换行>
//
//------------------------------------------------------------------------------
// [A] [B] [C] [D]
// ________________ ________________ ________________ ________________
// | | | |______| | | | |______| | | | |______| | | |______| |
// |__|__|___|__|___| |__|__|___|__|___| |__|__|___|__|___| |__|__|___|__|___|
// |__|__|___|__|___| | | | | | |________________| |____________| |
// |__|__|___|__|___| | | | | | |________________| |____________| |
// |__|__|___|__|___| |__|__|___|______| |________________| |____________|___|
//
// <0> <X> <X> <X>
//------------------------------------------------------------------------------
// [E] [F] [G]
// ________________ ________ _ ____ ________________
// | | |______ | | |__|___| a |d | g |__J___
// __|__|___|__|___ ___|__|_ |__|_|_| b |e | h |k |m
// __|__|___|__|___ ___|__|_ |______| c_|f_|_i_|l_|n__
// __|__|___|__|___ ___|__|_ |______| __|__|___|__|___
// __|__|___|__|___ ___|__|_ |______| __|__|___|__|___
//
// <0> <X> <X>
//------------------------------------------------------------------------------
//

...全文

343 42 打赏收藏转发到动态举报

写回复

用AI写文章

42 条回复

切换为时间正序

请发表友善的回复…

发表回复

mezw 2001-12-28

打赏
举报

感谢，up一下

知足常乐 2001-12-28

打赏
举报

to zswang(伴水)(被黑中):
这样的程序你还有多少啊？都贴出来给我这样的懒虫用多好啊！真真谢谢你！

awen800 2001-12-28

打赏
举报

to zswang(伴水)(被黑中):
这样的程序你还有多少啊？都贴出来给我这样的懒虫用多好啊！真真谢谢你！

yangkunjie 2001-12-27

打赏
举报

我也upup吧，关注

cobi 2001-12-27

打赏
举报

留意

ecamel 2001-12-27

打赏
举报

关注

王集鹄 2001-12-25

打赏
举报

//　━━━━┯━━━━━┯━━━━━━━━━┯━━━━━━
//　　　　　│　　A2　　│　　A3　　　　　　│　A4　　　　
//　　　　　├─┬─┬─┼─────┬───┼─┬────
//　　　a1　│　│　│　│　　B4　　│　B5　│　│　B7　　
// │b1│b2│b3├─┬─┬─┼─┬─┤b6├─┬──
// │ │　│　│c1│c2│c3│c4│c5│ │c6│c7
// ────┼─┼─┼─┼─┼─┼─┼─┼─┼─┼─┼──
// ☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆☆
// ━━━━┷━┷━┷━┷━┷━┷━┷━┷━┷━┷━┷━━

suny_2001 2001-12-25