PrintPreviewOptions.SaveMode Property

using System;
using System.Drawing.Imaging;
using System.Globalization;
using System.Text;
using System.Windows.Forms;
using DevExpress.XtraPrinting;
// ... 

namespace WindowsFormsApplication1 {
    public partial class Form1 : Form {
        public Form1() {
            InitializeComponent();
        }

        private XtraReport1 report;

        private void Form1_Load(object sender, EventArgs e) {
            report = new XtraReport1();
            documentViewer1.DocumentSource = report;
            report.CreateDocument();

            PrintingSystemBase printingSystem1 = report.PrintingSystem;

            // Obtain the current export options. 
            ExportOptions options = printingSystem1.ExportOptions;

            // Set Print Preview options. 
            options.PrintPreview.ActionAfterExport = ActionAfterExport.AskUser;
            options.PrintPreview.DefaultDirectory = "C:\\Temp";
            options.PrintPreview.DefaultFileName = "Report";
            options.PrintPreview.SaveMode = SaveMode.UsingDefaultPath;
            options.PrintPreview.ShowOptionsBeforeExport = false;

            // Set E-mail options. 
            options.Email.RecipientAddress = "someone@somewhere.com";
            options.Email.RecipientName = "Someone";
            options.Email.Subject = "Test";
            options.Email.Body = "Test";

            // Set CSV-specific export options. 
            options.Csv.Encoding = Encoding.Unicode;
            options.Csv.Separator =
                CultureInfo.CurrentCulture.TextInfo.ListSeparator.ToString();

            // Set HTML-specific export options. 
            options.Html.CharacterSet = "UTF-8";
            options.Html.RemoveSecondarySymbols = false;
            options.Html.Title = "Test Title";

            // Set Image-specific export options. 
            options.Image.Format = ImageFormat.Jpeg;

            // Set MHT-specific export options. 
            options.Mht.CharacterSet = "UTF-8";
            options.Mht.RemoveSecondarySymbols = false;
            options.Mht.Title = "Test Title";

            // Set PDF-specific export options. 
            options.Pdf.Compressed = true;
            options.Pdf.ImageQuality = PdfJpegImageQuality.Low;
            options.Pdf.NeverEmbeddedFonts = "Tahoma;Courier New";
            options.Pdf.DocumentOptions.Application = "Test Application";
            options.Pdf.DocumentOptions.Author = "Test Team";
            options.Pdf.DocumentOptions.Keywords = "Test1, Test2";
            options.Pdf.DocumentOptions.Subject = "Test Subject";
            options.Pdf.DocumentOptions.Title = "Test Title";

            // Set Text-specific export options. 
            options.Text.Encoding = Encoding.Unicode;
            options.Text.Separator =
                CultureInfo.CurrentCulture.TextInfo.ListSeparator.ToString();

            // Set XLS-specific export options. 
            options.Xls.ShowGridLines = true;
            options.Xls.SheetName = "Page 1";
            options.Xls.TextExportMode = TextExportMode.Value;

            // Set XLSX-specific export options. 
            options.Xlsx.ShowGridLines = true;
            options.Xlsx.SheetName = "Page 1";
            options.Xlsx.TextExportMode = TextExportMode.Value;
        }
    }
}

Imports Microsoft.VisualBasic
Imports System
Imports System.Drawing.Imaging
Imports System.Globalization
Imports System.Text
Imports System.Windows.Forms
Imports DevExpress.XtraPrinting
' ...

Namespace WindowsFormsApplication1
    Partial Public Class Form1
        Inherits Form
        Public Sub New()
            InitializeComponent()
        End Sub

        Private report As XtraReport1

        Private Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) Handles MyBase.Load
            report = New XtraReport1()
            documentViewer1.DocumentSource = report
            report.CreateDocument()

            Dim printingSystem1 As PrintingSystemBase = report.PrintingSystem

            ' Obtain the current export options.
            Dim options As ExportOptions = printingSystem1.ExportOptions

            ' Set Print Preview options.
            options.PrintPreview.ActionAfterExport = ActionAfterExport.AskUser
            options.PrintPreview.DefaultDirectory = "C:\Temp" 
            options.PrintPreview.DefaultFileName = "Report" 
            options.PrintPreview.SaveMode = SaveMode.UsingDefaultPath
            options.PrintPreview.ShowOptionsBeforeExport = False

            ' Set E-mail options.
            options.Email.RecipientAddress = "someone@somewhere.com" 
            options.Email.RecipientName = "Someone" 
            options.Email.Subject = "Test" 
            options.Email.Body = "Test" 

            ' Set CSV-specific export options.
            options.Csv.Encoding = Encoding.Unicode
            options.Csv.Separator = CultureInfo.CurrentCulture.TextInfo.ListSeparator.ToString()

            ' Set HTML-specific export options.
            options.Html.CharacterSet = "UTF-8" 
            options.Html.RemoveSecondarySymbols = False
            options.Html.Title = "Test Title" 

            ' Set Image-specific export options.
            options.Image.Format = ImageFormat.Jpeg

            ' Set MHT-specific export options.
            options.Mht.CharacterSet = "UTF-8" 
            options.Mht.RemoveSecondarySymbols = False
            options.Mht.Title = "Test Title" 

            ' Set PDF-specific export options.
            options.Pdf.Compressed = True
            options.Pdf.ImageQuality = PdfJpegImageQuality.Low
            options.Pdf.NeverEmbeddedFonts = "Tahoma;Courier New" 
            options.Pdf.DocumentOptions.Application = "Test Application" 
            options.Pdf.DocumentOptions.Author = "Test Team" 
            options.Pdf.DocumentOptions.Keywords = "Test1, Test2" 
            options.Pdf.DocumentOptions.Subject = "Test Subject" 
            options.Pdf.DocumentOptions.Title = "Test Title" 

            ' Set Text-specific export options.
            options.Text.Encoding = Encoding.Unicode
            options.Text.Separator = CultureInfo.CurrentCulture.TextInfo.ListSeparator.ToString()

            ' Set XLS-specific export options.
            options.Xls.ShowGridLines = True
            options.Xls.SheetName = "Page 1" 
            options.Xls.TextExportMode = TextExportMode.Value

            ' Set XLSX-specific export options.
            options.Xlsx.ShowGridLines = True
            options.Xlsx.SheetName = "Page 1" 
            options.Xlsx.TextExportMode = TextExportMode.Value
        End Sub
    End Class
End Namespace