| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
принтер [D5, D6, Win2k]
selena © (2004-01-09 12:42:00)Здраствуйте
Как при печати из richedit через PRINTER сделать черновую распечатку, т.е в один проход каретки ,а не в два?
REP (2004-01-09 13:32:00) [1]А в принципе не важно, если печать идет через винду, все равно надо через TDeviceMode.
Получи указатель на структуру TDeviceMode:
Var
Dev,Dr,Port:Array [0..255] of Char;
H:THandle;
DM:PDeviceMode;
Begin
Printer.GetPrinter(Dev,Dr,Port,H);
If H<>0 Then begin
DM:=GlobalLock(H);
end;
А теперь устанавливаем черновое качество:
With DM^ do begin
dmField:=dmField or DM_PRINTQUALITY;
dmPRINTQUALITY:= DMRES_DRAFT; - это черновая печать
end ;
Не забудь освободить H
end;
Пример накалякал прямо тут, возможно он не работает, но пробуй...
selena (2004-01-09 13:14:00) [2]да на матричном
REP (2004-01-09 13:12:00) [3]На матричном принтере что-ли?
| |
