Tmemo类问题(100分)

P

pengxiaolin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-17

• #1

请教各位大侠：
我要把Tmemo中的内容保存到Access数据库的备注类型
字段memo中，该如何做？返过来又如何做？
我用fieldbyname('memo').value:=memo.text;总是只
能保存第一行。

 

H

hubdog

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-17

• #2

fieldbyname('memo').assign(Memo.lines);

 

J

Jams

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-17

• #3

>>

 

K

koala

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-17

• #4

var
ms :TMemoryStream;
begin
ms :=TMemoryStream.Create;
try
memo1.lines.SaveToStream(ms);
ms.position ;=0;
TBlobField(table1.FieldbyName('Memo')).LoadFromStream(ms);
finally
ms.Free;
end;
end;

 

P

pengxiaolin

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-18

• #5

哎呀，原来是我弄错了，其实用fieldbyname('memo').value:=memo1.text;就可以了。用hubdog的方法也可以。koala的方法太复杂，没有试。

 

B

bluebob

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-18

• #6

分呢？怎么处理？分一份吧。

 

L

lhxu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 1999-11-18

• #7

推荐query
用table的话,小字段还可以,象memo这样恐怕用query更好
query 的 sql用 insert tablename (...,memofield) value(...,:memof1)
query1.parambyname(...).value:=...
query1.parambyname('memof1').value:=memo1.text;
query1.execsql
...为其他字段

 

C

cAkk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-07-20

• #8

时间太久，强制结束。 wjiachun

 

C

cAkk

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-07-20

• #9

时间太久，强制结束。 wjiachun