在数据表格中如何显示和查看“Memo”型字段？(200分)

W

wwwlaila

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-06

• #1

在数据表格中如何显示和查看“Memo”型字段？[?]

 

W

wwwlaila

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-06

• #2

“Memo”型字段如何编辑修改？

 

K

kccp

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-06

• #3

显示和查看比较简单的。
以dbdemos中的表venues的memo字段remarks为例：
按一般的设置好table1,datasource1,dbgrid1。
只要在dbgrid1中加入
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if column.Field=Table1Remarks then
begin
dbgrid1.Canvas.TextRect(rect,rect.left,rect.top,column.field.asstring);
end;
end;
即可。

 

C

CJF

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-07

• #4

在数据库的字段编辑器中，加入所有的字段，然后在你要显示的Memo字段的OnGetText里面，将Memo变成String返回就可以了。

 

C

coolqiang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-08

• #5

CJF：请问具体如何写代码？

 

C

CJF

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-08

• #6

Result:=Field.AsString

 

E

Easylee

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-08

• #7

用ehlib或TOPGRID

 

C

coolqiang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-08

• #8

CJF：OnGetText是个过程，何来Result？
我见其中的Text是var方式的参数，就用Text:=Sender.AsString可以用，但发现会出现错
误：Invalid BLOB handle in record buffer，怎么回事？

 

W

wwwlaila

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-09

• #9

谢谢大家了！问题已经解决了。我比较喜欢kccp的建议。

 

W

wwwlaila

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-09

• #10

多人接受答案了。