Error Raro sobre archivo "ntdll.dll" que no consigo encontrar el motivo

[AGAG4]

Uso D6, QReport 4 Prof. y eDocEngine
Tengo una aplicación que envia Correos Electrónicos Adjuntando un archivo JPG, este archivo se genera apartir de una Exportación que se hace de un archivo .QRP del QrPreview al Componente gtQRExportInterface de los eDocengine, hasta aqui todo bien, les presento el código:

Procedure FormCreate(Sender: TObject);
....
//Exportarlo de QRP a JPG
try
NPages:=0;
//Si Existe Archivo .QRP, Borramos
if FileExists('c:\tmp\PresupPag.qrp') then
if not DeleteFile ('c:\tmp\PresupPag.qrp') then begin
MensajesW('Archivo Bloqueado "PresupPag.qrp", No se Puede Crear, Cierre el Programa y Vuelva a Intentar el Envio del Correo.','Atención',48);
abort;
end;

//Preparamos QrPreview
qrRepPresup2.Prepare;

//Tomamos Número de Páginas para Determinar el #Archivos a Adjuntar
NPages:=qrRepPresup2.QRPrinter.PageCount;

//Guardamos Preview a un archivo .QRP
qrRepPresup2.Printer.Save('c:\tmp\PresupPag.qrp');
gtJPEGEngine.PagesToRender:='';

//Exportamos QRP a JPG
gtQRExportInterface.Engine := gtJPEGEngine;
IgtDocumentEngine(gtQRExportInterface.Engine).FileName := 'c:\tmp\PresupPag.qrp';
gtQRExportInterface.RenderDocument('c:\tmp\PresupPag.qrp');
except
on E:Exception do begin
MensajesW(PChar(E.Message+', No es posible Crear PresupPag.QRP, Reporte Error.'),'Error',MB_ICONERROR);
end;
end;

try
//Abrimos QRPreview
FQRPrinter := TQRPrinter.Create(Self);
FQRPrinter.Load('c:\tmp\PresupPag.qrp');
QRPreview.QRPrinter := FQRPrinter;
QRPreview.Show;
except
on E:Exception do begin
MensajesW(PChar(E.Message+', No es posible Abrir Archivo PresupPag.QRP, Reporte Error.'),'Error',MB_ICONERROR);
end;
end;

//Adjuntamos Páginas al Correo
for x := 1 to NPages do begin
//Adjuntar JPG
TIdAttachment.Create(IdMsgSend.MessageParts, 'c:\tmp\PresupPag'+IntToStr(x)+'.jpg');
ResetAttachmentListView;
end;

Al Cerrar el formulario borro el archivo .QRP


....
FQRPrinter.Free;
qrRepPresup2 :=Nil ;

//Si existe Archivo .QRP lo Borramos
if FileExists('c:\tmp\PresupPag.qrp') then
if not DeleteFile ('c:\tmp\PresupPag.qrp') then begin
MensajesW('Archivo Bloqueado "PresupPag.qrp", No se Puede Borrar.','Atención',48);
abort;
end;


El problema que tengo es que si cierro y abro el formulario como 20 veces en la 20 ó en la 21 me marca el siguiente error:

Access violation at address 7C928FEA in module 'ntdll.dll'. Write of address 00000010

Este error me lo marca al Crear el archivo .QRP ó al Abrirlo

Agradezco cualquier sugerencia.

ulario

[jeane_23]

tal vez te sirve