Einzelnen Beitrag anzeigen

Benutzerbild von Jazzman_Marburg
Jazzman_Marburg

Registriert seit: 2. Aug 2004
359 Beiträge
 
#1

Benötige Hilfe bei C++ -> Delphi

  Alt 22. Apr 2011, 14:45
Hallo Gemeinde,
ich würde gern den mittleren RGB-Wert eines Bitmaps berechnen, und bin nun auf folgenden C++ Code gestoßen , von dem ich ahne , dass er ganu das macht, was ich bräuchte.
Problem: C++!
Hat jemand von euch vielleicht genügend C++ Kenntnisse um mir bei der Übersetzung nach Delphi zu helfen?
Delphi-Quellcode:
public static function averageColours( source:BitmapData, colours:int ):Array
{
   var averages:Array = new Array();
   var columns:int = Math.round( Math.sqrt( colours ) );

   var row:int = 0;
   var col:int = 0;

   var x:int = 0;
   var y:int = 0;

   var w:int = Math.round( source.width / columns );
   var h:int = Math.round( source.height / columns );

   for (var i:int = 0; i < colours; i++)
   {
      var rect:Rectangle = new Rectangle( x, y, w, h );

      var box:BitmapData = new BitmapData( w, h, false );
      box.copyPixels( source, rect, new Point() );

      averages.push( averageColour( box ) );
      box.dispose();

      col = i % columns;

      x = w * col;
      y = h * row;

      if ( col == columns - 1 ) row++;
   }


   return averages;
}
Probleme bereitet mir z.B. die Deklaration des Arrays:
var averages:Array = new Array();
Von welchem Typ ist das Array -- ist das ein dynamsiches Array?

Was sind BitmapData -- eine Var vom Typ TImage?

Ihr seht -- Hilfe wäre schon prima.

Vielen Dank
Jazzman
--- Delphi XE Starter, Windows 8 ---
  Mit Zitat antworten Zitat