OpenPictureDialog und verschiedene Bildformate

[tobi1701]

hallo,

ich habe gerade ein problem mit den tOpenPictureDialog.
ich habe ihn in ein programm eingebaut, in das bilder eingeladen werden sollen und zwar aus beliebigen formaten.
im object inspector zeigt der OpenFileDialog unter Filter auch sehr viele formate an (obwohl das ja nur der suchfilter für die dateien im dialog ist, oder?), aber in aktion sieht das ganz anders aus.
der Dialog kann von sich aus nur nach .dip .bmp .ico .emf und .wmf suchen.
wenn ich *.* in das suchfeld eingebe, erscheinen zwar die anderen bilder, aber schon beim markieren (vorschau soll geladen werden), stürzt das programm ab.

wie kann ich also die verschiedenen formate wirklich öfnnen?

ich öffne den dialog folgendermassen:

Delphi-Quellcode:

if OpenPictureDialog1.Execute then begin
  Image1.Picture.LoadFromFile(OpenPictureDialog1.Filename);

und wie kann ich das .gif format hinzufügen?

[MarcoWarm]

ich könnte falsch liegen, aber:

Damit ein TPicture eine bestimmte Bildklasse verarbeiten kann muss sie vorher registriert werden:

z.B.

Code:

TPicture.RegisterFileFormat('PNG', 'Portable Network Graphics', TPNGObject);

das wird normalerweise in der Unit der ensprechenden Klasse bei initialization gemacht.
Es müsste also reichen die entsprechende Unit in dein Projekt einzubinden.

In unserem Beispielfall die Unit PNGImage.pas

[tobi1701]

ach, das ist ja witzig, das wusste ich gar nicht.
ich sehe gerade, dass die unit bei delphi (6.0 pe) gar nicht dabei ist.
kennst du vieleicht eine seite, auf der man die units für die gängigsten bildformate finden kann?

[MarcoWarm]

PNG ist noch bei keinem Win32 Delphi dabei gewesen.

die Klassen musst du dir leider zusammensuchen... aber geht ganz schnell via www.torry.net

[tobi1701]

vielen dank für den link. ich bin noch recht neu dabei (bzw. nach sehr langer pause wieder dabei) und froh über jeden link, der mich zu guten resourcen führt.

edit:

was allerdings noch immer ungeklärt ist, ist wieso ich mit einem standard OpenImageDialog keine .jpeg datei öffnen kann.
ich kann dem TImage, das der dialog für mich öffnen soll, über den object inspector problemlos ein .jpeg zuweisen. aber im OpenImageDialog ist das nicht möglich. wieso?

[Khabarakh]

Um ein JPEG zur Laufzeit zu laden, musst du die Unit "JPEG" einbinden. Im PropertyEditor kannst JPEGs laden, weil die PropertyEditor-Unit die JPEG-Unit schon einbindet.

[Pfoto]

Ich weiß nicht, ob du diese Libary schon kennst:
GraphicEx

Die musst Du nur in die Uses-Klausel aufnehmen und bekommst dadurch zahlreiche Bildformate zur Verfügung gestellt.

Gruß
Pfoto

[tobi1701]

gerade wollte ich posten, dass ich die GraphicEx gefunden und eingebunden habe ;)

als kleiner tip, falls das hier noch jemand liest: in der datei "GraphicConfiguration.inc" muss die LZW-kompression noch kurz aktiviert werden, da sie aus lizenzrechtlichen gründen per default nicht aktiviert ist. ansonsten funktioniert das .gif (und .tiff) format nicht.


edit:

hm, ich habe da noch ein kleines problem, es passt zwar nicht ganz hierher, aber ich frage trotzdem mal:
ich habe eine form, die ich mit ShowModal zeige. auf dieser form ist ein TImage, in das ein bild über den besagten OpenPictureDialog geladen wird.
wenn die form geschlossen wird (mit mrOk oder mrCancel) und später wieder mit ShowModal geöffnet wird, ist aber das bild im TImage natürlich immer noch sichtbar.

meine frage ist jetzt: wie kriege ich das wieder in den "grundzustand"?
mit .free oder .destroy bekomme ich fehler (es kann ja auch sein, dass in das Image gar nichts geladen wurde, das Image ist nur optional).

[TeronG]

Zitat:

Zitat von tobi1701

ansonsten funktioniert das .gif (und .tiff) format nicht.

TGifImage funtzt bei mir recht schön ...

[dahead]

mhh, ich würde einfach beim onclose (oder bei deinen buttons) das image auf visible := False setzen. beim laden via TOPD dann halt wieder auf visible.