Rainer
Hero Member
    
Offline
Beiträge: 1666
|
 |
« Antworten #2 am: 08.03.2002, 16:58:38 » |
|
Mal 2 Vorschläge (ungetestet)
[font size=2 face="Courier New"][font color="#000080"]//in Zahlen umwandeln [/font]var z1, z2: Integer; begin z1 := StrToInt(StringReplace(Edit1.Text, '.', '', [rfReplaceAll])); z2 := StrToInt(StringReplace(Edit2.Text, '.', '', [rfReplaceAll])); if z2 < z1 then ShowMessage('Version in Edit2 ist kleiner'); end;
[font color="#000080"]//direkt vergleichen [/font]begin if CompareStr(Edit1.Text, Edit2.Text) > 0 then ShowMessage('Version in Edit2 ist kleiner'); end; [/font][/font]
|