TIBBackupServiceのオプション (ID:44514)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文

バックアップらしきことはできるようになりました。
が、元ＤＢのサイズ42.5MBに対し、出力できているのが29MBです。
IBConsoleだと44MBできています。
オプションも同じようにしています。

with IBBackup do
begin
  try
    try
      Active := True;
      Verbose := True;
      //Options
      Options := [];
      if frmMain.cbxIgnoreChecksums.Checked then
        Options := Options + [IgnoreChecksums];
      if frmMain.cbxIgnoreLimbo.Checked then
        Options := Options + [IgnoreLimbo];
      if frmMain.cbxMetadataOnly.Checked then
        Options := Options + [MetadataOnly];
      if frmMain.cbxNoGarbageCollection.Checked then
        Options := Options + [NoGarbageCollection];
      if frmMain.cbxNonTransportable.Checked then
        Options := Options + [NonTransportable];
      if frmMain.cbxConvertExtTables.Checked then
        Options := Options + [ConvertExtTables];
      //
      BackupFile.Add(frmMain.edtBackupPath.Text + '\MANUAL' + FormatDateTime('yyyymmdd',now) + frmMain.edtFileName.Text);
      ServiceStart;
      frmMain.barInfo.SimpleText := FormatDateTime('hh:mm:ss',Now) + ':バックアップに成功しました。';
    except
      frmMain.barInfo.SimpleText := FormatDateTime('hh:mm:ss',Now) + ':バックアップに失敗しました。';
    end;
  finally
    Active := False;
  end;
end;

←解決時は質問者本人がここをチェックしてください。

戻る