Discussion :

[exyacc]

bonjour,

pour avoir la liste des programmes lancés et pouvoir en "killer" un, j'utilise la fonction:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
function programme_lancee(nom:string):boolean;
var proc : tprocessentry32;
     prh   : thandle;
begin
  result := false;
  proc.dwSize:=sizeof(proc);
  prh:=createtoolhelp32snapshot(TH32CS_SNAPALL,0);
  process32first(prh,proc);
  if sametext(extractfilename(proc.szExeFile),nom) then result := true;
  while process32next(prh,proc) do
    if sametext(extractfilename(proc.szExeFile),nom) then result := true;
end;

mais des que je compile, l'antivirus nod32 detecte un virus..
juste l'access a createtoolhelp32snapshot le declenche ...

sur le net, j'ai vu qu'il fallait vérifier le fichier "SysConst.dcu" voir si la date de modif a changé, mais rien ..

une idée ?

merci

exyacc

[Paul TOTH]

une idée ?

supprime ton antivirus

merci

de rien

[ShaiLeTroll]

SysConst c'était pour Delphi 7, si je me souviens bien !

Pour ma part, j'ai un code très similaire pour lister les programmes, les fenêtres et l'arborescence des contrôles

Je n'ai pas eu de problème avec cet exe compilé en D6, il y a plus de 8 ans, je l'ai utilisé sur Seven la dernière fois

A vérifier, si en obtenant quelques privilèges via AdjustTokenPrivileges, tu n'éviterais pas certains soucis

En tout cas, pour un programme qui rebootait le PC, c'était indispensable dès Win2K !
Voir ce code ForceShutDown qui utilise AdjustTokenPrivileges

nod32, quand il existe des versions crackées d'un anti-virus, je n'aurais pas confiance en celui-ci !

[exyacc]

le plus bizarre, c'est que si je refais un projet, je copie-colle tout, je sauvegarde meme nom, et la a la compile, j'ai pas message de l'antivirus...
mais je me demande si a l'utilisation il va pas devenir tot ou tard positif comme l'autre...

[exyacc]

ah ben non, même le nouveau programme se fait détecter, en fait des qu'il y a , a la fois une fonction pour "killer" un programme, et une autre pour télécharger une maj, ca déclenche l'antivirus