png aus TImage herausspeichern als Bitmap

**bernhard_LA**

ich lade ein png Bild in eine TImage Kompente mit folgendem Code

Delphi-Quellcode:

			  gv = class (...)

      .....

      procedure execute;

      png  : TPngImage;

      end;

  try

    gv. ....

    gv.  ....

    gv.Execute;

    aImage.picture.Assign(gv.Png);

  finally

    gv.Free;

  end;

das ganz ist sehr ähnlich zu

http://stackoverflow.com/questions/2...o-cbuilder-xe5

Funktioniert auch soweit.

jetzt versuche ich das Bild mit diesem Code als *.bmp zu speichern

Image1.Picture.Bitmap.SaveToFile('c:\temp\myimage.bmp'); und bekomme 2 Probleme

a) Datei kann nicht geöffnet werden " Fehler ist leer , 0 Kbyte"
b) die Anzeige von Image1 (TImage) wird weiss.

png aus TImage herausspeichern als Bitmap

png aus TImage herausspeichern als Bitmap

Forumregeln