将WordWrap属性设为了True没有用啊

解决方案 »

  1.   

    不会吧,那如果我要显示字符串很长的一个列怎么办?而且事先还不知道该列的长度,用QRDBRichText吗
      

  2.   

    procedure TForm14.Button1Click(Sender: TObject);
    var
      i:Integer;
      temp:WideString;
    begin
      i:=1;
      temp:=Memo1.Lines.Text;
      if Pos(#10,temp)>0 then temp:=StringReplace(temp,#10,'',[rfReplaceAll]);
      if Pos(#13,temp)>0 then temp:=StringReplace(temp,#13,'',[rfReplaceAll]);
      if Length(temp)>40 then begin
        while i<(Length(temp) div 40)+1 do begin
          Insert(#13,temp,i*40);
          i:=i+1;
        end;//end while
      end;//end if
      Memo1.Lines.Text:=temp;
    end;
    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    这个是40个字符换行,你看看....
      

  3.   

    to gxgyj(杰克.逊_Discovery) :不行啊,我按照你的做法插入了换行符,还是没有换行,中间只是多了几个空格而已。
      

  4.   

    autosize设置为True了吗?~~~~~~~~~~~~~~~~~~~~~~~~~
      

  5.   

    没有,我已经改为True了。
    还有一个属性AutoStrech好像也是这个功能,但是把它设为True后也不起作用。
      

  6.   

    说错了,autosize我已经改为False了
      

  7.   

    另外,再说一点,偶这是delphi3, 报表控件也不是很先进,QuickRep.
      

  8.   

    低版本的Delphi不是直接可以支持换行么?好像是高版本的才要自己写代码换行的
      

  9.   

    小弟我也在找這個問題的答案,各位大俠,要是我月個有多條記錄的表要打印成報表,希望能自動換行,有像
    qrdbtext那樣可以直接和數據庫聯接,打印時能自動將表中的多條記錄打印出來。請各位大俠棒棒忙。
      

  10.   

    大概知道为什么不行了,看了源码,我用的这个报表控件是改造过的, wordwrap属性虽然有,却没用上...不知道自己能不能加上...
      

  11.   

    faint.终于看到换行了,原来的确是要插入空格分开.可是DetailBand和QRDbText必须预留足够的高度才能显示完整的字符串.不能弹性伸缩啊,哎, 还有谁能解救一下我吗
      

  12.   

    把Autosize設為False
       AutoStrech設為 True就ok啦