[Lazarus-es] impresion en red

José Mejuto joshyfun en gmail.com
Jue Ago 29 17:04:43 CEST 2013


El 29/08/2013 16:20, Maxi escribió:

>    if PPRINTER_INFO_4(InfoPrt)^.Attributes = PRINTER_ATTRIBUTE_NETWORK then

Hola,

Esta linea está mal o eso creo, debería de ser:

if (PPRINTER_INFO_4(InfoPrt)^.Attributes and PRINTER_ATTRIBUTE_NETWORK) 
= PRINTER_ATTRIBUTE_NETWORK then

> Otra cosa rara es que el debug entra a otra unidad y no a la printers.
> que este es el codigo Alguien me explique porfavor
>
> //Return the type of selected printer
> function TPrinter.GetPrinterType: TPrinterType;
> begin
>    Result:=ptLocal;
> end;
>

El otro es de "WinPrinters" y este debe de ser el genérico, o sea, para 
las que no son WinPrinters, vamos el inherited de la clase.

-- 





More information about the Lazarus-es mailing list