Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Как печатать в Битмап ? / 5 сообщений из 5, страница 1 из 1
13.05.2004, 16:35
    #32516684
Вагон
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как печатать в Битмап ?
Хочу виртуальный принтер:
- что бы из любой программы напечатать в какой-либо популярный графический файл (лучше всего BMP/TIFF).

Если где-то существует такой бесплатный подскажите. Если нету таких - как его сделать, хотя бы в принципе.

Заранее благодарен...
...
Рейтинг: 0 / 0
13.05.2004, 17:06
    #32516771
Гость(2)
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как печатать в Битмап ?
У одной моей знакомой был такой принтер...

Правда, выдавить информацию из нее я не смогу - она полный ламер, а вручную посмотреть тоже не получится - она запрещает заходить в папки дальше рабочего стола (но все на ее компе работают под правами главного админа ;))...
...
Рейтинг: 0 / 0
13.05.2004, 18:00
    #32516913
Палестинец
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как печатать в Битмап ?
что бы из любой программы напечатать

printscreen
...
Рейтинг: 0 / 0
14.05.2004, 19:00
    #32518884
Шогал
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как печатать в Битмап ?
Мне максимум удавалось выдавить в файл текст типа:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
%!PS-Adobe- 3 . 0 
%%Title: <CFF0EEE1EDE0FF20F1F2F0E0EDE8F6E0>
%%Creator: PScript5.dll Version  5 . 2 
%%CreationDate:  5 / 13 / 2004   15 : 41 : 41 
%%For: User
%%BoundingBox: (atend)
%%Pages: (atend)
%%Orientation: Portrait
%%PageOrder: Special
%%DocumentNeededResources: (atend)
%%DocumentSuppliedResources: (atend)
%%DocumentData: Clean7Bit
%%TargetDevice: (Monotype Imagesetter) ( 52 . 3 )  2 . 11 
%%LanguageLevel:  1 
%%EndComments

%%BeginDefaults
%%PageBoundingBox:  9   11   586   831 
%%ViewingOrientation:  1   0   0   1 
%%EndDefaults


%%BeginProlog
%%BeginResource: file Pscript_WinNT_ErrorHandler  5 . 0   0 
/currentpacking where{pop/oldpack currentpacking def/setpacking where{pop false
setpacking}if}if/$brkpage  64  dict def $brkpage begin/prnt{dup type/stringtype
ne{=string cvs}if dup length  6  mul/tx exch def/ty  10  def currentpoint/toy exch
def/tox exch def  1  setgray newpath tox toy  2  sub moveto  0  ty rlineto tx  0 
rlineto  0  ty neg rlineto closepath fill tox toy moveto  0  setgray show}bind def
/nl{currentpoint exch pop lmargin exch moveto  0  - 10  rmoveto}def/=={/cp  0  def
typeprint nl}def/typeprint{dup type exec}readonly def/lmargin  72  def/rmargin  72 
def/tprint{dup length cp add rmargin gt{nl/cp  0  def}if dup length cp add/cp
exch def prnt}readonly def/cvsprint{=string cvs tprint( )tprint}readonly def
/integertype{cvsprint}readonly def/realtype{cvsprint}readonly def/booleantype
{cvsprint}readonly def/operatortype{( --)tprint =string cvs tprint(-- )tprint}
 
readonly def/marktype{pop(-mark- )tprint}readonly def/dicttype{pop
(-dictionary- )tprint}readonly def/nulltype{pop(-null- )tprint}readonly def
/filetype{pop(-filestream- )tprint}readonly def/savetype{pop(-savelevel- )
tprint}readonly def/fonttype{pop(-fontid- )tprint}readonly def/nametype{dup
xcheck not{(/)tprint}if cvsprint}readonly def/stringtype{dup rcheck{(\()tprint
tprint(\))tprint}{pop(-string- )tprint}ifelse}readonly def/arraytype{dup rcheck
{dup xcheck{({)tprint{typeprint}forall(})tprint}{([)tprint{typeprint}forall(])
tprint}ifelse}{pop(-array- )tprint}ifelse}readonly def/packedarraytype{dup
rcheck{dup xcheck{({)tprint{typeprint}forall(})tprint}{([)tprint{typeprint}
forall(])tprint}ifelse}{pop(-packedarray- )tprint}ifelse}readonly def/courier
/Courier findfont  10  scalefont def end errordict/handleerror{systemdict begin
$error begin $brkpage begin newerror{/newerror false store vmstatus pop pop  0 
ne{grestoreall}if errorname(VMerror)ne{showpage}if initgraphics courier setfont
lmargin  720  moveto errorname(VMerror)eq{userdict/ehsave known{clear userdict
/ehsave get restore  2  vmreclaim}if vmstatus exch pop exch pop PrtVMMsg}{
(ERROR: )prnt errorname prnt nl(OFFENDING COMMAND: )prnt/command load prnt
$error/ostack known{nl nl(STACK:)prnt nl nl $error/ostack get aload length{==}
repeat}if}ifelse systemdict/showpage get exec(%%[ Error: )print errorname
=print(; OffendingCommand: )print/command load =print( ]%%)= flush}if end end
end}dup  0  systemdict put dup  4  $brkpage put bind readonly put/currentpacking
where{pop/setpacking where{pop oldpack setpacking}if}if

И дальше в том же роде...

Но думаю где-то можно скачать виртуальный принтер.

SHOGAL
...
Рейтинг: 0 / 0
17.05.2004, 10:38
    #32519803
Vagon
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как печатать в Битмап ?
2 Шогал

Спасибо за помощь. Кое-что уже нашел в DDK.
...
Рейтинг: 0 / 0
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Как печатать в Битмап ? / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]