como puedo imprimir con el objeto printdialog

[DARK_WARRIOR]

estoy asiendo un pequeño editor de texto con el objeto memo en delphi 7 y no encuentro en ningun lugar como puedo mandar a imprimir con el objeto printdialog alguien me podria ayudar espero que aki me puedan ayudar ya que mi maestro de programacion no me supo responder espero su pronta respuesta dando las grasias por antisipado mi correo es dark_warrior_plc@hotmail.com

[Neftali [Germán.Estévez]]

Empezado por DARK_WARRIOR

...ya que mi maestro de programacion no me supo responder

Creo que deberías buscarte otro maestro...

El componente TPrintDialog no sirve para imprimir.
Éste componente (de forma similar al resto de componentes de diálogos) sólo sirven para obtener opciones respecto a la operación que vas a realizar; En éste caso el PrintDialog te dará opciones de impresión (número de copias, página inicial,...); El OpenDialog te dará las opciones para abrir un fichero (nombre del fichero, directorio,...) y después de obtener los datos del diálogo es cuando tú debes realizar la operación utilizando esas opciones.

Para imprimir un memo, hay un método bastante simple (1 sóla línea) que es utilizando un Richedit con la propiedad PlainText=True; Si haces el cambio del memo por el RichEdit, podrás utilizar el método Print de RichEdit. Aunque yo sigo "apostando" por la opción de RichEdit.

Otra opción sería dejar el Memo y en el momento de imprimir asignarlo a un RichEdit e imprimirlo y por último enviar directamente a la impresora.

NOTA: Para próximas veces te recomiendo que hagas una búsqueda en los foros. Por ejemplo aquí puedes un ejemplo de cómo imprimir un memo con TPrinter;

[DARK_WARRIOR]

Empezado por Neftali

Creo que deberías buscarte otro maestro...

El componente TPrintDialog no sirve para imprimir.
Éste componente (de forma similar al resto de componentes de diálogos) sólo sirven para obtener opciones respecto a la operación que vas a realizar; En éste caso el PrintDialog te dará opciones de impresión (número de copias, página inicial,...); El OpenDialog te dará las opciones para abrir un fichero (nombre del fichero, directorio,...) y después de obtener los datos del diálogo es cuando tú debes realizar la operación utilizando esas opciones.

Disculpa creo que no me supe esplicar lo que yo quise preguntar es como utiliso el printdialog para que me de esas opciones de impresion de nuevo agradesco sus respuestas antisipadamente grasias mi correo es dark_warrior_plc@hotmail.com

[Neftali [Germán.Estévez]]

Haz una búsqueda en los foros por TPrintDialogs y encontrarás no pocos resultados.

Por ejemplo:

Código Delphi [-]
if (PrinterDialog.execute) then begin
  RvRenderPrinter1.FirstPage := PrinterDialog.FromPage;
  RvRenderPrinter1.LastPage := PrinterDialog.ToPage;
  RvRenderPrinter1.Render(NDRStream);
end;

[DARK_WARRIOR]

Empezado por Neftali

Haz una búsqueda en los foros por TPrintDialogs y encontrarás no pocos resultados.

Por ejemplo:

Código Delphi [-]
if (PrinterDialog.execute) then begin
RvRenderPrinter1.FirstPage := PrinterDialog.FromPage;
RvRenderPrinter1.LastPage := PrinterDialog.ToPage;
RvRenderPrinter1.Render(NDRStream);
end;

este codigo me dise que tienes un error en
if (PrinterDialog.execute) then begin
el error que me marcas es
[Error] Unit1.pas(33): Undeclared identifier: 'PrinterDialog'
tengo que declararlo como variavle o que? y que tipo?
espero su pronta respuesta grasias

alguien me podria ayudar

[dec]

Hola,

El "PrinterDialog" que puso Neftalí es, por supuesto, el nombre del componente al que te refieres, previamente añadido en el formulario. Por supuesto podrías declarar tú una variable en "algún sitio" del tipo "TPrinterDialog". En todo caso, si añadiste un componente "PrinterDialog" en tu formulario este tendrá el identificador "PrinterDialog1". Pues bien, sustituye un nombre por otro. Y recuerda que no se trata de copiar y pegar código fuente sin más... si no entiendes para qué sirve... de poco servirá y no se tratará de que "no funcione" o de errores, sino de que en algún sitio se está haciendo algo demás o de menos o no como se debe, en todo caso.