TBitBtn: Bild skalieren mit BitBlt

Thema durchsuchen

Ansicht

Themen-Optionen

TBitBtn: Bild skalieren mit BitBlt

Ein Thema von messie · begonnen am 9. Nov 2010 · letzter Beitrag vom 10. Nov 2010

Vorheriger Beitrag

Nächster Beitrag

messie

Registriert seit: 2. Mär 2005
Ort: Göttingen
1.592 Beiträge

Delphi 2009 Professional

TBitBtn: Bild skalieren mit BitBlt

9. Nov 2010, 18:21

Moin,

ich habe gerade das Problem, dass ich ein Bild auf einem BitBtn nicht skaliert bekomme.

markieren

Code:

			BM = new TImage(Form1);

BM->Picture->Bitmap = BitBtn1->Glyph;

BitBlt(BitBtn1->Handle,0,0,Floor(BM->Width/3),Floor(BM->Height/3),BM->Canvas->Handle,0,0,SRCCOPY);

Ich habe auch probiert, das TImage über stretch zu verkleinern, aber das wird ja anscheinend nur anders gezeichnet ohne es wirklich zu verkleinern.

Sieht jemand den Fehler?

Danke, Messie

P.S. gibt es nur noch Codetags für Delphi?

Geändert von messie ( 9. Nov 2010 um 19:06 Uhr)