打印问题.问题解决.马上结贴..在线等.就有这些分了，都给~！~！急！急！急！

用两个TADOQuery就可以了，上面选中的就加到下面的那个，最后就把下面那个打印出来

解决方案 »

  1.   

    我的一个简单的思路。
    就是改变上同那张DBGRID里示出来记录的某一字段的值。
    比如一个字段的值为0时在上面个表显示。
    为1的时候就在下面个表里显示。
    在按钮下的ONCLOCK事件中加入
    BERGIN
    ADOQEURY1。FIELDBYNAME（‘ 字段名’）。ASINTGER：=1；
    ADOQUERY2。SQL（‘SELECT * FROM 表名 WHERE ’字段名‘=1；
    ADOQUERY2。OPEN
    END；
    不就可以了？
      

  2.   

    我用的是sybase数据库，最好是能吧原码写出来！！  因为我接触这个的时候也不是太长，还有些迷糊，望指教！！