在dbgrid中为什么备注型(或text型字段)的那一列总显示为(memo),其他字段类型对应的列正常。 在dbgrid中为什么备注型(或text型字段)的那一列总显示为(memo),其他字段类型对应的列正常。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 //你可以利用TField::OnGetText事件来改变其显示的内容~~//参考如下代码~~procedure TForm1.Table1BMPGetText(Sender: TField; var Text: String; DisplayText: Boolean);var vMemoryStream: TMemoryStream;begin vMemoryStream := TMemoryStream.Create; try TBlobField(Sender).SaveToStream(vMemoryStream); Text := IntToStr(vMemoryStream.Size); finally vMemoryStream.Free; end;end;//orprocedure TForm1.Table1BMPGetText(Sender: TField; var Text: String; DisplayText: Boolean);begin Text := Sender.AsString;end; 备注型(或text型)字段在dbgrid中不显示的如果你的备注型(或text型)字段有内容在dbgrid中会显示为(MEMO),如果你的备注型(或text型)字段没有内容在dbgrid中会显示为(Memo),如果想显示备注型(或text型)字段的内容要用DATA CONTROLS中的DBMEMO控件. 用infopower4000中的wwdbgrid1控件吧,跟VFP一样的双击Memo就会出来显示内容 dbgrid好像不支持显示memo字段,如果你想显示的话,可以改用ehlib控件!该控件可以到www.51delphi.com去下载!它的一些使用技巧,你可以参考我的专栏文章:http://www.csdn.net/develop/author/netauthor/nxyc_twz/ memo1.Lines.Text :=query1.FieldByName('wenben').AsString; 文字游戏 如何调用一个需要参数的exe文件? 小弟不才昨日写了篇文章,请各位高手别笑话,请看BLOG地址如下 有没有人写过网状的数据结构? 一个关于StringGrid的问题,很急 怎样把新建的控件加入到新建一栏中,就象quickreport一样? 来交友吧 ==这样的函数怎么调?== 如何得到鼠标指向的dbgrid的当前columns的值. 文件拆分的问题? 好心人,请给个easygrid控件,如可使用,全分相送 有关interface的,看不懂这些代码,请大家不吝赐教
//参考如下代码~~
procedure TForm1.Table1BMPGetText(Sender: TField; var Text: String;
DisplayText: Boolean);
var
vMemoryStream: TMemoryStream;
begin
vMemoryStream := TMemoryStream.Create;
try
TBlobField(Sender).SaveToStream(vMemoryStream);
Text := IntToStr(vMemoryStream.Size);
finally
vMemoryStream.Free;
end;
end;//orprocedure TForm1.Table1BMPGetText(Sender: TField; var Text: String;
DisplayText: Boolean);
begin
Text := Sender.AsString;
end;
如果你的备注型(或text型)字段有内容在dbgrid中会显示为(MEMO),
如果你的备注型(或text型)字段没有内容在dbgrid中会显示为(Memo),
如果想显示备注型(或text型)字段的内容要用DATA CONTROLS中的DBMEMO控件.