• Sábado 28 de Septiembre de 2024, 23:52

Autor Tema:  Como Imprimir???  (Leído 1564 veces)

scarlet

  • Miembro activo
  • **
  • Mensajes: 28
    • Ver Perfil
Como Imprimir???
« en: Miércoles 26 de Mayo de 2004, 18:01 »
0
hola, necesito imprimir solamente el contenido de un memo..
como hacerlo????
acepto sujerencias...
saludos.... ;)
[code]cout<<"La verdadera razon del programador esta en tener interrogantes"<<endl;

The Black Boy

  • Miembro de PLATA
  • *****
  • Mensajes: 1043
  • Nacionalidad: co
    • Ver Perfil
    • http://www.mslatam.com/latam/technet/mva2/Microsite.aspx?alias=JairoDiaz
Re: Como Imprimir???
« Respuesta #1 en: Miércoles 26 de Mayo de 2004, 18:08 »
0
Te refieres a Mandarlo a una impresora??
El inteligente no es aquel que lo sabe todo
sino aquel que   sabe utilizar lo poco que sabe.


Espacio Personal

si necesitas algo de programacion click aqui, si no esta aqui no existe

Programacion]

scarlet

  • Miembro activo
  • **
  • Mensajes: 28
    • Ver Perfil
Re: Como Imprimir???
« Respuesta #2 en: Viernes 28 de Mayo de 2004, 09:43 »
0
si, me refiero a mandarlo a la impresora..
un saludo...
[code]cout<<"La verdadera razon del programador esta en tener interrogantes"<<endl;

_Viktor

  • Miembro MUY activo
  • ***
  • Mensajes: 271
    • Ver Perfil
    • http://AyudaCBuilder.foros.st
Re: Como Imprimir???
« Respuesta #3 en: Viernes 28 de Mayo de 2004, 21:13 »
0
Incluye los siguientes archivos

Código: Text
  1. #include &#60; printers.hpp &#62;
  2. #include &#60; math.h &#62;
  3.  

Pon un componente TPrintDialog, un TMemo y un boton:

Código: Text
  1. void __fastcall TForm1::Button1Click(TObject *Sender)
  2. {
  3. if (PrintDialog1-&#62;Execute()) {
  4.  
  5. Printer()-&#62;Canvas-&#62;Font = Memo1-&#62;Font; //Asignamos la fuente de impresion
  6. int lineHeight = abs(MulDiv(Printer()-&#62;Canvas-&#62;Font-&#62;Size,
  7. GetDeviceCaps(Printer()-&#62;Handle, LOGPIXELSY), 72)); // determinamos altura de la linea
  8. lineHeight *= 1.4;
  9. int linesPerPage = (Printer()-&#62;PageHeight/lineHeight) - 2;
  10. int lineCount = 2; // iniciamos la impresion en la linea 2 para dejar margen (en vez de la 0)
  11.  
  12. Printer()-&#62;BeginDoc();
  13. for (int i=0;i &#60; Memo1-&#62;Lines-&#62;Count;i++) {
  14. if (lineCount++ == linesPerPage) {
  15. lineCount = 2;
  16. Printer()-&#62;NewPage();
  17. }
  18. String s = Memo1-&#62;Lines-&#62;Strings[i];
  19. Printer()-&#62;Canvas-&#62;TextOut(0, lineCount * lineHeight, s);
  20. }
  21. Printer()-&#62;EndDoc();
  22. }
  23. }
  24.  


Haber si te sirve...
Saludos!
_Viktor _Yañez_
"Ser inteligente no es ser mas, solo equivocarse menos y no usar visual basic"

http]