بکاپ از دیتابیس در داخل برنامه

بسمه تعالی
با سلام
من در برنامه دلفی از mysql استفاده کرده ام.
چگونه میتوان در برنامه دلفی بتوان از دیتابیس بکاپ گرفت و در حاظه ذخیره کرد؟

بسمه تعالی
با سلام به شما دوست گرامی
به کمک کد زیر می تونی مرحله به مرحله اجرا کنی
ذو متغیر به نام های زیر path محل اجرای برنامه است و filename برای نام فایل معرفی کنید از نوع string
Var
Path, FileName: String;
Begin

SDsavedialog1.Title:=محل ذخیره سازی
SDsavedialog1.FileName:='BackUp_';
MessageDlg('محل ذخیره سازی فایل را انتخاب نماید.',mtInformation,[mbOK],0);
if SD.Execute then
Path:=Sdsavedialog.FileName
else
Abort;
Try
FLogin.TADOConnection1.Connected := False;
FileName := Path + inttostr(Now) + '.Bak';
With QTemp Do
Begin
Close;
Sql.Clear;
Sql.Add('BACKUP DATABASE نام بانک TO DISK = ' +QuotedStr(FileName)+' with Format');
//ShowMessage(sql.Text);
ExecSQL;
End;
MessageDlg('ÚãáíÇÊ ÔÊíÈÇä íÑí ÈÇ ãæÝÞíÊ ÇäÌÇ㠐ÑÏíÏ!',mtInformation,[mbOK],0);
Except
End;


Application.Terminate;
end;