Retirar Executavel da memória [delphi7]

Delphi

06/12/2014

Bom dia.
Eu tenho dois forms um de login e outro aonde fica o programa.
Quando eu abro e aparece o form de login se eu sair a aplicação some dos processos do windows.
Mas se eu logar e e sair do programa o aplicativo continua nos processos do windows.
ps. eu ja tentei farias coisas que achei por aki.


Abaixo está o botão que faz o login e por sua vez chama o form.

procedure TForm2.BitBtn1Click(Sender: TObject);
begin
// ativa a tabela
M.IBQuery21.Open;    

// verifica se os campos coincidem,
 // tanto na tabela, quanto nas edits



if M.IBQuery21.Locate('USER', edit1.Text, [ ]) and
M.IBQuery21.Locate('PASS', edit2.Text, [ ]) then
begin
// fecha a tabela
M.IBQuery21.Close();
// mostra outro form
form1.Show;




// esconde o atual
Self.Hide;
edit1.Clear;
edit2.Clear;
end
// se os campos forem vazios
Else if (edit1.Text = '') and (edit2.Text= '') then
Begin
// mostra mensagem
ShowMessage('Preencha os campos login e senha!');
edit1.SetFocus;
end
else  // campos nao conferem
begin
// campos nao conferem
ShowMessage('Usuario ou senha inválidos!');
edit1.Clear;
edit2.Clear;

end;
FreeAndNil(Form2);


end;
Bruno Souza

Bruno Souza

Curtidas 0

Respostas

Douglas

Douglas

06/12/2014

Olá Bruno, tudo bem?
Deixe-me ver se eu entendi bem. No caso você gostaria de encerrar a aplicação no segundo form caso você feche, fazendo com que ele seja liberado de memória correto?
GOSTEI 0
Hugo

Hugo

06/12/2014

Amigo tente trocar 
FreeAndNil(Form2);
por 
Application.Terminate;


e veja se resolve...
GOSTEI 0
POSTAR