Rtf |
Note: This API is now obsolete.
[ObsoleteAttribute("")] public RtfToHtmlHtmlSaveOptionsImagesFormat ImageFormat { get; set; }
using System; using System.Collections.Generic; using System.Linq; using System.Text; using System.IO; using SautinSoft; namespace Example { class Program { static void Main(string[] args) { SetJpegQuality(); } /// <summary> /// How to set jpeg quality. /// </summary> static void SetJpegQuality() { // Get your free key here: // https://sautinsoft.com/start-for-free/ // If you need more information about "RTF to HTML .Net" // Email us at: support@sautinsoft.com. string inpFile = @"..\..\..\example.docx"; string outFile = Path.GetFullPath(@"Result.html"); string imgDir = Path.GetDirectoryName(outFile); RtfToHtml r = new RtfToHtml(); // 1. Set JPEG format and quality. RtfToHtml.HtmlFixedSaveOptions opt = new RtfToHtml.HtmlFixedSaveOptions() { ImagesDirectoryPath = Path.Combine(imgDir, "Result_images"), ImagesDirectorySrcPath = "Result_images", // Change to store images as physical files on local drive. EmbedImages = false, ImageFormat = RtfToHtml.HtmlSaveOptions.ImagesFormat.Jpeg, JpegQuality = 50, Title = "JPEG images, 50% quality" }; try { r.Convert(inpFile, outFile, opt); } catch (Exception ex) { Console.WriteLine($"Conversion failed! {ex.Message}"); } // Open the result. System.Diagnostics.Process.Start(new System.Diagnostics.ProcessStartInfo(outFile) { UseShellExecute = true }); } } }
Imports System Imports System.Collections.Generic Imports System.Linq Imports System.Text Imports System.IO Imports SautinSoft Namespace Example Friend Class Program Shared Sub Main(ByVal args() As String) SetJpegQuality() End Sub ''' <summary> ''' How to set jpeg quality. ''' </summary> Private Shared Sub SetJpegQuality() ' Get your free key here: ' https://sautinsoft.com/start-for-free/ ' If you need more information about "RTF to HTML .Net" ' Email us at: support@sautinsoft.com. Dim inpFile As String = "..\..\..\example.docx" Dim outFile As String = Path.GetFullPath("Result.html") Dim imgDir As String = Path.GetDirectoryName(outFile) Dim r As New RtfToHtml() ' 1. Set JPEG format and quality. Dim opt As New RtfToHtml.HtmlFixedSaveOptions() With { .ImagesDirectoryPath = Path.Combine(imgDir, "Result_images"), .ImagesDirectorySrcPath = "Result_images", .EmbedImages = False, .ImageFormat = RtfToHtml.HtmlSaveOptions.ImagesFormat.Jpeg, .JpegQuality = 50, .Title = "JPEG images, 50% quality" } Try r.Convert(inpFile, outFile, opt) Catch ex As Exception Console.WriteLine($"Conversion failed! {ex.Message}") End Try ' Open the result. System.Diagnostics.Process.Start(New System.Diagnostics.ProcessStartInfo(outFile) With {.UseShellExecute = True}) End Sub End Class End Namespace