Доброго времени суток уважаемые форумчане!
Помогите, пожалуйста!
Задача: в атлантисе вместо вывода сообщения на экран
message('Нет работников с превышением', cmOk)
надо вывести текст сообщения сразу на принтер.
Как вывести текст на принтер, возможно ли это?
Спасибо!
Как вывести текст на принтер, возможно ли это?
Модераторы: m0p3e, edward_K, Модераторы
-
- Местный житель
- Сообщения: 554
- Зарегистрирован: 17 июл 2012, 11:56
- Откуда: Республика Беларусь, г.Могилев
Re: Как вывести текст на принтер, возможно ли это?
Здравствуйте. Думаю, что правильно выводить не сразу на принтер, а в файл. А файл при необходимости можно распечатать. Например:
logstrtofile(fileName, str1)
fileName – файл, куда писать ,
str1 – строка, которую писать.
logstrtofile(fileName, str1)
fileName – файл, куда писать ,
str1 – строка, которую писать.
-
- Заслуженный деятель интернет-сообщества
- Сообщения: 5188
- Зарегистрирован: 29 мар 2005, 17:49
- Откуда: SPB galaxy spb
Re: Как вывести текст на принтер, возможно ли это?
да и был такой файл - prn. Правильно сначала сделать файл а потом скопировать его в prn. Есть еще функции ExecProgram, где можно вызвать нечто для печати. Если протокол формируется в Excel , то там можно скрипт написать.
А вообще чего на принтер то - в наш век пора все на почту слать. Или хотя бы cмс.
А вообще чего на принтер то - в наш век пора все на почту слать. Или хотя бы cмс.
Re: Как вывести текст на принтер, возможно ли это?
Спасибо большое за помощь!
Было реализовано следующим образом:
в файле vip формируется поток для прототипа
в потоке передается счетчик количества записей
В присоединенной форме rtf с помощью .{?internal; анализируется счетчик
если записи есть (счетчик>0), то формируется таблица с заголовком, если записей нет (счетчик = 0), то формируется текст, что записей нет
в vip .ShowFile; или, если сразу на принтер, то .PrintFile;
Было реализовано следующим образом:
в файле vip формируется поток для прототипа
в потоке передается счетчик количества записей
В присоединенной форме rtf с помощью .{?internal; анализируется счетчик
если записи есть (счетчик>0), то формируется таблица с заголовком, если записей нет (счетчик = 0), то формируется текст, что записей нет
в vip .ShowFile; или, если сразу на принтер, то .PrintFile;