Как создать тег таблицы Corel VENTURA 8

[ast44]

как создать тег таблицы чтобы шапка была залита серым

 

[sargas]

Ответ: Как создать тег таблицы Corel VENTURA 8

Увы... создания тега таблицы в Corel VENTURA 8 -- нет.

 

[Sh]

Ответ: Как создать тег таблицы Corel VENTURA 8

Да, создания тега нет (есть в 10-й), но можно применить autoformat (table>autoformat) или выделить мышом ряд и ткнуть, опять жО, мышом, в нужный цвет (нужный цвет находится на линейке пиктограмм, где нарисованы дискетка, принтер, etc).

 

[Alexey Pavlov]

Ответ: Как создать тег таблицы Corel VENTURA 8

Я написал скрипт по обработке таблиц, и теперь можно сказать, что у меня есть тэг таблицы

 

[Sh]

Ответ: Как создать тег таблицы Corel VENTURA 8

2 Alexey Pavlov
Ага.
ЗЫ: очень Вас благодарю за подсказанную и выложенную здесь программу переносов orfo (старенькую такую .dll от 21.02.96). Не только я, но и весь редакционный коллектив (корректоры+редакторы) благодарят Вас.

 

[ast44]

Ответ: Как создать тег таблицы Corel VENTURA 8

Я написал скрипт по обработке таблиц, и теперь можно сказать, что у меня есть тэг таблицы

Alexey Pavlov аесли можно гдеб его взять

 

[Alexey Pavlov]

Ответ: Как создать тег таблицы Corel VENTURA 8

Примерно так (апостроф в начале строки означает комментарий, в данном случае значит, что строка не исполняется):

WITHOBJECT "CorelVentura.Automation.8"
M_POINTS = LENGTHCONVERT (3 , 7 , 1)
FOR i=0 TO 23
.TableColumnWidth i, 0
NEXT i
' .TableColumnWidth 0, -1, 54*10000
' .TableColumnWidth 1, 0
' .TableColumnWidth 2, 0
' .TableColumnWidth 3, 0
' .TableColumnWidth 4, 0
' .TableColumnWidth 5, 0
' .TableColumnWidth 6, 0
' .TableColumnWidth 7, 0
' .TableColumnWidth 8, 0
' .TableColumnWidth 9, 0
' .TableColumnWidth 10, 0
' .TableColumnWidth 11, 0
' .TableColumnWidth 12, 0
' .TableColumnWidth 13, 0
' .TableColumnWidth 14, 0
' .TableColumnWidth 15, 0
' .TableColumnWidth 16, 0
' .TableColumnWidth 17, 0
' .TableColumnWidth 18, 0
' .TableColumnWidth 19, 0
' .TableColumnWidth 20, -1, 23*10000
' .TableColumnWidth 21, -1, 26*10000
' .TableColumnWidth 22, -1, 11*10000

' .TablePosition 1057100, 52900, 0
.TableSelectTable , , , , -1
.TableFormatTable , , 0, , "Single", "Single", "Single", -1
.TableNormalRule
.TableSpacing 8*M_POINTS, 12*M_POINTS, 1*M_POINTS, 6*M_POINTS
' .TablePosition 81*10000, 529*100, 0
END WITHOBJECT