Vorschaubild im Explorer für eigenes Dateiformat?

[MaOfDe]

Hi,

programmiere zur Zeit einen Editor, dessen Erzeugnisse ich gerne über den Explorer anzeigen möchte, wie zum Beispiel in der Miniaturansicht oder die Vorschau im linken Rand. Ich hab leider nichts dazu in der DP gefunden, hat sich jemand schon mit sowas befasst?

Mfg

MaOfDe

[Olli]

Ja, kann man mit COM. Genauer gesagt mit Shell Extensions. Die meisten Dokumentationen zum Thema gehen aber nur auf C++ ein. Mir ist der Name des Interfaces jetzt entfallen, ich werde aber mal nachschauen. Sollte ich es vergessen, bitte per PN erinnern!

[sh17]

den Namen aber bitte mal hier posten.
Interessiert mich auch.

[chaosben]

Ich poste einfach mal ein Stück Unit-Kopf von unserem Quickreport-Preview.

Delphi-Quellcode:

TQRPreview = class(TAutoObject, IQRPreview, IQueryInfo, IExtractImage, IPersistFile)
  private
  protected
    {IQueryInfo}
    function GetInfoTip(dwFlags: DWORD; var ppwszTip: PWideChar): HResult; stdcall;
    function GetInfoFlags(out pdwFlags: DWORD): HResult; stdcall;

    {IPersistFile}
    function IsDirty: HResult; stdcall;
    function Load(pszFileName: POleStr; dwMode: Longint): HResult; stdcall;
    function Save(pszFileName: POleStr; fRemember: BOOL): HResult; stdcall;
    function SaveCompleted(pszFileName: POleStr): HResult; stdcall;
    function GetCurFile(out pszFileName: POleStr): HResult; stdcall;
    function GetClassID(out classID: TCLSID): HResult; stdcall;

    {IExtractImage}
    function GetLocation(Buffer: POleStr;
                         BufferSize: DWORD;
                         var Priority: DWORD;
                         var Size: Windows.TSize;
                         ColorDepth: DWORD;
                         var Flags: DWORD): HResult; stdcall;
    function Extract(var BitmapHandle: HBITMAP): HResult; stdcall;
  public
    procedure Initialize; override;
    destructor Destroy; override;
  end;

Und das Ganze implementiert man in einem ComServer.

[Olli]

IExtractImage ist der wichtige Teil dabei

(IQRPreview ist vermutlich ein Interface von euch, chaosben?)

[chaosben]

Zitat von Olli:

IExtractImage ist der wichtige Teil dabei

Ich stimme dir zu 99% zu. Mich dünkt aber, das IPersistFile auch einen Sinn hatte.

Zitat von Olli:

(IQRPreview ist vermutlich ein Interface von euch, chaosben?)

Ja und nein. Dieses Interface wird automatisch angelegt, wenn man ein neues COM-Server Projekt beginnt. (Natürlich dann mit dem enstprechenden Namen )