powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
20 сообщений из 20, страница 1 из 1
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33194589
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Нужно создать таблицу в первом ряду 2 колонки, а во втором 6...
Причём к каждой колонке в первом ряду относятся по три из второго....
Как сиё в RTF-Writer сделать по документации нифига не понял....
Помогите!!!!!!
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33194609
Фотография Black
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Отпиши мне вы мыло, подскажу куда написать ...
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33195798
LeXa NalBat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
#!/usr/bin/perl

use strict;
use warnings;
use RTF::Writer;

my $rtf = RTF::Writer->new_to_file("test.rtf");
$rtf->prolog();
$rtf->row( RTF::Writer::TableRowDecl->new( widths => [ 3000, 3000 ] ), "one", "two" );
$rtf->row( RTF::Writer::TableRowDecl->new( widths => [ 1000, 1000, 1000, 1000, 1000, 1000 ] ), "1.1", "1.2", "1.3", "2.1", "2.2", "2.3" );
$rtf->close;
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33196770
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо, LeXa NalBat, получилсь! Привык в HTML работать с нефиксирванными размерами.....
А нафига strict(просто никогда не юзал)?
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33196782
Фотография Black
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
автор нафига strict(просто никогда не юзал)?
помогает поддерживать хороший тон программирования :) (всем переменным проставлять видимость)
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33196875
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Автоматически? Тоесть лучше его прописать?
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33196901
Фотография Black
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
modАвтоматически? Тоесть лучше его прописать?
нет, он будет подсказывать, какая переменная не объявленна.
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33197172
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Буду знать! Спасибо!
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33197255
LeXa NalBat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
modможно ли ориетацию страницы на альбомную сменить?$rtf->print(\'\landscape'); сразу после prolog().

Вам наверняка будет полезна спецификация RTF-Spec-1_5.rtf. Если не найдете в инете, могу выслать по мылу.
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33200749
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Как предложил построить таблицу автор Sean M. Burk:
I think this should get you on the right track:

#!/usr/bin/perl
use warnings;
use strict;
use RTF::Writer;

my $rtf = RTF::Writer->new_to_file("col_test.rtf");
$rtf->prolog();

my $header_row_style = RTF::Writer::TableRowDecl->new(
widths => [3456 ], inbetween => 120 );
my $main_row_style = RTF::Writer::TableRowDecl->new(
widths => [3456/3], inbetween => 120/3 );

$rtf->row( $header_row_style,
"column1", "column2", "column3",
);
$rtf->row( $main_row_style,
"column1.1", "column1.2", "column1.3",
"column2.1", "column2.2", "column2.3",
"column3.1", "column3.2", "column3.3",
);

$rtf->close;
print "Done!\n";
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33200755
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
LeXa NalBat, спасибо!
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33206637
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
LeXa NalBat, landscape канечно метку ставит на документ, но не переворачивает... В итоге когда открываю документ в Word, в параметрах страницы стоит альбомная, а на самом деле книжная ориентация...
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33207141
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Возник новый вопрос: как в ячейке делать выравнивание текста по центру..
\'\qc' - не прокатывет...А как?
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33208844
LeXa NalBat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
modLeXa NalBat, landscape канечно метку ставит на документ, но не переворачивает... В итоге когда открываю документ в Word, в параметрах страницы стоит альбомная, а на самом деле книжная ориентация...Или 1) мы неправильно сформировали документ, или 2) наличие \landscape в документе согласно спецификации не обязывает вьюера показывать альбомно, или 3) MS Word не следует спецификации.
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33209616
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
LeXa NalBat угу, скорее всего Word что-то не то творит...
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33209898
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Делаю так:
$rtf->prolog( 'title' => "$filename", 'fonts' =>['Times New Roman','Courier New']);
$rtf->print(\'\landscape');
Ворд вообще забавно пашет... В свойствах стоит альбомная, а показывает и печатает книжную. Приходится менять на книжную, затем на альбомную и тока тогда оно преобретает альбомный вид....
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33210277
LeXa NalBat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
modВорд вообще забавно пашет... В свойствах стоит альбомная, а показывает и печатает книжную.У меня кажется показывал книжную, но печатал альбомную.
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33212008
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не, не фига альбомную он у меня печатаь чёй-то не хочит, ну совсем...
Типа принтер предлагает встваить ему листок A3... Вобщем полный алес...
Суть в том, что отчёты будут уходить операционистам, а их, боюсь долго придётся обучать в Ворде листки ворочить...
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33213068
LeXa NalBat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
modСуть в том, что отчёты будут уходить операционистам, а их, боюсь долго придётся обучать в Ворде листки ворочить...Мы выводим отчеты в TROFF, потом PostScript, потом cat | lp. "Операционистам" остается только листочки из принтера доставать. :)
...
Рейтинг: 0 / 0
(Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
    #33215176
mod
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Операционирсты не только в других филиалах, других городах но и в дочках, а также в у наших агентов... А там и софтины разные и прочее. Проще офисными средствами... Да и политика у нас такая: если можно использовать что-то стандартное и у всех стоящее, то его и нужно юзать.... Я вообще хотел на VB .NET C Crystal Reports навоячить, но сказали чразработать так, чтобы ничего не ставить на клиентские машины. За сим и выбрал Perl...
...
Рейтинг: 0 / 0
20 сообщений из 20, страница 1 из 1
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (Perl) Кто-нить юзал RTF-Writer(проблема с созданием таблицы)?
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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