Registriert seit: 2. Aug 2003
Ort: Aschersleben
1.362 Beiträge
Delphi 5 Professional
|
Re: Geladenes Jpeg wieder leeren
24. Okt 2003, 21:22
Delphi-Quellcode:
jp:=TJPEGImage.create ;
try
jp.loadfromFile('c:\britta.jpg');
//b:=TBitmap.Create;
//b.assign(jp);
//sb2.max:= b.Height-pb1.Height;
//sb1.max:= b.width-pb1.Width;
// Bitblt(pb1.canvas.handle,0,0, pb1.ClientWidth,
// pb1.clientheight,b.canvas.handle,sb1.position,
// sb2.Position,srccopy);
finally
jp.free;
end;
wobei du den ganzen anderen mist vergessen kannst, ist aus meiner scanner anwendung.
|
|
Zitat
|