Forum: Multimedia
Delphi
by Corelgott,
24. Dez 2003
@himitsu
???
Den Grad wie grau das Bild sein soll kann man doch bei der Prozedur angeben! Die Variable HowGray steuert das. Bei einem wert von 0 ist das Bild komplett in Farbe und bei 255 ist das Bild komplett grau! (Kann auch anders rum sein :-D Ich bin zu faul zum nachdenken :!: )
Ich lege mal ne Beispiel-Zip mit ner Demo bei...
cya Corelgott
Forum: Multimedia
Delphi
by Corelgott,
23. Dez 2003
Tach auch,
Grau? Da bitte:
procedure TDraw.MakeGray(Image : TBitmap; HowGray : Byte);
var i, j : integer;
R, G, B, h : Byte;
p: ^PixArray;