Vielleicht so:
Delphi-Quellcode:
var s1,s2:Tstringlist;
begin
s1:=tstringlist.create;
s2:=tstringlist.create;
s1.LoadFromFile('datei1.txt');
s2.loadfromfile('datei2.txt');
if s1=s2 then showmessage('Die Dateien sind gleich')
else if strtofloat(s1[0])>strtofloat(s1[1]) then showmessage('Datei1 hat eine höhere Versionsnummer!')
else if strtofloat(s1[0])<strtofloat(s1[1]) then showmessage('Datei2 hat eine höhere Versionsnummer!');
Dabei müsste die Versionsnummer in der ersten Zeile liegen - ungetestet.
//edit: stringlist noch initialisiert - habs mal getestet das mit dem s1=s2 scheint nicht zu funktionieren und strtofloat ist ja auch Unsinn, da es ja keine Gleitpunktzahl sein muss
- warte lieber auf jemanden der kompetenter ist
