A mi algo así me funciona correctamente con verisones de EXE's y BPL's compilados con calquer versión de Dlephi.
Código Delphi
[-]var AMajor, AMinor, ABuild: Cardinal;
GetProductVersion(FileName, AMajor, AMinor, ABuild);
memo1.Lines.Text := Format('GetProductVersion %d.%d.%d',[AMajor, AMinor, ABuild]);
NOTA: El adjunto que has puesto solicita permisos para descarga. Deberías eliminar esa restricción.