| Ver tema anterior :: Ver tema siguiente |
| Autor |
Mensaje |
amas2 Lt

Registrado: 01 Jun 2004Mensajes: 91
|
Publicado: Mar 22 Jun, 2004 12:43 pm Asunto: QuickReport BandDetail |
|
|
Estoy urgando en el codigo de Leo y tengo un problemilla, creo que es por culpa de la banda detalle que pone un margen inferior siempre por defecto y no puedo eliminar.Creando mi reporteador en tiempo de ejecución, pongo sobre la pantalla, en la parte inferior tocando el limite(105MM) un label pero al imprimir este no aparece y en la previsualización resulta que aparece un margen inferior.
| Código: | static TQuickRep* qr = 0;
if (qr)
delete qr;
qr = new TQuickRep(this);
// Unidades en milimetros
qr->Units = MM;
qr->Page->PaperSize =Custom;
qr->Page->Orientation = poPortrait;
qr->Page->LeftMargin = 0;
qr->Page->RightMargin = 0;
qr->Page->TopMargin = 0;
qr->Page->BottomMargin = 0;
qr->Page->Length = 105;
qr->Page->Width = 85;
TQRBand* bandDetail = qr->CreateBand(rbDetail);
bandDetail->AlignToBottom = true;
bandDetail->Size->Height = 105;
bandDetail->Size->Width = 85;
Canvas->Font->Assign(bandDetail->Font);
int charWidth = Canvas->TextWidth("x");
int charHeight = Canvas->TextHeight("Xg");
Canvas->Font->Assign(Font);
// Añade el texto
TQRLabel *QRLabel;
int pos = 0;
for (int i=0; i<ListBox1->Items->Count; i++)
{
if (ListBox1->Items->Strings[i] == "<COMPONENT>")
{
QRLabel = new TQRLabel(bandDetail);
QRLabel->Parent = bandDetail;
QRLabel->AutoSize = false;
QRLabel->Transparent = true;
QRLabel->Font->Name = ListBox1->Items->Strings[i+2];
QRLabel->Font->Size = ListBox1->Items->Strings[i+3].ToInt();
QRLabel->Caption = "*0100370*";
QRLabel->Width = QRLabel->Caption.Length() * charWidth;
QRLabel->Size->Left = ListBox1->Items->Strings[i+4].ToInt();
QRLabel->Size->Top = ListBox1->Items->Strings[i+5].ToInt();
pos=pos+20;
}
}
// Mostramos el report
qr->Preview(); |
Es possible que sea eso? que la banda detalle tenga un margen inferior? |
|
| Volver arriba |
|
 |
amas2 Lt

Registrado: 01 Jun 2004Mensajes: 91
|
Publicado: Mar 22 Jun, 2004 2:35 pm Asunto: PUEDE SER??? |
|
|
ya no entindo nada, creo un TquickReport de dimensiones 85x105 y en tiempo de ejecución pongo dentro de su DetailBand
| Código: | TQRLabel *QRLabel;
QRLabel = new TQRLabel(DetailBand1);
QRLabel->Parent = DetailBand1;
QRLabel->AutoSize = true;
QRLabel->Transparent = true;
QRLabel->Font->Name = "PF Barcode 39";
QRLabel->Font->Size = 12;
QRLabel->Caption = "*0100370*";
QRLabel->Size->Left = 0;
QRLabel->Size->Top = 100; |
Mando a imprimir y Nada!!! NADA!!!! no imprime tan cerca del limite????
Si alguien me puede ayudar, ya no se que más provar!!! puede ser que no consiga imprimir cerca de los limites del tamaño de la Banda Detalle. Pense que podia ser el tamño de la letra pero la distancia siempre es la misma de unos 13mm del final.
Gracias |
|
| Volver arriba |
|
 |
amas2 Lt

Registrado: 01 Jun 2004Mensajes: 91
|
Publicado: Mar 22 Jun, 2004 3:13 pm Asunto: SOCORROO!!! |
|
|
Podria ser que la impresora se riera de mis configuraciones? O sea que configuro tamaños etc pero no puedo con el area de impresión de la impresora, como hacerlo?
Quiza es eso no? el area de impresión? alguna idea???
Gracias y disculpas pero es mi ultimo paso para poder tener un creador de reports en tiempo de ejecución y..... |
|
| Volver arriba |
|
 |
|