Schnelles Laden von jpegs [Speicherleck]

[arnold mueller]

Man kann auch das Bitmap Property von TJPegImage nutzen indem man es in einer Ableitung veröffentlicht.

TAdvJPegIMage=class(TJPegImage)
public
property Bitmap: TBitmap;
end;

Bezogen auf die ursprüngliche Frage bedeutet das:

1. Bild laden
2. Property Scale setzen
3. Bitmap in eine Paintbox malen


img: TAdvJPegIMage;

img.loadfromfile(...);
img.scale := "jsViertel" -> weiss gerade nicht die genaue Bezeichnung
paintbox1.cancas.draw(0,0,img.bitmap.handle) -> so im Prinzip