读书人

怎么保存文件?

发布时间: 2013-10-25 14:36:53 作者: rapoo

怎样保存文件???
我的窗体上有一个TStringGrid控件,我想在ToolBar上放一个ToolButton按钮此按钮的功能就是保存TStringGrid控件中的所有内容(4列)。我放了一个TSaveDialog对话框,后面的怎么做我就不知道了???各位大神,然后要怎么做咧!!! 文件保存
[解决办法]


var
i:integer;
LogFile:TStringlist;
sRow:string;
begin
LogFile := TStringlist.Create;
SaveDialog1.Filter := '日志文件(*.log)
[解决办法]
*.log';
if SaveDialog1.Execute then
begin
for i := 1 to StringGrid1.RowCount do
BEGIN
sRow := '';
sRow := StringGrid1.Cells[i,1] + ';' +StringGrid1.Cells[i,2] + ';' + StringGrid1.Cells[i,3] +';'+ StringGrid1.Cells[i,4];
LogFile.Add(sRow);
END;
LogFile.SaveToFile(SaveDialog1.FileName);
end;

end;

读书人网 >.NET

热点推荐