Como evitar a execução repetida do programa? (Detectar se existe uma cópia anterior e, em caso afirmativo, encerrar o programa recém-iniciado). Depois de iniciar um programa, os usuários às vezes restringem o programa à barra de tarefas e, em seguida, reiniciam o programa quando precisam usá-lo. Isso às vezes causa corrupção de dados em programas de banco de dados! Se não quiser que os usuários iniciem o programa repetidamente, você pode usar o objeto APP para determinar o seguinte:
PRivateSubForm_Load()
IfApp.PrevInstanceThen'Ver versão anterior
MsgBox"Este programa já está em execução!",48
Fim
FimSe
FimSub->