Puedes mirarte la ayuda de las funciones FindClose, FindFirst, y FindNext ...
en concreto Findnext:
Código Delphi
[-]
function FindNext(var F: TSearchRec): Integer;
type
TSearchRec = record
Time: Integer;
Size: Integer;
Attr: Integer;
Name: TFileName;
ExcludeAttr: Integer;
FindHandle: THandle;
FindData: TWin32FindData;
end;
Con ella sacas la fecha de un archivo dado, y con ello puedes controlar la "versión" de ese archivo.