我的三个小问题。(100分)

太

太保球

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-21

• #1

1.怎么在dbgrid1.Columns[1].PickList:=load'1.txt'astostr;添加一个文本文件，
我的代码，错在那里了。
2.怎么在维护数据信息的时候，确认后，输出某个字段下的信息，成文本文件！
3.复制access表信息，到另外一个表，并且删除本表信息。

 

天

天真

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-21

• #2

呵，我来收分了！
答案如下：
3、insert into A select * from B
delete from b

1、var s:tstringlist;
begin
s:=tstringlist.Create ;
s.LoadFromFile('d:/1.txt');
dbgrid1.Columns[1].PickList:=s

 

H

hbezwwl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-21

• #3

1.dbgird1.columns[1].picklist.loadfrom file('1.text');//loadfromfile中间没有空格.
2.SaveToFile即可.
3.是不是说新建表结构一样的一个表.

 

天

天真

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-21

• #4

var s:stringlist;
s:=tstringlist.create;
select XX from A
query1.first;
while not query1.eof do
begin
s.add(query1.fieldbyname(XX).asstring);
query1.next;
end;
s.savetofile('d:/aa.txt');

 

太

太保球

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-03-21

• #5

接受答案了.