
【DELPHI】用DELPHI写一段可以在本地生成一个文本文档并保存数据的代码(急急急!))
我需要用DELPHI写一段代码可以在本地生成一个文本文档并且将(比如输入的edit.text等)数据记录进去我是菜鸟跪求高手指点。。。。。我想问一下一楼那个代码生成的文档...
我需要用DELPHI写一段代码可以在本地生成一个文本文档 并且将(比如输入的edit.text等)数据记录进去
我是菜鸟 跪求高手指点。。。。。
我想问一下 一楼那个代码生成的文档保存被在哪里呢
不好意思 我真的太菜咯 展开
我是菜鸟 跪求高手指点。。。。。
我想问一下 一楼那个代码生成的文档保存被在哪里呢
不好意思 我真的太菜咯 展开
1个回答
展开全部
相当简单~
新建一个工程,放一个Edit和一个按钮,Edit的名称为Edit1,然后双击按钮写入如下代码
procedure TForm1.Button1Click(Sender: TObject);
var
saveedit:TStringList;
begin
saveedit := Tstringlist.Create;
saveedit.Text := edit1.Text;
saveedit.SaveToFile(ExtractFilePath(Application.ExeName)+'自己想要的文件名.txt');
saveedit.Free;
end;
执行~~~~哈哈是不是OK了,给分吧!
新建一个工程,放一个Edit和一个按钮,Edit的名称为Edit1,然后双击按钮写入如下代码
procedure TForm1.Button1Click(Sender: TObject);
var
saveedit:TStringList;
begin
saveedit := Tstringlist.Create;
saveedit.Text := edit1.Text;
saveedit.SaveToFile(ExtractFilePath(Application.ExeName)+'自己想要的文件名.txt');
saveedit.Free;
end;
执行~~~~哈哈是不是OK了,给分吧!
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询