access数据库表如下:  期号   条目    作者
  12     aaa    张三
  12     aaa    李四
  12     aaa    陈五
  13     bbb    小王
  14     ccc    张水
  14     ccc    小赵
  ......
  ......
  如何显示成:
  期号   条目    作者
   12    aaa    张三 李四 陈五
   13    bbb    小王
   14    ccc    张水 小赵   
  请各位赐教,急,急!谢谢各位!(用Adoquery连接数据库)分不够可以在加!!!

解决方案 »

  1.   

    SHAPE {} 
    APPEND ({})
      

  2.   

    有点难道,先顶一下!
    建议处理后用STringgrid显示。
      

  3.   

    看似简单,实际不简单!!!我觉得用tcontrolgrid比较爽些
      

  4.   

    是有点难。
    好像需要N步处理。
    我帮你UP,期待高手!
      

  5.   

    你不会是想一条SQL语句就搞定吧?先建一个临时表,结构为:
    期号   条目    作者,然后再在程序中遍历一下,将记录写入临时表中,你再将临时表的内容显示出来不就行了。
      

  6.   

    要在dBgrid里显示出来,顺便问一下access数据库支持事物处理吗,高手快来帮我呀!!!
      

  7.   

    就照有缘兄所说做吧!
    没问题的。access应该也支持事务的。
      

  8.   

    这样可以吗 ?select qh,Max(Tm) as Tm from tablename group by qh 最后一个字段用计算字段来显示
      

  9.   

    如果是sqlserver数据库,马上搞定,可惜你是access
      

  10.   

    加一个计算字段 Writersprocedure TForm1.ADOQuery1CalcFields(DataSet: TDataSet);
    var
      s : String ;
      sQh : String ;
    begin
      with TADOQuery.Create(Nil) do
      begin
        try
          Connection := ADOConnection1 ;
          Sql.Text := 'select distinct qh from trythis' ;
          Open ;
          First ;
          while Not Eof do
          begin
            sQh := FieldByName('qh').AsString ;
            s := '' ;
            with TADOQuery.Create(Nil) do
            begin
              Try
                Connection := ADOConnection1 ;
                Sql.Text := 'select zz from trythis where qh = ''' + sQh + '''' ;
                Open ;
                First ;
                while Not Eof do
                begin
                  s := s + '  ' + FieldByName('zz').AsString ;
                  Next ;
                end ;
              Finally
                Free ;
              End ;
            end ;
            with DataSet do
            begin
              if Trim(FieldByName('qh').AsString) = Trim(sQh) then //如果没有则只显示 writers 字段 最末 记录的值
                FieldByName('Writers').AsString := s ;
            end;
            Next ;
          end ;
        Finally
          Free ;
        End ;
      end ;
    end;
      

  11.   

    sqlserver中怎么搞定,高手谰下,我也想知道,最好有一个完整的例子
      

  12.   

    在SQL SERVER中与ADO的方法一样~~
      

  13.   

    好象没有字符串相加的聚集函数,所以不可能一个语句搞定在sql server不知道可不可以自定义聚集函数啊,如果可以,将解决很多类似问题