Discussion :

[Harry]

Bonjour,

Je cherche comment changer automatiquement les informations de version (numéro de build) automatiquement à chaque compilation.

Et egalement comment les recupérer sur le projet (afficher dans le Apropos par exemple dans un TLabel).

Il y a deja un thread pour Delphi 7, mais ce n'est pas pareil que sur Delphi 2005 (donc pas la peine de répéter 'Projet/Options/Onglet "information de version"...).
voir : http://www.developpez.net/forums/vie...ighlight=build

A Noter : il s'agit d'un projet VCL.NET

Merci

[Laurent Dardenne]

Intégré dans la FAQ Delphi .NET 26/06/2205
Salut,

Je cherche comment changer automatiquement les informations de version (numéro de build) automatiquement à chaque compilation.

Extrait du SDK, AssemblyVersionAttribute :

Le format de la chaîne version est : major. minor. build. revision.

Lors de la spécification d'une version, vous devez au moins spécifier major. Si vous spécifiez major et minor, vous pouvez spécifier un astérisque (*) pour build. Dans ce cas, build est égal au nombre de jours depuis le 1er janvier 2000 heure locale et revision est égal au nombre de secondes depuis minuit heure locale, divisé par 2.

Si vous spécifiez major, minor et build, vous pouvez spécifier un astérisque pour revision. Dans ce cas, revision est égal au nombre de secondes depuis minuit heure locale, divisé par 2.

La présence de l'attribut suivant est suffisant bien que le pas d'incrément ne soit pas de 1 :

Code :

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

[assembly: AssemblyVersion('1.0.*')]

Pour un programme console il faut ajouter une unité de type 'Fichier AssemblyInfo'.

Et egalement comment les recupérer sur le projet (afficher dans le Apropos par exemple dans un TLabel).

Extrait de la prochaine FAQ Delphi .NET

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
uses System.Diagnostics,SysUtils; 
 
Function GetVersion:String;
var VersionApplication : FileVersionInfo ;
    MaVersion : String ;
Begin
   // Récupére le nom de l'application via la ligne de commande
   // L'argument 0 de la ligne de commande est le nom de l'application en cours d'exécution
 VersionApplication := FileVersionInfo.GetVersionInfo(Paramstr(0));
 
   // Construction du numéro de version à partir des différentes parties le constituant
   // L'utilisation de la fonction Format nécessite l'ajout de l'unité SysUtils dans la clause uses.
{ with VersionApplication do
  MaVersion:=Format('%d.%d.%d.%d', [FileMajorPart,
                                    FileMinorPart,
                                    FileBuildPart,
                                    FilePrivatePart]);
 Writeln('MaVersion '+MaVersion);
}
  // Accés direct au numéro construit 1.2.3.4
 Result:=VersionApplication.Fileversion;
end;

Tu peux aussi faire :

Code :

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

 Writeln(FileVersionInfo.GetVersionInfo(Paramstr(0)).Fileversion);

[Harry]

Ohh, merci, ca a l'air bien, je suis impatient de tester. Va falloir attendre lundi, j'ai pas le projet (ni D2005) chez moi.

Je vous dirais ce qu'il en est.

Merci

[Harry]

voila, c'est en place, pour ceux qui passent derriere moi dans ce sujet :

Code :

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

[assembly: AssemblyVersion('1.0.*')]

Est en place par defaut dans le code du projet, donc ne cherchez pas ou le mettre !

Le numéro obtenu est dans ce style : 1.0.1997.23938

C'est pas terrible, en effet le 1997 ca doit correspondre aux jours et 23939 aux secondes depuis le debut de la journée (minuit).

J'aurais préféré simplement un numéro du genre
1.0.001
1.0.002..... etc

car ce n'est pas très lisible, mais dans l'ensemble ca me convient.

Je met le sujet en résolu, mais si quelqu'un à un système différent n'hésitez pas à contribuer