Voici la fonction que j'utilise sous D2007 .
si cela peut t'aider
Function RenvoiVersion(NomAppli : String ):String;
var
FileName: string;
InfoSize, Wnd: DWORD;
Type: Messages; Utilisateur: Pascal Fonteneau
Voici la fonction que j'utilise sous D2007 .
si cela peut t'aider
Function RenvoiVersion(NomAppli : String ):String;
var
FileName: string;
InfoSize, Wnd: DWORD;
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.