F�rum Delphi - Criando TFrame por C�digo #455777

18/09/2013

Ol� pessoal, beleza?

Tenho uma tela aonde eu crio/deleto frames a todo o momento e essa tela depois de um tempo acaba travando o sistema.

Gostaria de saber se algu�m ja teve alguma experi�ncia em rela��o a cria��o/destrui��o de TFrames e possa me ajudar.

Para criar:

        xArvoreTarefa := TfraArvoreTarefa.create(self);
        xArvoreTarefa.Parent := xScrollControle;
        xArvoreTarefa.align := alTop;
        xArvoreTarefa.name := '_'+CreateUniqueID()

Para Deletar:

   vComponent := FindComponent('NOME DO FRAME');
    if vComponent<>NIL then
    begin
        TfraArvoreTarefa(vComponent).xUnicoArvoreAtividade := nil;
        FreeandNil(TfraArvoreTarefa(vComponent).xUnicoArvoreAtividade);
        FreeandNil(TfraArvoreTarefa(vComponent));         
    end;
  vComponent := nil;
   Application.ProcessMessages;

Bruno Galli

Curtir t�pico

+ 0

Responder