SubDocument.GetMhtText(DocumentRange, MhtDocumentExporterOptions) Method

Gets the content of the specified document range in MHT format.

Namespace: DevExpress.XtraRichEdit.API.Native

Assembly: DevExpress.RichEdit.v19.1.Core.dll

Declaration

C#

string GetMhtText(
    DocumentRange range,
    MhtDocumentExporterOptions options
)

VB.NET

Function GetMhtText(
    range As DocumentRange,
    options As MhtDocumentExporterOptions
) As String

Parameters

Name	Type	Description
range	DocumentRange	A DocumentRange object representing the range to convert to MHT.
options	MhtDocumentExporterOptions	A MhtDocumentExporterOptions instance providing options for export.

Returns

Type	Description
String	A string containing the content in MHT format.

Remarks

If you operate with a selection range, the GetMhtText method should be enclosed within a DocumentRange.BeginUpdateDocument - DocumentRange.EndUpdateDocument method pair. Otherwise, an incorrect document model might be selected, resulting in an exception “Error: specified document position or range belongs to other document or subdocument” being thrown.

To retrieve the section settings, make sure that the range contains the last section’s paragraph. Otherwise, the section settings are reset to the default.

This code snippet illustrates how to export the selected range to the string in MHT format.

Note

A complete sample project is available at https://github.com/DevExpress-Examples/how-to-save-the-text-of-a-document-range-in-different-formats-e1604

Form1.cs

if (this.richEditControl.Document.Selection.Length > 0) {
    DevExpress.XtraRichEdit.API.Native.DocumentRange selection = richEditControl.Document.Selection;
    DevExpress.XtraRichEdit.API.Native.SubDocument doc = selection.BeginUpdateDocument();
    mhtText = doc.GetMhtText(selection);
    selection.EndUpdateDocument(doc);  
}
else {
mhtText = richEditControl.Document.GetMhtText(richEditControl.Document.Range);
}

Form1.vb

If Me.richEditControl.Document.Selection.Length > 0 Then
    Dim selection As DevExpress.XtraRichEdit.API.Native.DocumentRange = richEditControl.Document.Selection
    Dim doc As DevExpress.XtraRichEdit.API.Native.SubDocument = selection.BeginUpdateDocument()
    mhtText = doc.GetMhtText(selection)
    selection.EndUpdateDocument(doc)
Else
    mhtText = richEditControl.Document.GetMhtText(richEditControl.Document.Range)
End If