DLM для работы с буфером обмена терминала и печати на принтер терминала

Описание

Текст примера

 ob=TaeClipBoard(); - для работы с буфером обмена

ob.Set("1111122222222222222"); - записываем в буфер на терминале
ob.Clear(); - очищаем буфер на терминале
print(ob.Get()); - получаем буфер в виде строки
ограничение на размер строки 15 кб.


ob=TaePrinter; - работа с принтером на терминале
ob.BeginDoc(); - инициализация принтера
ob.PrintText(200, 500, toANSI("Привет из RSL! Delphi!")); - вывод строки первые параметры координаты Х,У
ob.EndDoc; - отправляем задание на печать.

дополнительные св-ва и методы
ob.count; - кол-во принтеров
ob.Printers; - названия всех установленных принтеров в виде строки разделенным карретками
ob.Printer(1); - название принтера по индексу.
ob.PrinterIndex; - установка принтера либо получение текущего индекса принтера (индекс нумеруется с 0) (если минус один то принтер по умолчанию)