Ver Mensaje Individual
  #2  
Antiguo 07-10-2004
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 19.435
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Cita:
Empezado por jdangosto
...También lo he intentado con el PrintDialog implementando el siguiente código...
printdialog1.Execute;
printdialog1.Assign(dbgrid1.SelectedField);
....
PrintDialog tiene que ver con impresión y SelectedField tiene que ver con la columna seleccionada, pero ésto que has hecho es como:
"...Para freir un huevo se necesita una sarten y un huevo;... sarten, huevo, sarten, huevo,... Pongo la sarten en el suelo, pongo el huevo al lado y a ver si se frie.... MORALEJA: Tienes el huevo y la sartén, pero no se frie sólo, o lo que es lo mismo, tienes PrintDialog y SelectedField, pero no se va a imprimir sólo...."

Cita:
Empezado por jdangosto
...estoy intentado imprimir las columnas seleccionadas de un dbgrid....
¿Qué tipo de Generador de Reports estás utilizando?
¿Quieres exportarlo?
¿Cómo has creado el report? ¿Un report diferente para cada columna?

Lo que haría yo sería lo siguiente:

(1) Montar una consulta nueva (TQuery) utilizando la misma tabla que tienes en el Grid, pero sólo con una columna; La columna te la dará SelectedField; Algio así:

Código Delphi [-]
Str := SELECT ' + DBGridRAL1.SelectedField.FieldName + ' FROM Tabla

Ésto te dará una consulta sobre la tabla, pero sólo con el campo seleccionado; Ésto es lo que debes utilizar para generar el listado con el generador que estés utilizando.
Tal vez no uses ningun Generador de Reports, ahora se me ocurre que en ese caso puedes grabar la salida a un fichero y luego mandarlo a imprimir; Recorre la consulta anterior, vuelca el resultado a un TStrings, luego lo grabas a disco con SaveToFile y luego lo imprimes (con ShellExecute, por ejemplo).


Pero es que sin más información... ...difícil...
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.

Última edición por Neftali [Germán.Estévez] fecha: 07-10-2004 a las 12:21:13. Razón: correción de TAGs
Responder Con Cita