Delphi 2010: how to stamp file version in *.pas and increment it on each save w/o CVS/SVN tools?

Question

Hello.

How do I have in each *.pas file it's version, incrementing on each save in some comment line? I have plenty of files on three PCs and I need to have a possibility to quickly check their versions against each other.

This problem is easily solved by some centralized version control, but some sources I have cannot be trusted to external servers and are kept on TrueCrypt volumes.

May be some addon can do that for me? Something like changing $Version: to $Version: 121212 on each save, incrementing this value?

May be there is another way also of solving this problem?

Answer 1

You should try a DVCS like Mercurial. It doesn't need a centralized server while still giving you the benefits of a VCS.

It will also make it easy to synchronize the changes made on each PC to the others.

Answer 2

You may also look at Git : http://git-scm.com/

Answer 3

Read this chapter about keyword substitution in Subversion.

In short: you have to enable keyword substitution for your files via svn propset svn:keywords ... and insert the revision keyword in these files.

Answer 4

Don't know if one already exists, but you can write a Delphi plug-in (using its OTA interface) to achieve what you need. Although of course it won't work well if more than one developer works on the same file, unless you use an external, shared counter.

Answer 5

Note that locally hosting subversion can mean filesystem access. i.e. you don't even have to set http. Just point place the repository in your (already) encrypted hard disk, and instead of an URL, use a reference like \share\directory\svn\repo\project1 or C:\svn\repo\project1