Einzelnen Beitrag anzeigen

Benutzerbild von Aphton
Aphton

Registriert seit: 31. Mai 2009
1.198 Beiträge
 
Turbo Delphi für Win32
 
#2

AW: RGB Werte von Bilder mit Farbtiefe mehr als 8bit (z.B.16bit, 32bit) abfragen

  Alt 17. Feb 2011, 01:18
Ich weiß nicht, inwiefern das bei der von dir benützten Komponente unterstützt wird, aber sofern du einen Pointer zu den Pixeln holen kannst, ist der Rest doch ein Klax, oder?
Falls das mit Scanline klappt, hier mal ein Beispiel:

Delphi-Quellcode:
{ !ungetestet! }
var
  Channel: PWord;
  i: Integer;
  r, g, b: Word;
begin
  Channel := <ImageKomponente>.Scanline[<ImageKomponente>.Height-1];
  for i := 0 to <ImageKomponente>.Height * <ImageKomponente>.Width - 1 do
  begin
    r := Channel^;
    inc( Channel );
    g := Channel^;
    inc( Channel );
    b := Channel^;
    inc( Channel );
  end;
end;
das Erkennen beginnt, wenn der Erkennende vom zu Erkennenden Abstand nimmt
MfG
  Mit Zitat antworten Zitat