Acabo de hacer una pequeña modificación a la clase TPreview...
Lo que modifiqué fue el tema de los factores... la clase tiene la posibilidad de cambiar los factores de vista entre los valores de 1 a 10.
Funciona correctamente, pero lo que yo modifiqué es la relación en la que se modifican las vistas, había demasiada diferencia entre cada uno de los factores, siendo en _ engorroso para el usuario, y en la mayoría de _, (por lo menos en mi caso), los factores 5 a 9 pocas veces eran utilizados, ya que el tamaño del reporte era realmente inmeso.
Reporte original con Factor 1:
Reporte original con factor 2:
La modificación que le hice a la clase es la siguiente: (Solo partes modificadas)
Code: Select all
METHOD BuildWindow() CLASS TPreview
@ 3, 325 COMBOBOX ::oFactor VAR ::nZFactor ;
ITEMS {"100 %","110 %","120 %","130 %","140 %","150 %","160 %","170 %","180 %","190 %","200 %"} ;
OF ::oBar FONT ::oFont PIXEL SIZE 65,200 ;
ON CHANGE oThis:SetFactor( oThis:nZFactor )
Code: Select all
METHOD SetFactor( nValue ) CLASS TPreview
//::oMeta1:SetZoomFactor( ::nZFactor, ::nZFactor * 2 ) Esta es la línea que estaba antes
// Yo aguegué así, escribí los 11 Factores ya que no son tantos...
DO CASE
CASE ::nZFactor = 1
::oMeta1:SetZoomFactor( ::nZFactor, ::nZFactor * 2 )
CASE ::nZFactor = 2
::oMeta1:SetZoomFactor( 2 * 0.55 , 2 * 1.10 )
CASE ::nZFactor = 3
::oMeta1:SetZoomFactor( 2 * 0.60 , 2 * 1.20 )
CASE ::nZFactor = 4
::oMeta1:SetZoomFactor( 2 * 0.65 , 2 * 1.30 )
CASE ::nZFactor = 5
::oMeta1:SetZoomFactor( 2 * 0.70 , 2 * 1.40 )
CASE ::nZFactor = 6
::oMeta1:SetZoomFactor( 2 * 0.75 , 2 * 1.50 )
CASE ::nZFactor = 7
::oMeta1:SetZoomFactor( 2 * 0.80 , 2 * 1.60 )
CASE ::nZFactor = 8
::oMeta1:SetZoomFactor( 2 * 0.85 , 2 * 1.70 )
CASE ::nZFactor = 9
::oMeta1:SetZoomFactor( 2 * 0.90 , 2 * 1.80 )
CASE ::nZFactor = 10
::oMeta1:SetZoomFactor( 2 * 0.95 , 2 * 1.90 )
CASE ::nZFactor = 11
::oMeta1:SetZoomFactor( 2 * 1.00 , 2 * 2.00 )
ENDCASE
Reporte original Factor 100 %
Reporte original Factor 110 %
Espero sea de utilidad esta modificación.
Saludos.