高分！！简单问题！！！

Question

我做了一个报表，但因为字段太多，没办法竖着打。所以我尝试横着打。
但设计完了以后，在预览的时候，显示的不是横向的。
怎样解决？我已经设计landscape属性！！！
现在问题是怎样解决预览的问题？

Answer 1

换个问题：
qreport如何实现自动换功能！

Answer 2

QuickRep1BeforePrint判別設定Page Orientation值

Answer 3

不好意思。我要的是自动换行！而且是中文的自动换行！
我设计过qredit的autosize＝false和autostreng＝true，还是不行
大侠。有办法吗？

Answer 4

有个朋友帮我实现了！确实可以用报表的edit实行自动换行，

Answer 5

procedure TForm2.QRDBText1Print(sender: TObject; var Value: String);
var
 bExit : boolean;
 iLen : integer;
 strSource, strTemp : string;
begin
 if Length(Value) <= 32 then
   exit;
 strSource := Value;
 Value := '';
 while true do
 begin
   iLen := 1;
   while iLen < 32 do
   begin
     if ord(strSource[iLen]) > 128 then
       inc(iLen, 2)
     else
       inc(iLen);
   end;
   dec(iLen);
   strTemp := Copy(strSource, 1, iLen);
   if Value = '' then
   Value := strTemp
   else
     Value := Value + #13 + strTemp;
   strSource := Copy(strSource, iLen + 1, Length(strSource) - iLen);
   if Length(strSource) <= 32 then
   begin
     Value := Value + #13 + strSource;
     exit;
   end;
 end;
end;補充：第一個問題中的32為QRDBText的寬度，你可以自己改變