错在哪里?(50分)

M

mengh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-05-17

• #1

一段从文本文件(doc)中读数据存入表中的程序,问什么总是出错?
OpenDialog1.Execute;
tsfile:=tfilestream.create(OpenDialog1.FileName,fmopenreadwrite);
tsfile.seek(2,0);
tsfile.ReadBuffer(s,14);
query1.edit;
query1.append;
query1.fieldbyname('ISBN').asString:=s;
query1.REFRESH;
DBGRID1.REFRESH;
tsfile.free;

 

C

Chenlili

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-05-17

• #2

query1.fieldbyname('ISBN').asString:=s;
大概有问题。

 

康

康夫

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-05-17

• #3

s的类型可能有问题，将s定义为 var s: array[1..100] of char;
试试

 

P

plwei

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-05-17

• #4

query1.fieldbyname('ISBN').asString:=string(s);
能将出现的错误说的详细一些吗?

 

M

mengh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-05-17

• #5

谢谢大家，果然是s的类型不对！

 

M

mengh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-05-17

• #6

多人接受答案了。