Einzelnen Beitrag anzeigen

alzaimar
(Moderator)

Registriert seit: 6. Mai 2005
Ort: Berlin
4.956 Beiträge
 
Delphi 2007 Enterprise
 
#6

Re: Liegt bei array of Werte hintereinander?

  Alt 10. Jan 2006, 21:19
Nach meinen kurzen Tests ist bei mir folgender Code noch schneller:
Delphi-Quellcode:
Function TImgProc.Min(map : Integer) : double;
var
   x,y,line: Integer;
   lsrc : TLayouer;
begin
     Result := 99999999.9;
     lsrc := fmap[map];
     for y := 0 to FHeight-1 do
     begin
          line := FWidth*y;
          for x := line to line+FWidth-1 do
          begin
            if(Result > lsrc[x]) then Result := lsrcp[x];
          end;
     end;
end;
Also, statt Pointeraddition ein Array. Matrizen sind dann wieder langsamer, da bei der Adressierung eine Multiplikation involviert ist.
"Wenn ist das Nunstruck git und Slotermeyer? Ja! Beiherhund das Oder die Flipperwaldt gersput!"
(Monty Python "Joke Warefare")
  Mit Zitat antworten Zitat