INTERDIRE ALT+F4

Réponse acceptée !
Salut Steven,

si ce que tu veux, c'est obliger de passer par un bouton (ou un élément de menu) pour pouvoir fermer la form, il y a un moyen très simple avec une variable boolean :

CanQuit: boolean;

Tu l'initialise à false dans l'événement OnCreate de la fiche.

procedure TForm1.ButtonQuitClick(Sender: TObject);
begin
    if ....  // contrôle éventuel
    then
    begin
        CanQuit:= true;
        Close;
    end;
end;

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
   CanClose:= CanQuit;
end;

Réponse acceptée !
Salut,

je n'ai rien compris à ce que tu souhaites faire. Cependant je tire le signale d'alarme sur la méthdoe proposée par roud59 : en faisant ca tu vas tout simplement jouer dans la  base de registre. Tu vas donc bloquer sur toutes applications les touches. Cette méthode est d'autant plus dangereuse si d'autres personnes récupèrent ton soft : ils risquent de ne pas savoir la solution.

A ne pas utiliser par quelqu' un de peu experimenté.

Réponse acceptée !
surtout que notre ami Roud ne semble pas savoir ou doit etre mise la valeur DisableTaskMgr et qu'il ne semble pas maitriser l'objet TRegistry en effectuant des manipulation dangereuse dessus.

et point important, si jamais le programme s'arrete de maniere inattendue ou qu'il y a une coupure de courrant, le gestionnaire des taches serat definitivement bloqué ... ce qui n'est pas trés cool au final.

trés trés mauvaise solution ... sans parler des IDS et anti-virus qui vont degager le programme quand ils en veront le comportement de ce dernier.

si tu a un main menu tu peu mettre un shortcut ALT+F4 qui bloqueras alors l'action de ce dernier.

Réponse acceptée !
J'irais meme plus loin fOxi : cela pue le virus à plein nez (blocage de la barre, des icones, du bouton démarrer, puis CONTR+ALT+DEL). Voila un mec qui est bien : on pourrait presque appeler cela une tentative de d'infection (et oui donner comme code un virus).

Réponse acceptée !
Si quelqu'un a utiliser ce code qu'il prévienne immédiatement les administrateurs

Réponse acceptée !
Bonjour vous tous

Si suis désolé mais j'ai fait un énorme hors sujet. J'avais compris ALT-TAB au lieu de CTRL-TAB.

Concernant ma procédure, je sais qu'elle est très dangereuse, mais j'ai déja dû l'utiliser et ce n'était pas pour un faire virus (j'ai déjà perdu des données importantes à cause d'un virus et je suis totalement contre ce genre le logiciel) J'avais fait tourner une application sur un PC et il fallait pas que l'utilisateur puisse arrêter le programe ou utiliser la machine pour d'autres choses (jeu ou surf internet par exemple,) sinon des demandes de secours ne pouvaient plus être traitées. J'ai donc vérouillé le PC ainsi. Le problème est quand le programme plante, on a plus la main sur la machine et il faut refaire un peu de DOS pour empêcher le lancement de l'appli au boot et récupérer la main.

Je ne cherche pas à me défendre de mon erreur mais j'insiste sur le fait que je n'ai pas voulu faire de mal à quelqu'un, et surtout pas aux utilisateurs de CS qui m'ont beaucoup aidé dans mes développements.

 Veuillez donc tous m'excuser de ma réponse inadaptée et dangereuse si elle est mal utilisée. Je suis réellement confus et réfléchirait beaucoup plus la prochaine fois.

Roud59

Réponse acceptée !
Roud59 plutot que d'utiliser un bazooka pour tuer une mouche tu devrais (dans ton application) bloquer la souris et le clavier : ca serait déjà beaucoup moins dangereux.

En espérant que personne n'ai essayé ta procedure (qui en plus contient énormément de boulettes).

@+