TPicture in TImage verschieben (auch PNG, etc.)

[Destroxi]

Hey.
Ich hab ein TImage und will mein TPicture darin verschieben - dies soll auch mit PNG's (TLMDPNGImage) und JPegs (TJPEGImage) usw. klappen.
Hat jemand eine Idee?

PS: Es muss nicht umbedingt ein TImage sein; es soll eine Abgrenzung Breite = X Höhe = Y geben und in der soll man es verschieben können.
Falls es so eine Frage schon gibt, sorry, ich habe nix gefunden was mir geholfen hat.

Mfg, Destroxi

[Bummi]

TPaintBox im OnDraw Canvas.Draw(X,Y,Graphic)

[Destroxi]

Danke für die schnelle Antwort,
weißt du auch wie ich ein Canvas-Handle auf ein TImage bekomme, wenn ich ein (z.B.) TLMDPNGObject drin habe (oder auch TJPEGImage)?

Mfg, Destroxi

[DeddyH]

TImage.Canvas.Handle, oder was meinst Du jetzt?

[EWeiss]

Ich denke er versucht wie in diesem Beitrag erwähnt
das irgendwie umzusetzen.

gruss

[Destroxi]

Ne, das ist was anderes
Wenn ich das TImage.Canvas nehme, gehts nur bei Bitmaps..
Ich will aber wenn ich
TImage.Picture.Assign(TLMDPNGObject); mache, auch mit PNG's und JPG's ein Handle haben.

PS: Ich brauche es nur für Canvas.Pixels!
Und auch nur zur Abfrage, nicht zur beschreibung.

Wie geht das ? ^^

Mfg, Destroxi

[DeddyH]

Versuch es mal mit TImage.Picture.Bitmap.Canvas.Handle.

[Destroxi]

Das klappt doch aber nicht bei PNG's...

Mfg, Destroxi

[Popov]

Code:

Wenn ich das TImage.Canvas nehme, gehts nur bei Bitmaps..

Schon mal was von TImage.Picture gehört? TImage.Picture.Bitmap, TImage.Picture.Jpeg usw.


Was ich jetzt schreiben ist nur meine Kenntnis, die kann auch falsch sein, also mit Vorsicht genießen.

Man kann viele Formate laden und anzeigen lassen, aber eine Canvas hat nur die Bitmap. Wenn, dann muß zuerst in Bitmap konvertiert werden und dann wieder zurück.

Das gilt meines Wissens nach nur für die Standard-Grafiken. Es steht jedem frei eine eigene PNG Klasse zu erstellen und dort eine Leinwand anbieten die und der auch den Namen Canvas geben. Aber soweit ich weiß hat das was Delphi selbst anbietet keine Canvas, bis auf Bitmap.

[DeddyH]

Um ganz sicher zu gehen, kannst Du temporär eine TBitmap erzeugen und mit Assign den Inhalt aus TImage.Picture.Graphic hineinkopieren. Das ist vielleicht nicht ganz das, was Du willst, aber so hast Du garantiert einen Canvas, mit dem Du arbeiten kannst.