Zwei Versionen über „for“ vergleichen

[xZise]

Hallo ihr,

zur Zeit vergleiche ich zwei Versionen folgendermaßen:

Delphi-Quellcode:

  if NewMajor <= Major then
  begin
    if NewMinor <= Minor then
    begin
      if NewRelease <= Release then
      begin
        if NewBuild <= Build then
        begin
          FNewVersion := false;
        end else
          FNewVersion := true;
      end else
        FNewVersion := true;
    end else
      FNewVersion := true;
  end else
    FNewVersion := true;

Wie kann ich das nun in eine Schleife umwandeln, wenn man statt 8 separate Variablen zwei eindimensionale Array hat?

Zur Zeit sieht es so aus:

Delphi-Quellcode:

  Result := true;
  for i := 0 to High(oldVersion) do
  begin
    if newVersion[i] < oldVersion[i] then
      Result := false;
  end;

Aber dort gibt es das Problem, dass das Ergebnis wahr wird, wenn die Versionen identisch sind. In diesem Falle, hätte ich aber gerne ein negatives Ergebnis (s.o.).

MfG
xZise

[DeddyH]

Könnte das nicht so funktionieren (ungetestet)?

Delphi-Quellcode:

Result := false;
i := 0;
while (i < Length(oldVersion)) and not Result do
  begin
    case Sign(newVersion[i] - oldVersion[i]) of
      -1: break;          //newVersion ist älter -> raus hier
       1: Result := true; //newVersion ist neuer
    end;
    inc(i);
  end;

[SirThornberry]

ich würde es so machen:

Delphi-Quellcode:

var
  i: Integer;
  len: Integer;
begin
  i := 0;
  len := length(old_version);
  while (i < len) and (old_version[i] = new_version[i]) do
    inc(i);
  result := (i = len);

[DeddyH]

Und was machst Du, wenn die "alte" Version neuer ist?

[inherited]

warum packst du die Versionsnummern nicht in einen 32Bit-Int und schaust ob deine Versionsnummer kleiner oder gleich der anderen ist?

[DeddyH]

Dann dürfen die einzelnen Array-Elemente nicht größer als 255 sein (wird wohl auch so sein, aber ich wollte mal darauf hinweisen ).

[inherited]

Das Programm will ich sehen, das bei Version 255 ist

[SirThornberry]

ups, hab gedacht es geht nur um unterschiedlichkeit - wieder die hälfte ni gelesen.

[Uwe Raabe]

Zitat von DeddyH:

Dann dürfen die einzelnen Array-Elemente nicht größer als 255 sein (wird wohl auch so sein, aber ich wollte mal darauf hinweisen ).

Man kann das Ganze auch in einen Int64 packen, dann stehen 4 mal 16 Bit zur Verfügung...

[DeddyH]

Naja, letztendlich muss das der TE entscheiden