dbgrideh在改变列宽时, 显示的内容其列宽不能满足时如何实现自动换行?谢谢!

Question

dbgrideh在改变列宽时, 显示的内容其列宽不能满足时如何实现自动换行?谢谢!

Answer 1

procedure   TForm1.DBGrid1KeyDown(Sender:   TObject;   var   Key:   Word;   
      Shift:   TShiftState);   
  var   
      ls:integer;   
  begin   
      ls:=DBGrid1.SelectedIndex;   
      if   key=vk_return   then   
            if   ls=DBGrid1.Columns.Count-1   then     
            begin   
                  Datasource1.DataSet.Next;   
                  DBGrid1.SelectedIndex:=0;   
            end   
            else   
      DBGrid1.SelectedIndex:=DBGrid1.SelectedIndex+1;   
  end;   
  

Answer 2

WordWrap属性改为TRUE试试。
每一列的这个属性。

Answer 3

回4楼:WordWrap属性改为TRUE试过,无效,谢谢

Answer 4

column的wordwrap:=true
dbgrideh的rowsizingallowed:=true