![]() |
Bild zu Bitmap
Hi,
kennt ihr eine kostenlose Komponente oder Funktionen, welche sämtliche Dateiformate (also alle, die eine TImage Komponente in Delphi kann) in ein Bitmap (*.bmp) verwandeln kann. Ich weiß es gibt bei Tipps und Tricks Seiten solche Funktionen die dann zum Beispiel .jpg in .bmp oder .ico zu .bmp machen aber ich dachte mir ner Komponente der man einfach nur den Pfad und das AusgabeBitmap als Parameter gibt wäre einfacher. MFG Lars Wiltfang |
Re: Bild zu Bitmap
|
Re: Bild zu Bitmap
um jetzt mal auf einen anderen thread anzuspielen: such doch mal bei torry.net, da gibt's bestimmt was :stupid:
z.B. hier: ![]() |
Re: Bild zu Bitmap
Ich hatte gerade eine andere Idee. Könnte man nicht einfach die entsprechenden Formate in ein Image laden und dann das Graphics des Images zu nem Bitmap machen?
Ich habe hier in der CL folgenden Code gefunden:
Delphi-Quellcode:
Könntet ihr mis sagen wie ich den anwende?
procedure GetBitmap(const Graphic: TGraphic; out Bitmap: TBitmap);
begin if Bitmap = nil then Bitmap := TBitmap.Create; Bitmap.SetSize(Graphic.Width,Graphic.Height); Bitmap.Canvas.Draw(0,0,Graphic); end; Das hier:
Delphi-Quellcode:
geht nicht. Kommen Fehler.
GetBitmap(Image1.picture.Graphic, image2.picture.bitmap);
|
Re: Bild zu Bitmap
mach ne bitmap variable
Delphi-Quellcode:
Ist ausm Kopf, also nicht auf fehler geprüft aber müsste so gehen. Ab das mit SetSize geht und so ka.. hab ich noch nie gebraucht
var Bild : TBitmap;
begin GetBitmap(Image1.picture.Graphic, Bild); Bild.SaveToFile('test.bmp'); end; |
Re: Bild zu Bitmap
Delphi-Quellcode:
var Bild : TBitmap;
begin Bild := TBitmap.Create(); {oder} Bild := nil; //sonst Zugriffsverletzung. GetBitmap(Image1.picture.Graphic, Bild); Bild.SaveToFile('test.bmp'); end; |
Re: Bild zu Bitmap
Danke geht.
|
Re: Bild zu Bitmap
Ich halte es nicht für sinnvoll, Bitmap als out-Parameter zu deklarieren. Out bedeutet, dass man den alten Wert nicht benötigt, also erfordert die Überprüfung if Bitmap = nil eigentlich einen var-Parameter. Ich würde es hier aber sogar vorziehen, das Bitmap als const zu deklarieren und auf ein nil-Bitmap mit einer Access Violation zu reagieren.
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:22 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz