Fórum [Delphi] Como liberar um variant da memória? #584949
16/08/2017
0
boa tarde amigos
alguém sabe como liberar um objeto do tipo variant da memória no Delphi?
Por exemplo:
obrigado :)
alguém sabe como liberar um objeto do tipo variant da memória no Delphi?
Por exemplo:
var
Sheet: Variant;
XLApp: Variant;
linha: integer;
begin
linha := 1;
XLApp:= CreateOleObject('Excel.Application');
XLApp.Workbooks.Add(xlWBatWorkSheet);
XLApp.Workbooks[1].WorkSheets[1].Name := 'report';
Sheet := XLApp.Workbooks[1].WorkSheets['report'];
Sheet.cells[linha,1] := lblTipoComunicacao.caption;
xlapp.visible:=true;
//como liberar xlapp da memoria?
obrigado :)
Gladstone Matos
Curtir tópico
+ 0
Responder
Posts
16/08/2017
Douglas Souza
Opa Gladstone, firmeza?
Utilize o seguinte código abaixo, após a instrução: "xlapp.visible:=true;" para liberar as suas variáveis variant de memória.
Espero ter contribuído para o seu conhecimento.
Um forte abraço.
Att, Douglas Claudio
Utilize o seguinte código abaixo, após a instrução: "xlapp.visible:=true;" para liberar as suas variáveis variant de memória.
if not VarIsEmpty(XLApp) then begin XLApp.Quit; XLAPP :=Unassigned;//liberar da memória Sheet :=Unassigned;//liberar da memória end;
Espero ter contribuído para o seu conhecimento.
Um forte abraço.
Att, Douglas Claudio
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)