aliviar memoria Delphi

SQL Server

SQL

Delphi

Banco de Dados

Firebird

27/08/2020

bom dia!
E o seguinte, fiz um formulário que nele gera relatório (QUICKREP) conforme fotos anexadas no mesmo. Em alguns casos, pode conter até 12 fotos, onde para cada arquivo de foto eu chamo um formulário para a geração do PDF.
O problema é que começa a dar o erro de ( não há recurso de memoria disponível), devido o criação dos 12 formulários. (form1,form2,form3 etc..).
O problema que eles estão permanecendo na memoria, e cada vez aumenta a cada chamada.
Alguem sabe como posso criar , destruir e eliminar da memoria?

a chamada:
Application.CreateForm(Tfrel_form1, frel_form1);
frel_form1.QuickRep1.Refresh;
frel_form1.QRImage1.Picture.LoadFromFile(edit1.TEXT);
try
frel_form1.QuickRep1.Prepare;
frel_form1.QuickRep1.PrinterSettings.PrinterIndex:= ListBox2.ItemIndex;
frel_form1.QuickRep1.Print;
except
ShowMessage('Erro na criação do formulário !!');
exit;
END;
frel_form1.Tag:= 0;
frel_form1:= nil;
FreeAndNil(frel_form1);
frel_form1.Free;
Daniel Antonio

Daniel Antonio

Curtidas 0

Respostas

Roberto Castelani

Roberto Castelani

27/08/2020

boa noite amigo !
Estou sem tempo para explicar a você mais achei um video que possa te ajuda

http://delphiparainiciantes.com.br/como-criar-e-destruir-formularios-no-delphi/


Abraço
Boa Sorte!!!!
GOSTEI 0
POSTAR