|
|
|
|
Распечатывает изображение на указанном принтере.
Синтаксис
| Image.Print(
| | Printer, | | X, | | Y, | | Scale, | | Mode
| | );
|
| Параметры
|
| Параметр
| Тип
| Описание
|
| Printer
| TPrinter
| дескриптор принтера
|
| X
| Number
| отступ изображения от левого края страницы, мм
|
| Y
| Number
| отступ изображения от верхнего края страницы, мм
|
| Scale
| Number
| масштабный коэффициент, необязательный параметр
|
| Mode
| Enum
| режим масштабирования, необязательный параметр (см. ниже)
|
|
| Параметр Mode
|
| Значение
| Описание
|
| STRETCH_ANDSCANS
| при масштабировании изображения выполняется операция AND, использующая цвета ликвидируемых и существующих пикселей; если изображение является одноцветным, этот режим сохраняет черные пиксели за счет белых
|
| STRETCH_ORSCANS
| при масштабировании изображения выполняется операция OR, использущая цвета ликвидируемых и существующих пикселей; если изображение является одноцветным, этот режим сохраняет белые пиксели за счет черных
|
| STRETCH_DELETESCANS
| при масштабировании изображения удаляются все лишние пиксели без какой-либо попытки использовать их информацию
|
| STRETCH_HALFTONE
| режим по умолчанию: при масштабировании изображения пиксели исходного прямоугольника преобразуются в блоки пикселей в целевом прямоугольнике; среднее значение цвета всего целевого блока пикселей подбирается близким по значению к цвету исходных пикселей
|
|
var no_Printers=false;
// Главная форма
frm=new TForm();
frm.Caption="JS+ - метод компонента TImage Print";
frm.Width =700;
frm.Height=525;
// Строка состояния
stb=new TStatusBar(frm);
stb.SimpleText=' Нажмите кнопку "Печать"';
// Принтер
prn=Printer();
// Список доступных принтеров
cmb=new TComboBox(frm);
cmb.Style=csDropDownList;
cmb.Left=cmb.Top=10;
cmb.Items=prn.Printers;
if (cmb.Items.Count==0) {
cmb.Items.Add("Нет доступных принтеров");
stb.SimpleText=" "+cmb.Items[cmb.ItemIndex=0];
no_Printers=true;
}
else
cmb.ItemIndex=prn.PrinterIndex;
// Кнопка
btn=new TButton(frm);
btn.Caption="Печать";
btn.Top=stb.Top-btn.Height-10;
btn.OnClick=btn_Click;
if (no_Printers==true)
btn.Enabled=false;
// Панель
pnl=new TPanel(frm);
pnl.BorderStyle=bsSingle;
pnl.Left=cmb.Left;
pnl.Top =cmb.Top+cmb.Height+10;
pnl.Width =frm.ClientWidth-pnl.Left*2;
pnl.Height=btn.Top-pnl.Top-10;
// Изображение
img=new TImage(pnl);
img.Align=alClient;
img.LoadFromFile(img_fName=JSPlus.HelpDir+"IMAGE\\TImage\\Image.jpg");
img.Align=alNone;
pnl.ClientWidth =img.Width;
pnl.ClientHeight=img.Height;
frm.ClientWidth=pnl.Width+pnl.Left*2;
cmb.Width=frm.ClientWidth-cmb.Left*2;
btn.Left=cmb.Left+cmb.Width-btn.Width;
frm.ShowModal();
// Обработчик события OnClick
function btn_Click(btn)
{
prn.PrinterIndex=cmb.ItemIndex;
prn.BeginDoc();
img.Print(prn,10,10);
prn.EndDoc();
}
|
| JS+ | Руководство пользователя
|
|
|
| |
|
|
