The sample demonstrates how to Set PDF Text Format for Silverlight via Spire.PDF.
<Application xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation" xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml" x:Class="TextFormat_PDF.App"> <Application.Resources> </Application.Resources> </Application>
using System; using System.Windows; namespace TextFormat_PDF { public partial class App : Application { public App() { this.Startup += this.Application_Startup; this.Exit += this.Application_Exit; this.UnhandledException += this.Application_UnhandledException; InitializeComponent(); } private void Application_Startup(object sender, StartupEventArgs e) { this.RootVisual = new MainPage(); } private void Application_Exit(object sender, EventArgs e) { } private void Application_UnhandledException(object sender, ApplicationUnhandledExceptionEventArgs e) { // If the app is running outside of the debugger then report the exception using // the browser's exception mechanism. On IE this will display it a yellow alert // icon in the status bar and Firefox will display a script error. if (!System.Diagnostics.Debugger.IsAttached) { // NOTE: This will allow the application to continue running after an exception has been thrown // but not handled. // For production applications this error handling should be replaced with something that will // report the error to the website and stop the application. e.Handled = true; Deployment.Current.Dispatcher.BeginInvoke(delegate { ReportErrorToDOM(e); }); } } private void ReportErrorToDOM(ApplicationUnhandledExceptionEventArgs e) { try { string errorMsg = e.ExceptionObject.Message + e.ExceptionObject.StackTrace; errorMsg = errorMsg.Replace('"', '\'').Replace("\r\n", @"\n"); System.Windows.Browser.HtmlPage.Window.Eval("throw new Error(\"Unhandled Error in Silverlight Application " + errorMsg + "\");"); } catch (Exception) { } } } }
Imports System.Windows Namespace TextFormat_PDF Partial Public Class App Inherits Application Public Sub New() AddHandler Me.Startup, AddressOf Application_Startup AddHandler Me.Exit, AddressOf Application_Exit AddHandler Me.UnhandledException, AddressOf Application_UnhandledException InitializeComponent() End Sub Private Sub Application_Startup(ByVal sender As Object, ByVal e As StartupEventArgs) Me.RootVisual = New MainPage() End Sub Private Sub Application_Exit(ByVal sender As Object, ByVal e As EventArgs) End Sub Private Sub Application_UnhandledException(ByVal sender As Object, ByVal e As ApplicationUnhandledExceptionEventArgs) ' If the app is running outside of the debugger then report the exception using ' the browser's exception mechanism. On IE this will display it a yellow alert ' icon in the status bar and Firefox will display a script error. If Not Debugger.IsAttached Then ' NOTE: This will allow the application to continue running after an exception has been thrown ' but not handled. ' For production applications this error handling should be replaced with something that will ' report the error to the website and stop the application. e.Handled = True Deployment.Current.Dispatcher.BeginInvoke(Sub() ReportErrorToDOM(e)) End If End Sub Private Sub ReportErrorToDOM(ByVal e As ApplicationUnhandledExceptionEventArgs) Try Dim errorMsg As String = e.ExceptionObject.Message + e.ExceptionObject.StackTrace errorMsg = errorMsg.Replace(""""c, "'"c).Replace(vbCrLf, vbLf) System.Windows.Browser.HtmlPage.Window.Eval("throw new Error(""Unhandled Error in Silverlight Application " & errorMsg & """);") Catch e1 As Exception End Try End Sub End Class End Namespace
<UserControl x:Class="TextFormat_PDF.MainPage" xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation" xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml" xmlns:d="http://schemas.microsoft.com/expression/blend/2008" xmlns:mc="http://schemas.openxmlformats.org/markup-compatibility/2006" mc:Ignorable="d" d:DesignHeight="300" d:DesignWidth="400"> <Grid x:Name="LayoutRoot" Background="White"> <Button Content="Run" Height="23" HorizontalAlignment="Left" Margin="296,265,0,0" Name="button1" VerticalAlignment="Top" Width="75" Click="button1_Click" /> </Grid> </UserControl>
using System.Windows; using System.Windows.Controls; using System.Windows.Media; using System.IO; using System.Drawing; using Spire.Pdf; using Spire.Pdf.Graphics; namespace TextFormat_PDF { public partial class MainPage : UserControl { private SaveFileDialog saveFileDialog = null; public MainPage() { InitializeComponent(); this.saveFileDialog = new SaveFileDialog(); this.saveFileDialog.Filter = "PDF Documents(*.pdf)|*.pdf"; } private void button1_Click(object sender, RoutedEventArgs e) { //create a blank pdf document PdfDocument pdfDoc = new PdfDocument(); //add one page PdfPageBase page = pdfDoc.Pages.Add(); //draw text and set the text format float y = 10; float pageWidth = page.Canvas.ClientSize.Width; SizeF size = new SizeF(); string text = "This is a sample demonstrates how to set text format using Spire.pdf "; PdfFont font = new PdfFont(PdfFontFamily.TimesRoman, 18); PdfBrush brush = PdfBrushes.Red; PdfStringFormat format1 = new PdfStringFormat(PdfTextAlignment.Left); page.Canvas.DrawString(text, font, brush, 0, y, format1); y = y + size.Height + 30; PdfBrush brush1 = new PdfSolidBrush(Colors.Black); PdfFont font1 = new PdfFont(PdfFontFamily.Helvetica, 12); format1.CharacterSpacing = 1f; text = "This is a left aligned string "; size = font1.MeasureString(text, format1); page.Canvas.DrawString(text, font1, brush1, 0, y, format1); y = y + size.Height; page.Canvas.DrawString(text, font1, brush1, 0, y, format1); size = font1.MeasureString(text, format1); y = y + size.Height + 6; text = "This is a center aligned string"; format1.Alignment = PdfTextAlignment.Center; PdfBrush brush2 = PdfBrushes.Blue; PdfFont font2 = new PdfFont(PdfFontFamily.Courier, 12); size = font2.MeasureString(text, format1); page.Canvas.DrawString(text, font2, brush2, pageWidth / 2, y, format1); y = y + size.Height; page.Canvas.DrawString(text, font2, brush2, pageWidth / 2, y, format1); y = y + size.Height + 6; text = "This is a right aligned string"; format1.Alignment = PdfTextAlignment.Right; PdfBrush brush3 = PdfBrushes.Green; PdfFont font3 = new PdfFont(PdfFontFamily.TimesRoman, 12); size = font3.MeasureString(text, format1); page.Canvas.DrawString(text, font3, brush3, pageWidth, y, format1); y = y + size.Height; page.Canvas.DrawString(text, font3, brush3, pageWidth, y, format1); //save the pdf document bool? result = this.saveFileDialog.ShowDialog(); if (result.HasValue && result.Value) { using (Stream stream = this.saveFileDialog.OpenFile()) { pdfDoc.SaveToStream(stream); } } } } }
Imports System.Windows Imports System.Windows.Controls Imports System.Windows.Media Imports System.IO Imports System.Drawing Imports Spire.Pdf Imports Spire.Pdf.Graphics Namespace TextFormat_PDF Partial Public Class MainPage Inherits UserControl Private saveFileDialog As SaveFileDialog = Nothing Public Sub New() InitializeComponent() Me.saveFileDialog = New SaveFileDialog() Me.saveFileDialog.Filter = "PDF Documents(*.pdf)|*.pdf" End Sub Private Sub button1_Click(ByVal sender As Object, ByVal e As RoutedEventArgs) 'create a blank pdf document Dim pdfDoc As New PdfDocument() 'add one page Dim page As PdfPageBase = pdfDoc.Pages.Add() 'draw text and set the text format Dim y As Single = 10 Dim pageWidth As Single = page.Canvas.ClientSize.Width Dim size As New SizeF() Dim text As String = "This is a sample demonstrates how to set text format using Spire.pdf " Dim font As New PdfFont(PdfFontFamily.TimesRoman, 18) Dim brush As PdfBrush = PdfBrushes.Red Dim format1 As New PdfStringFormat(PdfTextAlignment.Left) page.Canvas.DrawString(text, font, brush, 0, y, format1) y = y + size.Height + 30 Dim brush1 As PdfBrush = New PdfSolidBrush(Colors.Black) Dim font1 As New PdfFont(PdfFontFamily.Helvetica, 12) format1.CharacterSpacing = 1f text = "This is a left aligned string " size = font1.MeasureString(text, format1) page.Canvas.DrawString(text, font1, brush1, 0, y, format1) y = y + size.Height page.Canvas.DrawString(text, font1, brush1, 0, y, format1) size = font1.MeasureString(text, format1) y = y + size.Height + 6 text = "This is a center aligned string" format1.Alignment = PdfTextAlignment.Center Dim brush2 As PdfBrush = PdfBrushes.Blue Dim font2 As New PdfFont(PdfFontFamily.Courier, 12) size = font2.MeasureString(text, format1) page.Canvas.DrawString(text, font2, brush2, pageWidth / 2, y, format1) y = y + size.Height page.Canvas.DrawString(text, font2, brush2, pageWidth / 2, y, format1) y = y + size.Height + 6 text = "This is a right aligned string" format1.Alignment = PdfTextAlignment.Right Dim brush3 As PdfBrush = PdfBrushes.Green Dim font3 As New PdfFont(PdfFontFamily.TimesRoman, 12) size = font3.MeasureString(text, format1) page.Canvas.DrawString(text, font3, brush3, pageWidth, y, format1) y = y + size.Height page.Canvas.DrawString(text, font3, brush3, pageWidth, y, format1) 'save the pdf document Dim result? As Boolean = Me.saveFileDialog.ShowDialog() If result.HasValue AndAlso result.Value Then Using stream As Stream = Me.saveFileDialog.OpenFile() pdfDoc.SaveToStream(stream) End Using End If End Sub End Class End Namespace