ampliar visíon del ancho del TQRPreview

[HombreSigma]

Hola foro:

Hago una vista preliminar de un informe usando del TQRPreview.

El problema es que no logro ver un reporte ancho totalmente. Que propiedad cambio para lograr esto.

Gracias de antemano

[__cadetill]

te refieres a que defines un report (en diseño) en A3 y lo visualizas (en ejecución) en A4 por ejemplo? si es así es que la impresira que tienes seleccionada por defecto no admite papel A3

Solución: create un archivo INI donde guardar la impresora de A3 y, antes de lanzar el listado, asigna esta impresora


// ejemplo de llamada
Report.PrinterSettings.PrinterIndex := GetImpresora('A3');

// función
function TBaseLlistatL.GetImpresora(Impresora: string) : integer;
var
Ini : TIniFile;
Imp : string;
i : integer;
begin
if FileExists(PrintersIni) then
begin
Ini := TIniFile.Create(PrintersIni);
Imp := Ini.ReadString('IMPRESORAS', Impresora, '');
Ini.Free;
end;

if Imp = '' then
Result := -1
else
begin
for i := 0 to Printer.Printers.Count - 1 do
if Pos(Imp, Printer.Printers[i]) <> 0 then Break;
Result := i;
end;
end;


Espero te sirva

[HombreSigma]

Creo que me explique mal.

Antes de imprimir uso el componente TQRPreview para ver una vista preliminar del reporte antes de mandarlo a imprimir.

El informe imprime bien en papel y al ancho que necesito. Lo que ocurre es que al desplegar la vista preliminar, por pantalla, no me muestra todos los campos del informe en particular los que están más a la derecha del mismo.

Mi pregunta es como hacer para ver estos campos en la vista preliminar que da el TQRPreview de QuickReport que se utiliza para este propósito, pues solo me da hasta determinado ancho?