| Class TTbPrinter (unit TbPrint) |
TComponent
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure Comenzar;
procedure Cuadro(X1,Y1,X2,Y2 : byte; Tipo : TLinea);ESCRIBE UN TEXTO EN LA PAGINA
destructor Destroy;
procedure Escribir(X,Y : byte; Texto:string;Fnt : TFuente);ELIMINA LA INFORMACION DE LAS PAGINAS AL FINALIZAR
procedure EscribirStd(X,Y : byte; Texto:string);ESCRIBE UN TEXTO EN LA PAGINA
procedure Finalizar;PARA COMENZAR UNA NUEVA IMPRESION
function GetModeloName : String;
procedure GetModelos(Modelos : TStrings);
function GetPrintingHeight : integer;
function GetPrintingWidth : integer;
procedure HacerHoja(Numero : integer; Hoja : TMetaFile;ToPrint:boolean);
procedure Imprimir;MUESTRA LA IMPRESION EN PANTALLA
procedure LineaHorizontal(X1,X2,Y : byte; Tipo : TLinea);ESCRIBE UN RECTANGULO
procedure LineaVertical(X,Y1,Y2 : byte; Tipo : TLinea);ESCRIBE UNA LINEA HORIZONTAL
procedure NuevaPagina;IMPRIMIR
procedure SetModeloName(Nombre : String);CREA UNA NUEVA PAGINA
procedure Clear;
function GetModeloRealName(Model : TModelo) : String;
function GetPaginas : byte;
function ImprimirPagina(Numero:integer) : boolean;
function ImprimirPaginaFast(Numero:integer) : boolean;1056;
procedure ImprimirTodo;si hay un error durante la impresion.
procedure PreviewReal;
procedure SetFastPuerto(Puerto : string);
procedure SetModelo(Nombre : TModelo);| Properties |
property Columnas : byte
property CompanyData : string
property Copies : integer
property FastFont : TFuente
property FastPort : string
property FastPrinter : TModelo
property Mode : TPrinterMode
property Paginas : byte
property Preview : boolean
property PrintingHeight : integer
property PrintingWidth : integer
property Title : string
property WinPort : string
property WinPrinter : string
property Zoom : TInitialZoom
property Lineas : byte| Events |
event OnPrinterError : TNotifyEvent| Variables |
PageHeight : integer;
PageHeightP : double;
PageOrientation : TPrinterOrientation;
PageWidth : integer;
PageWidthP : double;
PaginaActual : byte;
ReGenerate : Procedure of object;
SendToExcel : Procedure of object;
FColumnas : byte;
FCopias : integer;
FDatosEmpresa : String;
FFastPuerto : string;
FFuente : TFuente;
FLineas : byte;
FModelo : TModelo;
FModo : TPrinterMode;
fOnPrinterError : TNotifyEvent;
FPreview : boolean;
FTitulo : string;
FWinPort : string;
FWinPrinter : string;
FZoom : TInitialZoom;
LasPaginas : TList;
PreviewForm : TPrintPreview;
PRNBold : string;
PRNCompOFF : string;
PRNCompON : string;
PRNItalics : string;
PRNNormal : string;
PRNReset : string;
PRNSetup : string;
PRNULineOFF : string;
PRNULineON : string;| Constructors |
constructor Create(AOwner: TComponent);IMPRESORA
| Functions |
procedure Comenzar;
procedure Cuadro(X1,Y1,X2,Y2 : byte; Tipo : TLinea);ESCRIBE UN TEXTO EN LA PAGINA
ESCRIBE UN TEXTO EN LA PAGINA
destructor Destroy;WinPrinter := Printer.Printers[Printer.PrinterIndex];
procedure Escribir(X,Y : byte; Texto:string;Fnt : TFuente);ESCRIBE UN TEXTO EN LA PAGINA
ELIMINA LA INFORMACION DE LAS PAGINAS AL FINALIZAR
procedure EscribirStd(X,Y : byte; Texto:string);ELIMINA LA INFORMACION DE LAS PAGINAS AL FINALIZAR
ESCRIBE UN TEXTO EN LA PAGINA
procedure Finalizar;PARA COMENZAR UNA NUEVA IMPRESION
PARA COMENZAR UNA NUEVA IMPRESION
function GetModeloName : String;
procedure GetModelos(Modelos : TStrings);
function GetPrintingHeight : integer;
function GetPrintingWidth : integer;Brush.Color := clWhite;
procedure HacerHoja(Numero : integer; Hoja : TMetaFile;ToPrint:boolean);
procedure Imprimir;ESCRIBE UNA LINEA VERTICAL
MUESTRA LA IMPRESION EN PANTALLA
procedure LineaHorizontal(X1,X2,Y : byte; Tipo : TLinea);ESCRIBE UN RECTANGULO
ESCRIBE UN RECTANGULO
procedure LineaVertical(X,Y1,Y2 : byte; Tipo : TLinea);ESCRIBE UNA LINEA HORIZONTAL
ESCRIBE UNA LINEA HORIZONTAL
procedure NuevaPagina;MANDA LA IMPRESION A LA IMPRESORA
IMPRIMIR
procedure SetModeloName(Nombre : String);CREA UNA NUEVA PAGINA
CREA UNA NUEVA PAGINA
procedure Clear;
function GetModeloRealName(Model : TModelo) : String;
function GetPaginas : byte;
function ImprimirPagina(Numero:integer) : boolean;MUESTRA LA IMPRESION EN PANTALLA
function ImprimirPaginaFast(Numero:integer) : boolean;MANDA UNA PAGINA A LA IMPRESORA
1056;
procedure ImprimirTodo;MANDA UNA PAGINA A LA IMPRESORA
si hay un error durante la impresion...
procedure PreviewReal;ESCRIBE UNA LINEA VERTICAL
procedure SetFastPuerto(Puerto : string);Epson_FX :
procedure SetModelo(Nombre : TModelo);| Properties |
property Columnas : byteMODO DE IMPRESION
property CompanyData : string
property Copies : integer
property FastFont : TFuenteCANTIDAD DE PAGINAS
property FastPort : stringMODELO DE LA IMPRESORA
property FastPrinter : TModeloPublished declarations
property Mode : TPrinterModePUERTO DE LA IMPRESORA
property Paginas : byteCANTIDAD DE COLUMNAS EN LA PAGINA
property Preview : boolean
property PrintingHeight : integer
property PrintingWidth : integer
property Title : string
property WinPort : string
property WinPrinter : string
property Zoom : TInitialZoomSE IMPRIME EN TODOS LOS REPORTES
property Lineas : byte| Events |
event OnPrinterError : TNotifyEvent| Variables |
PageHeight : integer;ANCHO DE PAGINA EN PIXELS
PageHeightP : double;ANCHO DE PAGINA EN PULGADAS
PageOrientation : TPrinterOrientation;ALTO DE PAGINA EN PULGADAS
PageWidth : integer;PAGINA ACTUAL
PageWidthP : double;ALTO DE PAGINA EN PIXELS
PaginaActual : byte;Public declarations
ReGenerate : Procedure of object;ORIENTACION DE LA PAGINA
SendToExcel : Procedure of object;
FColumnas : byte;CANTIDAD DE LINEAS POR PAGINA
FCopias : integer;Almacenamiento de las páginas
FDatosEmpresa : String;
FFastPuerto : string;MODELO DE IMPRESORA
FFuente : TFuente;CANTIDAD DE COLUMNAS EN LA PAGINA
FLineas : byte;PUERTO DE LA IMPRESORA
FModelo : TModelo;INFORMACION QUE SE IMPRIME EN TODOS LOS REPORTES
FModo : TPrinterMode;TIPO DE LETRA
fOnPrinterError : TNotifyEvent;Private declarations
FPreview : boolean;
FTitulo : string;
FWinPort : string;NOMBRE DE LA IMPRESORA EN WINDOWS
FWinPrinter : string;
FZoom : TInitialZoom;
LasPaginas : TList;MODO DE IMPRESION (NORMAL/MEJORADO
PreviewForm : TPrintPreview;
PRNBold : string;
PRNCompOFF : string;
PRNCompON : string;
PRNItalics : string;
PRNNormal : string;
PRNReset : string;
PRNSetup : string;
PRNULineOFF : string;
PRNULineON : string;