怎么保存文件？

怎样保存文件？？？
我的窗体上有一个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;