Seleccionar Bandeja en Fastreport

[Galahad]

buenas,
estoy intentando seleccionar diferentes bandejas de impresión con fastreport
el tema es que en su dia lo probé en una impresora determinada y funcionaba , no creo que dependa de la impresora, las constantes (dmbin_auto,dmbin_manual) etc, son códigos creo que universales,
, si alguien puede ayudarme, se lo agradeceria...
ejecuto este código:

with TfrxReportPage(fr.Pages[0]) do
begin
Bin := bandejafr; // DMBIN_AUTO;
BinOtherPages := bandejafr; // DMBIN_AUTO;
end;

function Bandejafr: Integer;
begin
result:=DMBIN_AUTO;
case CBBandejas.ItemIndex of
0: result:=DMBIN_AUTO;
1: result:=DMBIN_UPPER;
2: result:=DMBIN_MIDDLE;
3: result:=DMBIN_LOWER;
4: result:=DMBIN_TRACTOR;
5: result:=DMBIN_MANUAL;
6: result:=DMBIN_ENVELOPE;
7: result:=DMBIN_ENVMANUAL;
8: result:=DMBIN_SMALLFMT;
9: result:=DMBIN_LARGEFMT;
10: result:=DMBIN_LARGECAPACITY;
11: result:=DMBIN_CASSETTE;
12: result:=DMBIN_FIRST;
13: result:=DMBIN_LAST;
end;
end;

saludos....

[[newtron]]

Hola.

Siento no poder ayudarte porque no uso fastreport pero una cosa que podrías hacer si no encuentras la solución es crear dos impresoras en el windows, una con una bandeja y otra con la otra para desviar la impresión a una u otra según te interese.

Saludos

[Galahad]

Empezado por newtron

Hola.

Siento no poder ayudarte porque no uso fastreport pero una cosa que podrías hacer si no encuentras la solución es crear dos impresoras en el windows, una con una bandeja y otra con la otra para desviar la impresión a una u otra según te interese.

Saludos

Gracias por contestar,,
al final lo pude solucionar,, pongo aquí el código por si a alguien le puede servir:

frxPrinters.PrinterIndex := frxPrinters.IndexOf(fr.PrintOptions.Printer);
TfrxReportPage(frxReport1.Pages[1]).Bin := Fconfig_impresora.bandejafr;
TfrxReportPage(frxReport1.Pages[1]).BinOtherPages :=
TfrxReportPage(frxReport1.Pages[1]).Bin;

la función bandejafr esta reflejada en un post anterior.

saludos...