Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.10.06;
Скачать: CL | DM;

Вниз

Печать через принт сервер   Найти похожие ветки 

 
Дедов Дмитрий ©   (2003-09-25 17:01) [0]

Дедаю так для печати на любой (в том числе и сетевой) принтер

if PrintDialog1.Execute then
begin
printer.getprinter(ADevice, ADriver, APort, ADeviceMode);
S:=TFileStream.Create(PrintFileName, fmOpenRead );
try
T:=TFileStream.Create(APort, fmOpenWrite );
try
T.CopyFrom(S, S.Size) ;
finally
T.Free;
end;
finally
S.Free;
end;
end;

Но, через принт сервер такая печать не проходит с ошибкой существования файла (APort). Как решить?


 
Дедов Дмитрий ©   (2003-09-26 10:11) [1]

Up!


 
don-do   (2003-09-26 11:44) [2]

ExtEscape



Страницы: 1 вся ветка

Текущий архив: 2003.10.06;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.018 c
3-18219
ЭД
2003-09-17 12:06
2003.10.06
ClientDataSet.RefreshRecord не работает


6-18503
MDFE
2003-08-09 15:18
2003.10.06
Пытаюсь сделать счетчик CGI на Делфи


14-18567
malkolinge
2003-09-18 00:59
2003.10.06
С Днем Рождения , Гоблин !


4-18674
Yurique
2003-07-31 21:10
2003.10.06
Потоки ввода и вывода


1-18305
dima_shapkin
2003-09-23 11:19
2003.10.06
Такой хитрый грид