Me vais a mandar a la porra como muy cerca. Ya no sé que pasa, pero cada paso adelante que doy el sistema me responde con dos para atrás. Tengo este código:
Código:
#include <qrpdffilt.hpp>
#include <QRExport.hpp>
bool ExportaListado(TQuickRep *Informe, AnsiString cInforme, bool Guardar)
{
try
{
if (UpperCase(ExtractFileExt(cInforme)) == ".PDF")
{
TQRPDFDocumentFilter *filtro = new TQRPDFDocumentFilter(cInforme);
filtro->AddFontMap("Arial:Helvetica");
filtro->StartConcat();
Informe->ExportToFilter(filtro);
filtro->EndConcat();
delete filtro;
}
else if (UpperCase(ExtractFileExt(cInforme)) == ".RTF")
{
TQRRTFExportFilter *filtro = new TQRRTFExportFilter(cInforme);
Informe->ExportToFilter(filtro);
delete filtro;
}
else if (UpperCase(ExtractFileExt(cInforme)) == ".TXT")
{
TQRAsciiExportFilter *filtro = new TQRAsciiExportFilter(cInforme);
Informe->ExportToFilter(filtro);
delete filtro;
}
else if (UpperCase(ExtractFileExt(cInforme)) == ".XLS")
{
TQRXLSFilter *filtro = new TQRXLSFilter(cInforme);
Informe->ExportToFilter(filtro);
delete filtro;
}
}
catch(...)
{
DeleteFile(cInforme);
Mensaje(1, "Ha tenido lugar un error en la exportación del listado.", "Continuar");
return false;
}
return true;
}
Esta función la uso en varios sitios de lso informes de forma que no me hace falta definir la exportación en cada punto del proyecto; lo hago una vez y luego llamo a esta función. Llevo años usándolo sin ningún problema... ¡Hasta hoy! Ahora, de repente, al compilar el proyecto completo (Ctrl+F9 o Build Project - Alt P + B) me está dando errores en el módulo donde está declarada:
Cita:
Unresolved external 'Qrpdffilt::TQRPDFDocumentFilter::' referenced from C:\Proyecto\Funciones.obj
|
Curiosamente si compilo sólo (Alt+F9) el módulo en que se encuentra declarada la función ¡no me da ningún error!
¡¡¡SOCORRO!!!