¿como hago para comprobar si un nº de versión es mayor o menor?

[delphi.com.ar]

Empezado por rgstuamigo

Asi:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var v1,v2:Integer;
begin
v1:=StrToInt(StringReplace(Edit1.Text,'.','',[rfReplaceAll]));{reeplazo los puntos(.) por Vacio ('') y 
convierto el string resultante en Integer  } 

v2:=StrToInt(StringReplace(Edit2.Text,'.','',[rfReplaceAll]));// Igual aqui
 if (v1 > v2) then
  ShowMessage(Edit1.Text)
else if (v1 < v2)  then
     ShowMessage(Edit2.Text)
     else ShowMessage('Son Iguales');
end;

Saludos...

Mmmmm.. si compraras las versiones "1.1.0.10" contra "10.0.0.0" te dirá que la primera es mayor.

Si ya tienes armado el string, simplemente tienes que descomponerlo en números separándolo por los puntos y comparar parte a parte, mientras sean iguales de izquierda a derecha, en cuanto un valor es superior al otro, ya tienes identificado cual es la versión mayor.

Pero pregunto... este valor lo estas obteniendo con la winapi GetFileVersionInfo?... porque de ser así puedes comparar directamente los resultados de la misma.

Saludos!