with adocommand1 do
   begin
     close;
      commandtext:='backupdatabase db1'to disk='+''''+trim(edit3.Text)+''''+' with init';
     Execute;
   end;执行完了,程序就自动退出了????