FAQ DelphiConsultez toutes les FAQ

Sur certaines arborescences projet, les opérations de checkout peuvent être fastidieuses par exemple si l'on souhaite récupérer quelques sous-répertoires parmi d'autres.
La création d'alias de module règle ce problème.

Configuration :
Pour modifier le fichier de configuration concerné (fichier modules de CVSROOT) voir : Defining the module

Contenu du fichier module de CVSROOT :

1
2
3
4
5
6
7
#Nom des chemins permettant d'extraire uniquement le sous-répertoire source dans un répertoire cible : 
components Projects/components 
Designers Projects/Designers 
TConnectVersion Projects/TConnectVersion 
THabilitation Projects/THabilitation 
common Projects/common 
MonAppli Projects/appli

1
2
#Union des modules spécifiques à l'application MonAppli 
&components &Designers &TConnectVersion &THabilitation &common &MonAppli

"C:\Program Files\TortoiseCVS\cvs" checkout -d MonRépertoire MonAppli

"C:\Program Files\TortoiseCVS\cvs" -H checkout

L'objectif
Un système de gestion de version permet d'une manière centralisé et en mode multiutilisateurs :

1. le partage de fichiers source d'un projet,
2. de gérer et tracer les modifications (qui a fait quoi et quand),
3. d'avoir un historique du code source,
4. de gérer plusieurs version d'un projet ce qui permet de figer une version mise en production (v1.0),
5. de travailler sur une nouvelle version v2.0 en parallèle de la v1.0 (par exemple pour tester une solution technique ou une évolution fonctionnelle),
6. …
   

1. d'extraire en local une version de travail,
2. d'ajouter et supprimer des fichiers dans le référentiel,
3. de comparer des fichiers sur un numéro de version ou sur une date,
4. …
   

Si la substitution de mot clé est déjà configuré sur le serveur CVS, il est possible d'ajouter des informations issues du serveur dans le fichier source.
Parmi les mots clés, $Log$ permet d'insérer l'historique des modifications effectuées sur le fichier source en cours d'édition.

Pour les versions qui précédent Delphi 2005 (BDS), il est préférable de placer le mot à substituer en fin de source, sinon la lecture du début du fichier sera à la longue fastidieuse.

1
2
3
4
5
6
7
End. 
(* Historique des mises à jour 
  
$Log$ 
  
*) 
...

1
2
3
4
5
6
7
8
9
10
11
(* Historique des mises à jour 
  
$Log: Test_CVS_Substitution.pas,v $ 
  
Revision 1.3 2006/08/05 08:49:40 LDardenne 
Ajout de la propriété TAGcvs 
  
Revision 1.2 2006/08/05 08:46:21 LDardenne 
Ajout du bloc Region pour les commentaires. 
  
*)

1
2
3
4
5
6
7
Interface 
{$REGION 'Historique des mises à jour'} 
  
$Log$ 
  
*) 
{$ENDREGION}

Dans le cas où l'on commite un fichier erroné, un nouveau commit avec une version corrigée annule cette erreur. Mais parfois, il est souhaitable de supprimer la dernière version d'un fichier dans le repository CVS.
Cette opération se déroule en deux étapes, une sur le repository et l'autre sur un fichier de configuration local.

Exemple pour supprimer la version 1.12 (la dernière version) du fichier f_Main.pas présent dans le répertoire C:\Projets\Application

1. Ouvrez une console MS-DOS,
2. Si la variable d'environnement CVSROOT n'est pas positionnée, déclarez-la par la commande suivante en modifiant la ligne avec votre nom de compte et le nom de votre serveur :
   

   Code :

   Sélectionner tout

   set cvsroot=:pserver:NomDeCompte@NomDeServeur:24010:/Projets/MonApplication

3. Suppression de la version 1.12 (et dernière version) du fichier dans le repository, placez-vous dans le répertoire où se trouve le fichier :
   

   Code :

   Sélectionner tout

   cd C:\Projets\Application

4. exécutez la commande CVS suivante ( cvs admin -o <numero_version> <nom_fichier_avec_extension> )
   

   Code :

   Sélectionner tout

   "C:\Program Files\TortoiseCVS\cvs" admin -o 1.12 f_Main.pas

5. Enfin chargez dans un éditeur le fichier local C:\Projets\Application
   \CVS\Entries puis décrémentez le numéro de version du fichier en question.
   "/f_Main.pas/ 1.12 /Tue Aug 20 16:53:16 2006//"
   par
   "/f_Main.pas/ 1.11 /Tue Aug 20 16:53:16 2006//"
   

Il existe un fichier de configuration nommé .cvsIgnore qui contient les noms de fichier à ne pas remonter sur le serveur lors d'un commit. Il est présent sur le serveur (fichiers d'administration) et sur les postes de travail (dans chaque répertoire de travail de CVS).
Il est possible de combiner différents niveaux d'exclusion, consultez la section lien pour plus de détails.

Par exemple la variable d'environnement CVSIGNORE ou le fichier sur le serveur ne semble pas pris en compte par TortoiseCVS. Dans ce cas, on doit donc modifier ce fichier dans chaque répertoire du projet.
Exemple de contenu du fichier .cvsignore pour Delphi 2006 (Win32 et .NET):

__history Outputs dcu *.~* *.dcu Copy of * *.dcuil *.bpl *.dll *.exe *.dcp *.identcache *.dsk *.local *.cfg *.ddp *.map *.pdb *.bak