como liberar form da memoria

[MR.MARCOS 0]

OLA PESSOAL ESTOU ME INICIANDO EM DELPHI 7

E JQ DE CARA ESTOU COM GRANDE PROBLEMA FIZ UM PEQUENO

PROGRAMA DE RADIO ON LINE

CRIE DOIS FORM O 1. É UMA TELA SPLASH QUE CHAMA O 2. MAIS QUANDO FECHO O PLAYER DO RADIO ONLINE E ELE FICA EXECUTANDO AI TENHO QUE IR EM GERENCIADOR DE TAREFA E ENCERRAR POR LA ...

 

AQUI TA O CODIGO...

procedure TForm1.Timer1Timer(Sender: TObject);

begin

ProgressBar1.Position := ProgressBar1.Position + 1;

Label1.Caption :=IntToStr(ProgressBar1.Position) + '%';

 

if ProgressBar1.Position =100 then

Begin

 

 

Form1.Destroy;

Form2.Show;

end;

end;

[wllf 2]

Colega vamos por parte:

 

1º Liberar um form da memória:

//"FreeAndNil(Form1)" - libera o form da memória e seta o valor nil para variável form1

 

2º Fechar à aplicação:

//No Form responsável por fechar, "application.terminate"

 

qualquer coisa estamos por aí .....