Bitmap strecken

[dizzy]

Eindeutig die Graphics32 ;)
Alle anderen Verfahren bieten imho nur Stretching nach dem "nearest Neighbor"-Verfahren - also stupide Pixelvervielfältigung. WIrd blockig ohne Ende. Evtl. auch noch lineare Intpl., die aber wie gesagt auch nicht ganz das gelbe vom Ei ist.
Vorgehen bei der G32:
Nach installation "GR32" in die Uses-Klausel aufnehmen, und alles was ein TBitmap war zum TBitmap32 machen.

Delphi-Quellcode:

var
  bmp1, bmp2: TBitmap32;
begin
  bmp1 := TBitmap32.Create;
  bmp2 := TBitmap32.Create;

  bmp1.LoadFromFile('c:\ich bin ein Pfad\ich ein Bild.bmp');

  bmp2.Width  := bmp1.Width div 2;
  bmp2.Height := bmp1.Height div 2;

  bmp1.StretchFilter := sfLanczos; // Muss also beim Source-Bitmap gewählt werden!

  bmp1.DrawTo(bmp2, bmp2.BoundsRect, bmp1.BoundsRect);
end;

Damit wäre das Bild nun in seiner Größe halbiert, und bleibt dabei schön :).
Als Stretchfilter eingebaut sind:
Nearest Neighbor
lineare Intpl.
Spline-Intpl.
Mitchell
Lanczos (der imho die schönsten Ergebnisse bringt, aber auch der langsamste ist.)

Weitere Vorteile der G32:
- TBitmap32.Pixels[x,y] ist quasi so schnell wie die Scanline-Variante
- Antialiastes Zeichnen von Linien etc. (mit Koordinaten in Integer, Singe, Double, oder einem eigenen Festkommatyp)
- Pixels[x,y] gibts auch in diversen antialiasten Varianten
- Volle Ünterstützung eines 8-Bit Alphakanals
- insgesammt sehr schnell und flexibel
- brauchbar dokumentiert :!:
- Es kommen Visuelle Kompos mit: TImage32, TBitmap32List, TPaintBox32, TRangeBar, TGaugeBar, TImgView32 (quasi ein Image mit Scrollbox - SEHR praktisch :))

Ich empfehle die G32 immer sehr gerne, da sie den komplettesten Ersatz für die doch etwas langsamen Delphi-Kompos darstellt, und in der Handhabung aber kaum anders sind! :love:

Wenn du ein Grafik-Prog schreibst, kannst du dir insgesamt damit das Leben leichter machen.

Nächtsle,
dizzy

[Jörn]

Du hast mich überzeugt, ansehen werde ich es mir auf jeden Fall einmal. Aber ich denke, trotzdem werde ich nach obigem Prinzip einmal eine Funktion zum Stretchen schreiben, allein um ein wenig die Problematik dahinter verstehen zu können.