Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / iTextSharp и новая страница / 2 сообщений из 2, страница 1 из 1
26.10.2014, 02:42
    #38787449
voffkamc
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
iTextSharp и новая страница
Здравствуйте. Есть код:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
Imports iTextSharp.text.pdf
Imports System.IO
Imports iTextSharp.text
_____________________
        Dim msReport = New System.IO.MemoryStream()
        Dim doc = New Document(PageSize.A4, 20, 15, 15, 15)
        doc.Open()
        Dim wr = PdfWriter.GetInstance(doc, New System.IO.FileStream("Отчет7.pdf", System.IO.FileMode.Create))
        doc.Open()
        Dim Deffont = BaseFont.CreateFont("C:\Windows\Fonts\arial.ttf", "CP1251", BaseFont.EMBEDDED)
        Dim font = New Font(Deffont, 10, 0)
        Dim fontBold = New Font(Deffont, 10, 1)
        Dim table_to_pdf5 = New PdfPTable(2)
        table_to_pdf5.WidthPercentage = 100.0F
        table_to_pdf5.HorizontalAlignment = Element.ALIGN_CENTER
        Dim with_cel5 = {65.0F, 35.0F}
        table_to_pdf5.SetTotalWidth(with_cel5)
        Dim cell_to_pdf5 = New PdfPCell(New Phrase("cell_to_pdf5", font))
        cell_to_pdf5.BorderColor = BaseColor.RED
        cell_to_pdf5.Phrase = New Phrase("test1", font)
        table_to_pdf5.AddCell(cell_to_pdf5)
        cell_to_pdf5.Phrase = New Phrase("test2", fontBold)
        table_to_pdf5.AddCell(cell_to_pdf5)
        doc.Add(table_to_pdf5)

        doc.NewPage()
        doc.Add(table_to_pdf5)
        doc.Close()
        wr.Close()
        System.Diagnostics.Process.Start("Отчет7.pdf")



Подскажите, почему не добавляется новая страница?
...
Рейтинг: 0 / 0
27.10.2014, 09:43
    #38787862
МСУ
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
iTextSharp и новая страница
Сконвертил твой код в C#, всё работает. Взял из нугета последнюю версию iTextSharp 5.5.3.0.

...
Код: c#
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
using iTextSharp.text;
using iTextSharp.text.pdf;

namespace ConsoleApplication_iTextSharp
{
    class Program
    {
        static void Main(string[] args)
        {
            var msReport = new System.IO.MemoryStream();
            var doc = new Document(PageSize.A4, 20, 15, 15, 15);
            doc.Open();
            var wr = PdfWriter.GetInstance(doc, new System.IO.FileStream("Отчет7.pdf", System.IO.FileMode.Create));
            doc.Open();
            var Deffont = BaseFont.CreateFont("C:\\Windows\\Fonts\\arial.ttf", "CP1251", BaseFont.EMBEDDED);
            var font = new Font(Deffont, 10, 0);
            var fontBold = new Font(Deffont, 10, 1);
            var table_to_pdf5 = new PdfPTable(2);
            table_to_pdf5.WidthPercentage = 100f;
            table_to_pdf5.HorizontalAlignment = Element.ALIGN_CENTER;
            dynamic with_cel5 = new float[] { 65f, 35f };
            table_to_pdf5.SetTotalWidth(with_cel5);
            dynamic cell_to_pdf5 = new PdfPCell(new Phrase("cell_to_pdf5", font));
            cell_to_pdf5.BorderColor = BaseColor.RED;
            cell_to_pdf5.Phrase = new Phrase("test1", font);
            table_to_pdf5.AddCell(cell_to_pdf5);
            cell_to_pdf5.Phrase = new Phrase("test2", fontBold);
            table_to_pdf5.AddCell(cell_to_pdf5);
            doc.Add(table_to_pdf5);

            doc.NewPage();
            doc.Add(table_to_pdf5);
            doc.Close();
            wr.Close();
            System.Diagnostics.Process.Start("Отчет7.pdf");
        }
    }
}

...
Рейтинг: 0 / 0
Форумы / WinForms, .Net Framework [игнор отключен] [закрыт для гостей] / iTextSharp и новая страница / 2 сообщений из 2, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]