TPicture in TImage verschieben (auch PNG, etc.)

[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

[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.

[Destroxi]

Ja, das kann ich machen, wird wohl auch sein Ziel bringen, ist nur halt nicht ganz so professionell^^
Aber erstmal werd ich diese Möglichkeit nehmen, Danke

Edit: Ich kriegs nich umgewandelt -.-
Assign gibt Access Vioulation Fehler ...

Delphi-Quellcode:

procedure JPEGtoBMP(const FileName: TFileName);
var
  jpeg: TJPEGImage;
  bmp:  TBitmap;
begin
  jpeg := TJPEGImage.Create;
  try
    jpeg.CompressionQuality := 100; {Default Value}
    jpeg.LoadFromFile(FileName);
    bmp := TBitmap.Create;
    try
      bmp.Assign(jpeg);
      bmp.SaveTofile(ChangeFileExt(FileName, '.bmp'));
    finally
      bmp.Free
    end;
  finally
    jpeg.Free
  end;
end;

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.