Estoy intentando modificar un proyecto que hace uso de componentes TDataSetPageProducery TDataSetTableProducer que se pueden localizar en la pestaña Internet de Delphi... Trabajo con la versión 2007
Básicamente mis preguntas son:
1. Alguien ha usado estos componentes ?
2. Cuando deseo mostrar datos que no son detalle, se utiliza el componente PageProducer mencionado antes, el cual es ligado a un formato previamente diseñado con html y con su propiedad ReplaceText permite colocar datos en los tags indicados. Cuando se desea mostrar un dato que si es detalle (numero y detalle de facturas contenidas en otro documento, por ejemplo) se hace uso del TableProducer y en el evento OnFormatCell se va "dibujando" la tabla y sus datos, pero lo que no sé es como pedirle que tome cierto formato en especial para que sea uniforme con el resto de la página generada.
Les dejo una sección del código del evento OnFormatCell para que quede un poco más claro... espero :$
delphi
procedure TConsHTML.DSTP_difRectFormatCell(Sender: TObject; CellRow, CellColumn: Integer; var BgColor: THTMLBgColor; var Align: THTMLAlign; var VAlign: THTMLVAlign; var CustomAttrs, CellData: String); var estilo : string; begin if CellRow mod 2 = 0 then estilo := '_gris' else estilo := ''; if CellRow = 0 then begin case CellColumn of 0: CustomAttrs := 'colspan="3" class="titulo">Diferencias de Contribuciones</td>' + '</tr><tr><td width=50%'; 1: CustomAttrs := 'width=30%'; end; CustomAttrs := customattrs + ' class=subtitulo'; end else begin case CellColumn of 0: CustomAttrs := 'class=datos_jus' + estilo; 1: CustomAttrs := 'class=datos_cen' + estilo; 2: CustomAttrs := 'class=datos_der' + estilo; end; end; if celldata = '' then CellData := ' ' end;
Saludox y gracias a todos !