Einzelnen Beitrag anzeigen

Benutzerbild von _frank_
_frank_

Registriert seit: 21. Feb 2003
Ort: Plauen / Bamberg
922 Beiträge
 
Delphi 3 Professional
 
#7

Re: ein bild auf ein anderes zeichnen ?

  Alt 18. Okt 2007, 14:35
mhm, du willst die thumbnails aber mit delphi erstellen? nicht in dem uploadscript (php,perl, etc.)

bei delphi erstellt du dir einfach ein Tbitmap mit der entsprechenden Größe, und plazierst dein gestauchtes thumbnail zentriert dort drin.

weis jetzt nicht genau wo das Problem genau ist, vermute mal bei dem weißen Rand bzw. der zentrierten Ausrichtung...

Delphi-Quellcode:
bmp:=TBitmap.create;
bmp.width:=110;
bmp.height:=150;
//hier thumbnail erzeugen
thumb:=TBitmap.create;
thumb.loadfromfile(...);
//...stauchen

bmp.canvas.draw((bmp.width-thumb.width) div 2,(bmp.height-thumb.height) div 2,thumb);

thumb.free;
bmp.free;
sollte das Problem woanders liegen (beim stauchen z.b.) sag bescheid

HTH Frank
  Mit Zitat antworten Zitat