delphi从文本到数组

我想从文本文件中读取数据以回车为分隔符组成一个新的数组,怎么办?我是新手,请举例说明。谢谢... 我想从文本文件中读取数据以回车为分隔符组成一个新的数组,怎么办?我是新手,请举例说明。谢谢 展开
 我来答
blackscreen
2008-07-15 · TA获得超过459个赞
知道小有建树答主
回答量:522
采纳率:0%
帮助的人:662万
展开全部
//读文件 c:\1.txt 内容,以回车为分割存入数组
procedure TForm1.Button4Click(Sender: TObject);
var
slist:TStringList; //存储文本文件内容
pstrarray:array of string; //数组
i,icount:integer; //文本文件行数
begin
slist:=TStringList.Create;
slist.LoadFromFile('c:\1.txt'); //把文件内容载入到字符串数组列表
icount:=slist.Count;
setlength(pstrarray,icount); //设置动态数组长度
for i:=0 to icount-1 do //遍历文本,把每行数据存入数组
begin
pstrarray[i]:=slist.Strings[i];
end;
slist.free;
end;
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式