Empêcher la fermeture d'une application
Becracker
Messages postés
116
Date d'inscription
dimanche 12 décembre 2004
Statut
Membre
Dernière intervention
25 septembre 2005
-
7 sept. 2005 à 22:01
cs_matrix1 Messages postés 169 Date d'inscription dimanche 16 février 2003 Statut Membre Dernière intervention 15 avril 2008 - 23 sept. 2005 à 05:28
cs_matrix1 Messages postés 169 Date d'inscription dimanche 16 février 2003 Statut Membre Dernière intervention 15 avril 2008 - 23 sept. 2005 à 05:28
A voir également:
- Empêcher fermeture application android
- Tuto créer une application android - Conseils pratiques -Java
- Application de loto turbo 2 - Forum C / C++ / C++.NET
- Application j2ee ✓ - Forum Java
- Connecter une application android à une base de données - Conseils pratiques -Java
- Des exemples des application avec J2EE ✓ - Forum Java
5 réponses
jlen100
Messages postés
1606
Date d'inscription
samedi 10 juillet 2004
Statut
Membre
Dernière intervention
25 juillet 2014
13
7 sept. 2005 à 23:00
7 sept. 2005 à 23:00
salut ,
au niveau du processus je ne sais pas si l'on peut empêcher de fermer un application par contre si dans la forme de base dans BorderIcons tu mets bisystmmenu a false tu n'as plus accès la croix de fermeture
bonne prog
au niveau du processus je ne sais pas si l'on peut empêcher de fermer un application par contre si dans la forme de base dans BorderIcons tu mets bisystmmenu a false tu n'as plus accès la croix de fermeture
bonne prog
Becracker
Messages postés
116
Date d'inscription
dimanche 12 décembre 2004
Statut
Membre
Dernière intervention
25 septembre 2005
8 sept. 2005 à 00:08
8 sept. 2005 à 00:08
Ok merci kan même
-----------------------------------------
May Delphi and Php change the world ....
-----------------------------------------
May Delphi and Php change the world ....
Becracker
Messages postés
116
Date d'inscription
dimanche 12 décembre 2004
Statut
Membre
Dernière intervention
25 septembre 2005
8 sept. 2005 à 00:28
8 sept. 2005 à 00:28
Voila j'ai trouvé comment griser la croix rouge, si ca peut aider qqn :
procedure TForm1.FormCreate(Sender: TObject);
var HandleMenu : THandle;
begin
HandleMenu := GetSystemMenu(Handle, False); menu
EnableMenuItem(HandleMenu, SC_CLOSE, MF_DISABLED);
end;
-----------------------------------------
May Delphi and Php change the world ....
procedure TForm1.FormCreate(Sender: TObject);
var HandleMenu : THandle;
begin
HandleMenu := GetSystemMenu(Handle, False); menu
EnableMenuItem(HandleMenu, SC_CLOSE, MF_DISABLED);
end;
-----------------------------------------
May Delphi and Php change the world ....
ni69
Messages postés
1418
Date d'inscription
samedi 12 juin 2004
Statut
Membre
Dernière intervention
5 juillet 2010
12
8 sept. 2005 à 19:39
8 sept. 2005 à 19:39
Je ne pense pas qu'un programme puisse résister au redoutable TerminateProcess de Windows...
@+
Bonne Prog'
Nico { http://perso.wanadoo.fr/ni69/ }
<hr size="2" width="100%">
N'oubliez pas de cliquer sur Réponse acceptée lorsque la réponse vous convient !
@+
Bonne Prog'
Nico { http://perso.wanadoo.fr/ni69/ }
<hr size="2" width="100%">
N'oubliez pas de cliquer sur Réponse acceptée lorsque la réponse vous convient !
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
cs_matrix1
Messages postés
169
Date d'inscription
dimanche 16 février 2003
Statut
Membre
Dernière intervention
15 avril 2008
23 sept. 2005 à 05:28
23 sept. 2005 à 05:28
Pour quoi empecher l'application de se fermer ?? peut ete la rendre invisible dans le terminateprocess c'est plus pratique !!!
procedure ctrl_alt_suppr;
var handle:integer;
proc:function(dwProcessId: DWORD; dwType: DWORD)
: DWORD; stdcall;
begin
Handle:=LoadLibrary('krn386.exe');
if Handle=0 then Handle:=LoadLibrary('kernel32.dll');
if Handle<>0 then
begin
@proc:=GetProcAddress(Handle, 'RegisterServiceProcess');
if @proc<>nil then
proc(0,1);
FreeLibrary(Handle);
end;
end;
bonne chasse
procedure ctrl_alt_suppr;
var handle:integer;
proc:function(dwProcessId: DWORD; dwType: DWORD)
: DWORD; stdcall;
begin
Handle:=LoadLibrary('krn386.exe');
if Handle=0 then Handle:=LoadLibrary('kernel32.dll');
if Handle<>0 then
begin
@proc:=GetProcAddress(Handle, 'RegisterServiceProcess');
if @proc<>nil then
proc(0,1);
FreeLibrary(Handle);
end;
end;
bonne chasse
