Imprimiendo labels y facturas

[principiante22]

Saludos a todos, Estoy creando un programito y estoy teniendo problemas a la hora de imprimir labels y facturas de esas pequeñas, de las que te dan en los supermercados , y ahora tengo entendido de que no puedo imprimirlo con un reporte normal de rave.

Qué debo de hacer para poder imprimir? O qué componente debo de usar? Como lo hacen ustedes? Me pueden dirigir por el camino del cual necesito investigar para lograr imprimir?

Muchas gracias de antemano a cualquiera que me pueda ayudar, y a los que no, gracias por leerlo por lo menos .

[droguerman]

Yo he creado programas para etiqueteras usando fastreports y me ha ido bastante bien

[principiante22]

Gracias droguerman, pero quisiera saber si alguien por hay sabe hacerlo por rave, es que ya tengo muchos reportes creados y no quiero volver a hacerlos

[JuanchoArg]

Podrias usar el objeto printer para hacerlo, porque si lo que keres imprimir es un tipo de ticket, esos generalmente no necesitan mucha estetica. Yo hice eso para unas comanderas Epson imprimiendo comprobantes de pago. Saludos

[principiante22]

Gracias JuanchoArg, pero, Como uso el objeto printer para mi fin?? y donde se encuentra ese objeto, o sea, en que pestaña??

[rgstuamigo]

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...

[rgstuamigo]

Tambien si quisieras imprimir tu formulario completo asi tal como se ve, podrias hacer lo siguiente:

Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
begin
 Print;
end;

si quisieras ocultar algun componente que no quieras que se imprima, podrias hacer el siguiente truquito:

Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
begin
  Button1.Visible:=False;
  Button2.Visible:=False;
  Print;//aqui imprime todos los componentes que estan visibles.
  Button1.Visible:=True;
  Button2.Visible:=True;
end;