Bild auf Bitmap kopieren

[Antigo]

Hi,
folgende Situation: Ich male mit Canvas auf ein Bitmap, um es anschliessend mit bitblt auf eine paintbox zu kopieren. Jetzt möchte ich allerdings statt der weissen oder wie auch immer einfarbigen Malfläche des Bitmaps, ein Hintergrundbild einfügen, auf das ich dann meine Sachen male.
Es gibt zwar die Funktion LoadFromFile, aber hier gibt es zwei Probleme:
Erstens möchte ich das Bild in das Programm einbinden und nicht lose mitrumschleppen.
Zweitens möchte ich keine bmp datei benutzen, da sich der Speicherverbrauch gegenüber jpg verhundertfacht.

Also, wie binde ich ein JPG Bild in mein Programm ein und wie kopiere ich es anschliessend auf mein TBitmap?


Vielen Dank schonmal im vorraus :)

[Skullschildi]

soweit ich weiss wird das bild, wenn es dem programm beim compilieren schon bekannt is(in nem image geladen) in die exe eingebaut.

[Antigo]

jo das stimmt, aber wie komme ich an das bild das in dem Image liegt? ich hab schon versucht mit bitblt das ganze auf ein anderes bitmap zu kopieren in dem ich auf image.picture.bitmap.canvas.handle ( :roll: ) zugegriffen hab, aber da kam nichts bei rum.

[Namenloser]

Such mal nach "Ressource" ([dp]res*ource[/dp])

Damit kannst du Bilder in die Exe einkompilieren. Ansonsten gäbe es noch die möglichkeit einer TImagelist. Dasd bietet sich aber nur bei kleinen Grafiken mit der gleichen größe an.

[Antigo]

ok ich hab das Bild jetzt als JPG File in einem TImage in mein Projekt eingebunden. Teil 1 des Problems ist also gelöst. Teil 2 besteht noch. WIe kann ich den Inhalt des Bildes auf ein TBitmap zeichnen?

[SirThornberry]

TGraphic hat eine Methode Draw im Protected abschnitt. Mit ZielBitmap.Canvas.Draw kannst du zum Beispiel eine beliebige TGraphic auf die Canvas ausgeben. Somit hast du das Bild auf der Canvas und kannst es dann verwenden.
Im übrigen ist ein JPEG auch nur im Dateiformat kleiner. Sobald es darum geht dass das eigentliche Bild berechnet/hergestellt wurde verbraucht es im Speicher genau so viel weil es genau so viel Bildpunkte hat.

[Antigo]

ok dann werde ich das malausprobieren. danke :)

Es geht mir beim Speicher einfach nur darum, das die exe datei nicht unnötig groß werden soll.

dank an alle ;)

[Antigo]

tja das ganze hat leider nicht funktioniert.

Delphi-Quellcode:

background.Canvas.Draw(0,0,hintergrund.Picture.Graphic);

backround ist ein TBitmap, hintergrund eine TImage.

Das Bitmap bleibt leider völlig weiss :/

edit: sry hat sich erledigt, ich hatte nur ein bsclear vergessen, :oops:

danke nochmal

[Cöster]

Mit Image1.Picture.Bitmap erhält man imho am einfachsten das Bitmap eines Images.