Ver Mensaje Individual
  #6  
Antiguo 12-11-2008
Avatar de rgstuamigo
rgstuamigo rgstuamigo is offline
Miembro
 
Registrado: jul 2008
Ubicación: Santa Cruz de la Sierra-Bolivia
Posts: 1.646
Reputación: 17
rgstuamigo Va por buen camino
Printer es un objeto no un componente que esta en la paleta....
puedes usarlo asi:

Código Delphi [-]
uses  Printers,......
.
.
.
.
procedure TForm1.Button1Click(Sender: TObject);
begin
if PrintDialog1.Execute then
  begin
    Printer.BeginDoc;//inicia la impresion
     Printer.Title:='MiFactura';//asigna el titulo de la impresion
     Printer.Canvas.TextOut(0,0,'Mi texto para imprimir1');//escribe ese texto en la posicion(0,0)del canvas del Printer 
     Printer.Canvas.TextOut(0,50,'Mi texto para imprimir2');//escribe ese texto en la posicion(0,50)del canvas del Printer
    Printer.EndDoc;//finaliza la impresion
  end;
end;
Saludos...
__________________
"Pedid, y se os dará; buscad, y hallaréis; llamad, y se os abrirá." Mt.7:7

Última edición por rgstuamigo fecha: 12-11-2008 a las 21:16:42.
Responder Con Cita