Inherits from
T_TcpIp
@\\\0000000111*) (*@/// T_lpr = class(T_TcpIp) // RFC 1179
constructor Create(Aowner:TComponent);
- @\\\0000000401*) (*@\\\0000000201*) (*@/// class T_lpr(t_tcpip) *) (*@/// constructor t_lpr.
procedure action;
@\\\0000000501*) (*@/// procedure t_lpr.
procedure GetQueueStatus(detailed:boolean);
@\\\0000001001*) (*@/// procedure t_lpr.
procedure SendPrintData;
@\\\0000000501*) (*@/// procedure t_lpr.
procedure open_socket_out(var socket:TSocket; Socket_number:smallint;ip_address:longint);
@\\\000000060E*) (*@/// procedure t_lpr.
procedure response;
@\\\0000001503*) (*@/// procedure t_lpr.
property CopyCount : integer
property Hostname : string
property JobName : string
property MailTo : string
property PrintBanner : boolean
property PrintQueue : string
property PrintTitle : string
property PrintType : t_lpr_types
property User : string
property stream : TStream
f_banner : boolean;
f_count : integer;
f_jobname : string;
f_printtype : t_lpr_types;
f_queue : string;
f_title : string;
f_user : string;
f_user_mail : string;
constructor Create(Aowner:TComponent);
@\\\0000000401*) (*@\\\0000000201*) (*@/// class T_lpr(t_tcpip) *) (*@/// constructor t_lpr.Create(Aowner:TComponent);
procedure action;
@\\\0000000501*) (*@/// procedure t_lpr.action;
procedure GetQueueStatus(detailed:boolean);
@\\\0000001001*) (*@/// procedure t_lpr.GetQueueStatus(detailed:boolean);
procedure SendPrintData;
@\\\0000000501*) (*@/// procedure t_lpr.SendPrintData;
procedure open_socket_out(var socket:TSocket; Socket_number:smallint;ip_address:longint);
@\\\000000060E*) (*@/// procedure t_lpr.open_socket_out(var socket:TSocket; Socket_number:smallint;ip_address:longint);
procedure response;
@\\\0000001503*) (*@/// procedure t_lpr.response;
property CopyCount : integer
property Hostname : string
property JobName : string
property MailTo : string
property PrintBanner : boolean
property PrintQueue : string
property PrintTitle : string
property PrintType : t_lpr_types
property User : string
property stream : TStream
f_banner : boolean;
f_count : integer;
f_jobname : string;
f_printtype : t_lpr_types;
f_queue : string;
f_title : string;
f_user : string;
f_user_mail : string;