Hola estoy realizando un programilla y necesito saber cómo imprimir un listbox directamente por la impresora por defecto.
Lo que hago es lo siguiente:
TPrinter Prntr = Printer();
TRect r = Rect(200,200,Prntr->PageWidth – 200,Prntr->PageHeight – 200);
Prntr->BeginDoc();
Prntr->Canvas->TextRect(r, 200, 200, listbox1->Items->Text);
Prntr->EndDoc();
Pero me imprime todas las líneas del listbox en una sola línea del papel. ¿Qué puedo hacer?
Muchas gracias.
