Raw-Bilder anzeigen

[Theseus]

Ich möchte gern RAW-Bilder anzeigen und bearbeiten. Seit Delphi 10 soll das möglich sein, wenn man das Format registriert. Ich arbeite mit Delphi XE (Win 7), aber es funktioniert nicht (CR2-Dateien von Canon EOS 550d, auch nach Umwandlung in DNG-Datei - wohl aber mit bmp-, jpg-, tif-, gif- und png-Bildern). Ich bekomme die Meldung 'ungültiges Bild' Irfanview kann die Bilder öffnen. Muss ich noch weitere Deklarationen einfügen? Hier mein Programm - Danke für jede Hilfe, Theseus

Delphi-Quellcode:

unit Unit1;
interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtDlgs, ExtCtrls, pngimage, jpeg, gifimg;
type
  TForm1 = class(TForm)
    Image1: TImage;
    Button1: TButton;
    OpenDialog1: TOpenDialog;
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;
var
  Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
    if OpenDialog1.execute then
    begin
      if pos('.CR2', uppercase(openDialog1.FileName)) > 0 then
        Image1.Picture.RegisterFileFormat('CR2','CR2 Format',TWICImage)
      else if pos('.DNG', uppercase(openDialog1.FileName)) > 0 then
        Image1.Picture.RegisterFileFormat('DNG','DNG Format',TWICImage);
      // for bmp, jpg, gif, tif, png do nothing but simply
      Image1.Picture.LoadFromFile(openDialog1.FileName);
    end;
end;
end.