关于线程与数组的问题. ( 积分: 50 )

我现在练习着一个数据库提交的程序.需要的是这样:
把资料从本文文件导入表格中,而且在程序中判断数据的正确性.
当完全正确这后,再提交,所以所有的数据都变成以变量的形式存在.但是我需要同时提交10个表.我当时想到的是数组,把数组引入线程中提交,但是用数组老是出错,也有人提出用TStringList,但是好像我又用不了.
谁能给我讲解一下线程与数组以及线程与TStringList的应用吗?最好给我一个例子.
TStringList方面的最好说详细一点,我对这个懂得很少,很多TStringList相关的属性和方法我都不知道是什么的作用.谁有这方面的资料帖连接的,不妨帖出联接,让我学习学习.
谢谢了.

我现在练习着一个数据库提交的程序.需要的是这样:
把资料从本文文件导入表格中,而且在程序中判断数据的正确性.
当完全正确这后,再提交,所以所有的数据都变成以变量的形式存在.但是我需要同时提交10个表.我当时想到的是数组,把数组引入线程中提交,但是用数组老是出错,也有人提出用TStringList,但是好像我又用不了.
谁能给我讲解一下线程与数组以及线程与TStringList的应用吗?最好给我一个例子.
TStringList方面的最好说详细一点,我对这个懂得很少,很多TStringList相关的属性和方法我都不知道是什么的作用.谁有这方面的资料帖连接的,不妨帖出联接,让我学习学习.
谢谢了.

我觉得可能用Tlist比较好解决这个问题。Tlist是用来保存指针的，你可以根本你的表结构写一个记录类型，然后声明一个指钟类型指向这个记录类型。当从文本文件读取一条记录后，就存入记录类型，就把指针存入Tlist（事实上这样等下在内存中建立一个表，Tlist中一项指向一条记录）。

那就是要怎么用呀,给点例子源码好吗?我的问题问了这么多天,但是还没有解决

晕，怎么过了几天回来还是没人回你的贴。。。。。
下面是一个简单的Tlist例子，你自己看看吧。
type
Tuser_info=record
user_name:string;
user_age:integer;
end;
user_info=^Tuser_info;
var user_info_list:Tlist;

procedure TForm1.Button1Click(Sender: TObject);
var my_user_info:user_info;
begin
new(my_user_info);
my_user_info^.user_name:=edit1.text;
my_user_info^.user_age:=strtoint(edit2.Text);
user_info_list.Add(my_user_info);//把记录存入Tlist
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
//读取.....
edit3.Text:=user_info(user_info_list[index])^.user_name;//index是指Tlist中的项的索引
edit4.Text:=inttostr(user_info(user_info_list[index])^.user_age);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
user_info_list:=Tlist.Create;
end;

procedure TForm1.FormCloseQuery(Sender: TObject;
var CanClose: Boolean);
begin
user_info_list.Free;
end;

先谢谢wzwcn,但TList怎么和记录类型的变量拉上关系的,我看得稀里糊涂的,虽然看到见可以这样实现,但是不理解的话,我记不稳.
不知道老兄有没有关于TList,TStringList详细描述的文章或好帖?我想研究看看.

接受答案了.