Hallo,
Zitat von
Uwe Raabe:
Man kann das Ganze auch in einen Int64 packen, dann stehen 4 mal 16 Bit zur Verfügung...
die
VCL stellt sogar einen passenden Typ dafür bereit:
Int64Rec aus der
Unit SysUtils.
Delphi-Quellcode:
var
V1, V2 : Int64Rec;
begin
V1.Words[0] := 0; // Buildnummer
V1.Words[1] := 0; // Revisionsnummer
V1.Words[2] := 0; // Nebenversionsnummer
V1.Words[3] := 3; // Hauptversionsnummer
V2.Words[0] := 1;
V2.Words[1] := 0;
V2.Words[2] := 0;
V2.Words[3] := 2;
if (Int64(V1) <= Int64(V2)) then
ShowMessage ('V1 ist kleiner oder gleich V2');
Gruß Hawkeye