Печатать текущую дату автоматом

  • Автор темы Автор темы xRom
  • Дата начала Дата начала
Статус
Закрыто для дальнейших ответов.

xRom

Участник
Топикстартер
Сообщения
1
Реакции
0
Можно ли заставить корел печатать в заданном месте листа заданным шрифтом текущую дату? И возможно ли master layer сделать самым "нижним" в числе слоев, типа бекграунда?
 
Ответ: Печатать такущую дату автоматом

Ответ на первый вопрос.
По-моему, самым гибкий способ -- воспользоваться макросом. Что-нибуль вроде этого:
Код:
Sub InsDate()
CorelScript.CreateArtisticText Date, 10, 20
With ActiveDocument.Selection.Shapes.Item(1).Text.Story
    .Font = "HeliosCond"
    .Size = 10
End With
End Sub
Date -- функция, выдающая текущую дату,
(10,20) -- координаты относительно центра страницы,
а ниже просто устанавливаются свойства текста: гарнитура и размер. Сюда же можно добавить и другие.

Этот макрос можно вызывать, например, в Event Open, который выполняется при открытии документа. Это уже зависит от задачи.
 
Статус
Закрыто для дальнейших ответов.