在delphi中怎么访问dbf表中的字段？？？(10分)

Z

zh_2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-25

• #1

我想访问dbf表a的字段s0，判断s0有没有变化，请问怎么办？能不能直接将a.s0赋值给一个
变量？如不能怎么做？

 

一

一剑封喉

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-25

• #2

用个TABLE连接不就可以了吗？然后定时判断一下，A。S0当然能够赋值给一个
变量了，试试便知道了

 

H

hsw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-25

• #3

是啊，使用BDE联接数据库不行吗》

 

Z

zh_2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-25

• #4

我用ODBC连接数据库的，使用query组件。

 

A

askyer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-25

• #5

查找：select * from a.dbf where ..
赋值：
s:=table1.FieldByName('s0').AsString;
s:=Query1.FieldByName('s0').AsString;
判断是否有变化：
if s<>Query1.FieldByName('s0').AsString then
...;

 

S

ski

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-25

• #6

同意askyer

 

一

一剑封喉

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-25

• #7

odbc 可以建立一个数据源别名，就是你的DBF的目录，然后用QUERY连接这个别名即可
做SQL没有问题

 

Z

zh_2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-25

• #8

问题好多！！！
以下是部分代码：
procedure TForm1.Timer1Timer(Sender: TObject);
var cjsss1,cjjes1:Single;
begin
cjsss1:=query1.FieldByName('s11').AsString;
cjjes1:=query1.FieldByName('s5').AsString;
if (cjsss1<>query1.FieldByName('s11')) or (cjjes1<>query1.FieldByName('s5')) then
begin
。。。。。。
。。。。。。
end；
end。
编译不能通过！
错误为：
Incompatible types;'Single' and 'String'

请问各位高手是怎么回事？？？

 

S

sword_liu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-25

• #9

var
x:STring;
x=table1['s0']

 

M

myinvestor

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-25

• #10

我不会，但我对那些帮助解决问题的哥们，姐们表示敬意

 

M

mirik joyce

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-25

• #11

if (cjsss1<>query1.FieldByName('s11').value) or (cjjes1<>query1.FieldByName('s5').value) then

 

Z

zh_2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-26

• #12

mirik joyce答案完全正确！
在次感谢所有的兄弟姐妹们！

 

Z

zh_2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-26

• #13

多人接受答案了。