FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
||||
|
||||
ShowProgress en TProgressBar
Estoy usando un código que me facilitaron en otro foro para que el ShowProgress al imprimir un documento con QuickReport se muestre en un TProgressBar en lugar de hacerlo en su propio formulario, que no me gusta ni por la estética que tiene ni por el botoncito de Cancel que incorpora.
El código es este: 1. En el BeforePrint del informe: Código PHP:
Código PHP:
Código PHP:
¿Alguien puede sugerirme alguna idea? O bien, como alternativa, como modificar el aspecto del panel en que se muestra el ShowProgress del propio QR. Última edición por nlsgarcia fecha: 12-03-2015 a las 02:28:11. Razón: Sintaxis C |
#2
|
||||
|
||||
Eso es que algún objeto no existe. Depura para saber dónde lanza la excepción, localiza qué es lo que falla y arréglalo.
|
#3
|
||||
|
||||
No reproduzco tu problema en Builder6.
prueba a ver si esto funciona para determinar si encuentras el nombre de la clase: incluye esta línea en Form1.h Código PHP:
Código PHP:
Saludos. |
#4
|
||||
|
||||
Cita:
Código:
if (Sender->QRPrinter->Client->ClassNameIs("TQRProgressForm")) Código:
bool __fastcall ClassNameIs(const AnsiString string) { return ClassNameIs(ClassType(), string); } |
#5
|
||||
|
||||
Aclarado, en parte, el problema. El error no venía producido por esa llamada para ver el progreso en un TStatusBar; hay otra "trampa": Como necesito un contador que numere los registros del informe y estaba definiendo dinámicamente un TQRSysData; es esto lo que provoca el error. Disculpadme por haberos dado la paliza y a ver si encuentro como crear ese elemento dinámicamente al generar el informe.
|
#6
|
||||
|
||||
Retomo este hilo porque, a pesar del tiempo transcurrido, pensaba que lo había solucionado pero no, me sigue dando el mismo error que comentaba en primer mensaje.
Corriendo la aplicación con el depurador (BCB 6, recuerdo) he comprobado que al ejecutar la línea con F7 (Trace into)): Código:
if (Sender->QRPrinter->Client->ClassNameIs("TQRProgressForm")) Código:
bool __fastcall ClassNameIs(const AnsiString string) { return ClassNameIs(ClassType(), string); } |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
TProgressBar va retrasado | atani123 | Varios | 16 | 03-03-2015 12:51:46 |
Problema TProgressBar e IdFTP | jlrdz | OOP | 1 | 14-06-2011 13:19:21 |
Generar TProgressBar en Forma Dinámica | GerTorresM | OOP | 1 | 12-04-2009 03:02:04 |
TProgressBar cíclico nativo (marquee) (añadida solución 3) | xEsk | Trucos | 11 | 04-12-2008 21:13:58 |
TProgressBar | Delphius | OOP | 2 | 09-12-2004 05:31:46 |
|