Forum: Multimedia
Delphi
by Mattze,
31. Jan 2009
Hallo,
ich habe natürlich weitergespielt.
Und so geht es:
procedure TForm1.Button2Click(Sender: TObject);
var pic: TPicture;
begin
pic:=TPicture.Create;
try
pic.Assign(image1.picture);
Forum: Multimedia
Delphi
by Mattze,
31. Jan 2009
Danke,
mag ja alles stimmen, aber nun verstehe ich rein gar nichts mehr!
Vergesst mal bitte GraphicEx.
Formular mit 2 Image, 3 Button und ein OpenPictureDialog (OPD).
(Das Label ist nur so, damit ich weiß, was ich ausgewählt habe.)
Die Click-Events.
Das ganze bitte mit JPG probieren, wenn Ihr wollt.
procedure TForm1.Button1Click(Sender: TObject);
Forum: Multimedia
Delphi
by Mattze,
31. Jan 2009
Nee,
ich glaube nicht!
Noch mal am konkreten Beispiel zum Problem:
Ich lade eine png-Graphic per GraphicEx in Image1.picture.graphic.
Diese Graphic hat (komischerweise) eine Bitmap-Entsprechung in
Image1.picture.bitmap. (Z. B. kann man da ohne Probleme Image2.picture.assign(image1.picture.bitmap) machen!
Ich lade jpg (ohne GraphicEx). Da gibt es keine Bitmap-Entsprechung...
Forum: Multimedia
Delphi
by Mattze,
31. Jan 2009
Hallo,
wenn ich (mit GraphicEx) verschiedene Bilder in Image.picture.graphic lade, gibt es auch für verschiedene Formate ein Image.picture.bitmap. Für einige Formate aber nicht (z. B. jpg, zumindestens, wenn es nicht per GraphicEx geladen wird.)
Wie bekomme ich nun heraus, ob es eine Bitmap dazu gibt oder nicht?
Assigned(Image.picture.bitmap) macht es nicht.
Image.picture.bitmap.handle<>0...