Le portail francophone de la géomatique

Bonjour

je rencontre un pb qui peut paraitre evident mais que je n'arrive pas a resoudre?

comment fermer mapinfo par une commande mapbasic.

en fait :
je cree une boite de dialogue demandant un mot de passe avec 2 control :
un control OKbutton avec lequel j'appele une procedure qui accede a mon interface
et un cancelbutton avec lequel j'appele la fin de l'application et de mapinfo.
or il ne quitte pas mapinfo.

je joins les lignes de codes
ou es mon erreur?

sub motdepasse
Dialog title Perimetre de protection
Control statictext title Entrez un mot de passe
Control Edittext ID 1
Control OKbutton calling valid_password
Control cancelbutton calling fini_mapinfo
end sub

sub fini_mapinfo
end program
end mapinfo
end sub

Merci