openpicturedialog hat probleme mit Verknüpfungen

[flattman]

Hallo,
ich habe gerade ein ganz komisches Verhalten beim openpicturedialog gefunden. Im Ordner Eigene Dateien gibt es ja die Verknüfung Beispiel Bilder (Win XP), wenn ich nun Bilder öffnen möchte und diese Verknüpfung mit makiert ist, sagt mir Delphi, dass die Bilddateierweiterung unbekannt ist.

Kann man das irgenwie fixen, umgehen oder so??
Kann ja nicht immer erst die Verknüpfung löschen lassen *gg*

Schonmal big thx

Flattman

[marabu]

Das unbekannte Bildformat hat bestimmt die Dateiendung .LNK - stimmt's?

Vor dem Öffnen der Datei könntest du auf diese Endung prüfen.

[flattman]

richtisccch

Problem ist nur, dass die Fehlermeldung schon beim Makieren kommt.

[marabu]

Ich habe folgendes in einem Minimalprogramm nachgestellt (D7 Enterprise):

Delphi-Quellcode:

with OpenPictureDialog do
  if Execute then
    ShowMessage(FileName);

Keine Probleme. Hast du irgenwo dran rumgedreht? Options?

[flattman]

Delphi-Quellcode:

  object OpenPictureDialog1: TOpenPictureDialog
    Filter =
      'Alle (*.jpg;*.jpeg;*.bmp;*.ico;*.emf;*.wmf)|*.jpg;*.jpeg;*.bmp;*' +
      '.ico;*.emf;*.wmf; *.png; *.gif|JPEG-Grafikdatei (*.jpg)|*.jpg|JP' +
      'EG-Grafikdatei (*.jpeg)|*.jpeg|Bitmaps (*.bmp)|*.bmp|Symbole (*.' +
      'ico)|*.ico|Erweiterte Metadateien (*.emf)|*.emf|Metadateien (*.w' +
      'mf)|*.wmf|GIF Compuserve File|*.gif|PNG|*.png'
    Options = [ofHideReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofNoNetworkButton, ofNoDereferenceLinks, ofEnableSizing]
    Left = 265
    Top = 161
  end

Habe an den Optionen etwas verstellt, aber wüsste nicht was diesen Fehler hervorrufen sollte.

MFG
Flattman

EDIT: Auch mit den Standarteinstellungen kommt diese Fehlermeldung.

[Waldteufel]

Hi.

Das ofNoDereferenceLinks ist schuld...

[edit] Es sorgt dafür, dass Verknüpfungen nicht verfolgt, sondern als Datei behandelt werden... [/edit]