percifilho
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 16/01/2007 13:54 hs
Ok, Ghost, só que quando eu clico no botão para sair, ou no menu Sair, eu uso o End para fechar, aí o programa fecha direitinho. O problema é quando eu clico no X da janela, aí o programa fecha, só que se eu der um Ctrl+Alt+Del , no gerenciador de tarefas ele aparece lá, como se estivesse aberto, entendeu. Me parece que existe um evento no Form que é relacionado a esse X da janela, não tem?
|
|
|
|
LCRamos
|
GOIANIA GO - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 16/01/2007 16:38 hs
Voce já tentou, descarregar e fechar o Bd no evento Terminate, do form? vlu//
|
|
|
|
Postada em 17/01/2007 09:36 hs
É isso q o LCRamos disse, não é o fechar q é o problema, como vc citou o processo continua lá no gerenciador de tarefas... antes de dar o End no seu sistema vc tem q fechar as conexões e os recordsets e liberar memória.
|
|
|
RAIANE
|
SUZANO PS - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 17/01/2007 09:54 hs
Oi percifilho, eu encontrei uma rotina aqui mesmo no site que faz isso que você está querendo, só que eu não me lembro do endereço, eu estou na empresa, e esta rotina eu tenho em meu micro em casa, se você ainda não resolveu o problema me envie um e-mail que eu te envio esta rotina a noite. Um abraço Raiane
|
|
|
Álvaro
|
GUARULHOS SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 17/01/2007 10:31 hs
Olá Percifilho, cara eu sou meio radical rsrsrsrs, utilizo essa rotina para forçar o usuário a utilizar apenas o botão sair do formulário ou mesmo do menu principal, colocando essa rotina até mesmo no ctrl + alt + del ele te envia a mensagem de alerta Tenta isso, com isso vc força o usuário a utilizar o botão sair, e você acaba com o seu problema Coloque no evento QueryUnload do formulário que você quiser forçar a saida pelo botão sair, ok ?! Abraço Private Sub MDIForm_QueryUnload(Cancel As Integer, UnloadMode As Integer) Select Case UnloadMode Case 0 MsgBox "Você tentou deixar o sistema a partir do Control Menu. Tente novamente da maneira correta !!!!" Cancel = True Case 2 MsgBox "Você tentou deixar o Windows antes de sair do sistema. Tente novamente da maneira correta !!!!" Cancel = True Case 3 MsgBox "Você tentou deixar o sistema a partir da Lista de Tarefas. Tente novamente da maneira correta !!!!" Cancel = True End Select End Sub
Abraço e que DEUS te abençõe, espero poder ter te ajudado Eu sou o Senhor, o DEUS de vocês; eu os seguro pela mão e lhes digo; Não fiquem com medo, pois eu os ajudo Isaias 41:13
|
|
|
percifilho
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 17/01/2007 10:52 hs
Ok, Ghost e LCRamos, eu tentei fazer o seguinte: No evento Terminate do Form eu fiz assim: Private Sub Form_Terminate() rsconfig.close rssenha.close set rsconfig = nothing set rssenha = nothing db. close End Sub Não deu certo. Tem alguma coisa errada aqui? Meu formulário onde fecha o programa não é MDIForm. Será que é por isso? Ou não tem nada a ver? Eu só queria entender porque se eu clico no Botão Sair, onde tem o comando END o formulário fecha certinho e não fica nada na memória e se eu fechar pelo X da janela ele fica residente na memória. Mas se eu não conseguir, vou ter que desabilitar o ControlBox do formulário.
|
|
|
|