Benötige Hilfe bei C++ -> Delphi

[Medium]

Karfreitags arbeiten ist auch nicht wirklich kopffreundlich, da muss ich dir voll zustimmen, weil ich kann das grad echt gut nachfühlen
Die Zerlegung könnte man ggf. auch der Einfachheit halbar zuvor machen, so dass man die Durchschnittsbestimmung einfach N*M Mal mit den zerschnibbelten Teilbitmaps rennen lässt. Hält die Funktion an sich ne Spur universeller.

Happy möglichst baldigen Feierabend!

[DarkItachi]

Ich habe nichts zu tun..

Delphi-Quellcode:

type
  TColorAverage = array of TColor;

function AverageColors (source: TBitmap; colours : Integer): TColorAverage;
{
   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
   }

var
  averages : TColorAverage;
  columns, row, col: Integer;
  w, h, x, y : Integer;
  i: Integer;
  rectangle: TRect;
  box: TBitmap;
begin
  columns := round(sqrt(colours));
  row:= 0;
  col:= 0;
  x:= 0;
  y:= 0;

  w:= round(source.Width / columns);
  h:= round(source.Height / columns);

  SetLength(averages, colours);

  for i := 0 to colours -1 do
  begin
    rectangle:= rect(x, y, w, h);
    box:= TBitmap.Create;
    box.Width:= w;
    box.Height:= h;
    box.Transparent:= False;

    //copyPixels(
  end;
end;

Bei CopyPixels komm ich nicht weiter. Ich weiß nicht was ich dafür nutzen soll. Aber einen Ansatz hast du jetzt

[EWeiss]

Zitat:

Bei CopyPixels komm ich nicht weiter. Ich weiß nicht was ich dafür nutzen soll. Aber einen Ansatz hast du jetzt

RGBQuad ?

gruss

[Medium]

Ich schnall grad auch erstmal, dass der o.g. Code ja nur das Zerlegen macht. Das Berechnen der Durchschnitte ist dort in die Funktion averageColour() ausgelagert, die nichtmals angegeben ist. Das wäre dann das, was mein Schnipsel nur macht. averageColours() dagegen, also das ganze Teil (man beachte den Plural), zerschneidet und legt die Teildurchschnitte in ein Array. Sorry! War da nicht mal die Rede von nem Tomaten-auf-den-Augen-Smilie?