procedure TForm1.Button1Click(Sender: TObject);
var
FileN:string;
begin
if self.OpenDialog1.Execute then
begin
filen:=UTF8ToAnsi(self.OpenDialog1.FileName);
self.Memo1.Lines.SaveToFile(FileN);
end;
end;
相关文章
- 02-02用pip安装一个包后，在windows运行报错”无法识别命令“的解决方法
- 02-02modelsim无法识别include文件的解决方法
- 02-02Lazarus解决无法识别中文路径的方法
- 02-02源码编译路径错误导致的Apache 无法重启问题解决方法
- 02-02解决：npm中 下载速度慢 和（无法将“nrm”项识别为 cmdlet、函数、脚本文件或可运行程序的名称。请检查名称的拼写，如果包括路径，请确保路径正确， 然后再试一次）。
- 02-02dedecms v5.7搜索无法识别大写字母的解决方法
- 02-02iis部署WebService出现"因 URL 意外地以 结束，请求格式无法识别"的解决方法
- 02-02rapidxml读取包含中文路径的xml解析错误的解决方法
- 02-02Silverlight中文本框添加回车事件后，换行无法清除的解决方法
- 02-02Silverlight中文本框添加回车事件后，换行无法清除的解决方法