VERROU WINDOWS

cs_Delphiprog Messages postés 4297 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 9 janvier 2013 - 8 août 2005 à 21:46
DelphiCool Messages postés 455 Date d'inscription mardi 24 juillet 2001 Statut Membre Dernière intervention 10 mars 2009 - 10 août 2005 à 17:25
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/33131-verrou-windows

DelphiCool Messages postés 455 Date d'inscription mardi 24 juillet 2001 Statut Membre Dernière intervention 10 mars 2009
10 août 2005 à 17:25
oups
cs_maxkweeger Messages postés 41 Date d'inscription dimanche 30 juin 2002 Statut Membre Dernière intervention 6 avril 2010
10 août 2005 à 17:14
Non DelphiCool c'est Glorkonline l'auteur, je n'est rien posté du tout sur ce coup ;-)

Je suis juste intervenu par rapport au commentaire c'est tout ...

MaxKweeger
DelphiCool Messages postés 455 Date d'inscription mardi 24 juillet 2001 Statut Membre Dernière intervention 10 mars 2009
10 août 2005 à 16:46
ya pas de soucis,
tu as poster un source, et meme s'il n'est pas de toi,
ça peu aider certain
cs_maxkweeger Messages postés 41 Date d'inscription dimanche 30 juin 2002 Statut Membre Dernière intervention 6 avril 2010
10 août 2005 à 15:34
Pas de soucis DelphiCool, surtout que delphiprog m'a deja donné des coups de main sur certain de mes softs, mais celui-ci, qui n'est pas de moi mais de Glorkonline, je croyais qu'il y avait grosse moquerie, mais c'est surement un mal entendu, mais maintenant je ne me mele meme pas de ce qui me regarde, si ça trouve Glorkonline l'a tres bien pris ;-) desolé encore ...
DelphiCool Messages postés 455 Date d'inscription mardi 24 juillet 2001 Statut Membre Dernière intervention 10 mars 2009
10 août 2005 à 13:20
C'est pas vraiment une moquerie, mais une un petit sourire.

DelphiProg et moi cherchons à optimiser ton code et faire en sorte qu'il soit propre.

Ne me dit pas que j'ai dit que ton code etait sale lol

Personne ne se la "pète" et ne se moque dans ton source
cs_maxkweeger Messages postés 41 Date d'inscription dimanche 30 juin 2002 Statut Membre Dernière intervention 6 avril 2010
10 août 2005 à 12:56
Arretez de vous la péter, l'essentiel c'est que ce code soit posté. Les corrections c'est bien aussi mais sans moquerie c'est encore mieux, car ça donne pas envie de poster ce genre de reaction ;-)

MaxKweeger
DelphiCool Messages postés 455 Date d'inscription mardi 24 juillet 2001 Statut Membre Dernière intervention 10 mars 2009
10 août 2005 à 09:34
Salut,

Au lieu de faire ça :

reg.OpenKey('Software', True);
reg.OpenKey('Microsoft', True);
reg.OpenKey('Windows', True);
reg.OpenKey('CurrentVersion', True);
reg.OpenKey('Policies', True);
reg.OpenKey('System', True);

Tu peux faire ceci

Reg.OpenKey('Software\Microsoft\Windows\CurrentVersion\Policies\System', True);


Et au lieu de définir le répertoire Windows comme c:\windows, utilise plutot l'API GetWindowsDirectory
DeltaFX Messages postés 449 Date d'inscription lundi 19 avril 2004 Statut Membre Dernière intervention 8 avril 2009 2
9 août 2005 à 15:12
D'ailleurs, if truc = True, c'est déja redondant,

if truc
then -------
else -------
end;

est amplement suffisant.
sosodef88 Messages postés 78 Date d'inscription jeudi 17 février 2005 Statut Membre Dernière intervention 26 décembre 2005
9 août 2005 à 11:40
mdddrr
cs_Delphiprog Messages postés 4297 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 9 janvier 2013 32
8 août 2005 à 21:46
Je ne savais pas qu'un booléen pouvait avoir d'autres valeurs que True ou False :
if bTF = True then
begin
reg.WriteString('DisableTaskMgr', '1');
end
else if bTF = False then
begin
reg.DeleteValue('DisableTaskMgr');
end;

On en apprend tous les jours, lol.
Rejoignez-nous