特急：高分小问题（关于如何读取listbox中数据到一个临时表中）(100分)

W

wsxcy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-29

• #1

我有一个小项目：其中需要在两个列表框中显示数据，左边列表框显示从一数据表中读入的
某字段内容，右边列表框中的数据通过拖动左边列表框中的数据而得到。

现在的问题是：我如何能读右边列表框中的数据而生成一个临时数据表，
字段数和左边列表框中的数据表字段数相同，这个数据表
是用来生成报表的，每次生成的报表在打印完成后立即删
除临时表。
形式就象股票软件中的选定自选股的方法。

 

S

sluger

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-29

• #2

来个strings，临时保存啊、。。。

 

W

wsxcy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-29

• #3

我只能按那种方法编下去，因为那是某领导最熟悉的方法（抄股票习惯了）。

 

S

sundart

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-30

• #4

根据左边表的库结构生成临时表应该不是问题吧？
生成临时表后，将右边的列表遍历一次， 将每个Item项Insert到临时表中就是了。

 

P

PressAnyKey

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-31

• #5

如果每次的数据结构一样，不必删除表，只需清空即可，这样只需保证在使用前后
临时表记录为空即可。

 

S

sundart

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-03

• #6

这个问题还没解决吗？

1. 建立临时表TmpTable， 其结构和你的查询表Tb一样。
比如关ListBox中的字段名表 KeyField (其类型以字符型为例）
2. for i := 0 to ListBoxRight.ItemCount - 1 do
begin
Query.SQL.add('insert into TmpTable select * from Tb where KeyField = '
+ #39 + ListBoxRigth.Items.Text + #39 );
end;
Query.ExecSQL;

 

W

wsxcy

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-10-04

• #7

多人接受答案了。