Bild zu Bitmap

[Larsi]

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

[Matze]

FreeImage

[Crazy Ivan]

um jetzt mal auf einen anderen thread anzuspielen: such doch mal bei torry.net, da gibt's bestimmt was

z.B. hier: http://www.torry.net/authorsmore.php?id=1314

[Larsi]

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:

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;

Könntet ihr mis sagen wie ich den anwende?

Das hier:
GetBitmap(Image1.picture.Graphic, image2.picture.bitmap); geht nicht. Kommen Fehler.

[NickelM]

mach ne bitmap variable

Delphi-Quellcode:

var Bild : TBitmap;
begin
GetBitmap(Image1.picture.Graphic, Bild);
Bild.SaveToFile('test.bmp');
end;

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

[Dani]

Delphi-Quellcode:

var Bild : TBitmap;
begin
Bild := TBitmap.Create();
{oder}
Bild := nil;
//sonst Zugriffsverletzung.
GetBitmap(Image1.picture.Graphic, Bild);
Bild.SaveToFile('test.bmp');
end;

[Larsi]

Danke geht.

[Apollonius]

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.