在delphi中如何实现数据库字段换行显示(20分)

  • 主题发起人 主题发起人 luogt
  • 开始时间 开始时间
L

luogt

Unregistered / Unconfirmed
GUEST, unregistred user!
各位delphi高手:
类似dbgrid多条记录同时显示,如果数据库字段数据太长,在delphi中如何实现数据库字段数据换行显示?
 
用ehlib的dbgrideh,可以实现!只要把列的wordwrap=:true就 ok!
 
【1】.用 ip2000的wwwdbgrid 或者dbgrideh
【2】.或者参考
procedure DBGrid1.OnDrawColumnCell(const Rect: TRect; DataCol: Integer;
Column: TColumn; State: TGridDrawState);
begin
with DBGrid1 do
if (gdSelected in State) and (Windows.GetFocus <> Self.Handle) then
begin
Canvas.Brush.Color := FHighLightColor;
Canvas.Font.Color := FHighLightTextColor;;
DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;
end;
 
后退
顶部