delphi txt文件
我想关联外部txt文件,并将其内容显示在label控件中,现在我只会显示英文,不会显示txt文件中的中文,怎样才能显示中文呢?代码如何去写...
我想关联外部txt文件,并将其内容显示在label控件中,现在我只会显示英文,不会显示txt文件中的中文,怎样才能显示中文呢?代码如何去写
展开
展开全部
可以这样 用一个stringlist来装在TXT里面的内容就可以了
var
filelist:Tstirnglist;
begin
filelist:=Tstringlist.create;
filelist.loadformfile(//你的txt所在的文件名路径);
//如果你需要用label显示内容的话可以这样 如果txt中只有一行那么就简单了
label1.caption:=filelist[0];
//如果是多行的话可以这样
for i:=0 to filelist.count-1 do
begin
label1.caption:=label1.caption+filelist[i];
end;
只是有点想不通,为什么要在label中显示txt,一般都用memo1或者richedit组件的啊
var
filelist:Tstirnglist;
begin
filelist:=Tstringlist.create;
filelist.loadformfile(//你的txt所在的文件名路径);
//如果你需要用label显示内容的话可以这样 如果txt中只有一行那么就简单了
label1.caption:=filelist[0];
//如果是多行的话可以这样
for i:=0 to filelist.count-1 do
begin
label1.caption:=label1.caption+filelist[i];
end;
只是有点想不通,为什么要在label中显示txt,一般都用memo1或者richedit组件的啊
展开全部
显示txt文件内容要用memo控件。
procedure TForm1.Button1Click(Sender: TObject);
begin
memo1.Lines.LoadFromFile('f:\readme.txt');
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
memo1.Lines.LoadFromFile('f:\readme.txt');
end;
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
用INI文件读取比较好
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
我的分问问题的时候都用光了,能不能给点
把你要问的说清楚。用label显示中文?什么意思?label.caption?
把你要问的说清楚。用label显示中文?什么意思?label.caption?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询