Как вывести на отчет сразу на принтер

[Mekhtiev]

Всем привет! В виду отсутствия доверия кладовщикам, возникла потребность сделать так, чтоб они могли распечатать материальный отчет без возможности его скорректировать...Как быть, поделитесь соображениями или опытом.. думаю окошко свое нарисовать, с кнопкой которая сразу на принтер отправит печататься отчет. Реально ли? или другими путями идти??

[spark]

Мы так печатаем комплекты документов(Счет, накладная счет-фактура). Но пользуемся не стандартными печатными формами, а сделали для этого отдельный интерфейс, который готовит поток данных, фастрепортом формирует отчет и сразу его печатает.

Код большой, поэтому надергал оттуда только суть:

Код: Выделить всё

var PrintParam: frxPrintParam;
var DefPrintParam: frxPrintParam;  
var FReport: LongInt;  

printer:=sgettune('GALCOMMON.PARTNER.PRINT.PRNPORTRAIT')

ClearAdvRecord(PrintParam);
ClearAdvRecord(DefPrintParam);
FRGetDefaultParameters(frPrintParam, DefPrintParam);
FRGetDefaultParameters(frPrintParam, PrintParam);
PrintParam.ShowDialog := false;
PrintParam.CopiesCount := 1
PrintParam.PrinterName:=printer
PrintParam.Pages := '' 

FReport := FRCreate([Название потока данных]);
FROpenReport(FReport,[Название отчета])
FRSetParameters(FReport, frPrintParam, PrintParam); 
FRPrintReport(FReport);
FRSetParameters(FReport, frPrintParam, DefPrintParam);
FRDestroy(FReport);

[Masygreen]

1) Вроде есть настройка - сразу отправлять на печать
2) Макросом в Excel
3) Опять таки Excel не открывать файл, а складировать в заранее определенной папке - а службу печати настроить в режим печатать всё из папки

[YuryN]

Для MS Office 2007 была программа просмотра без возможности редактирования документов.
Бесплатная официальная программа, скачивали с сайта Microsoft.
Для нескольких пользователей мы устанавливали Open Ofice, а этот просмотрщик.
В параметрах Галактики прописывали вместо Word и Excel эту программу.
Секция Forms параметры WordFileName и ExcelFileName.
Вроде работало.