Delphi 7 32-Bit localization of App does not work (Exception)

[paule32.jk]

Hello,

I have the following Code-Snip from the reinit.pas of the RichEditor Demo of Delphi 7.
I would like to localisize my Application with different Languages.
I get a exception in the inner "try finally" block.
What did I wrong ?

Edit: woops, English, sollte Deutsch sein !!!

Code:

...
  ResStream := TResourceStream.Create(HInst, ResName, RT_RCDATA);
  try
    AsInheritedReader := TAsInheritedReader.Create(ResStream, 4096);
    try
      Instance := AsInheritedReader.ReadRootComponent(Instance);
      // here, exception occur !
    finally
      AsInheritedReader.Free;
    end;
  finally
    ResStream.Free;
  end;
...

Gruß, paule

[Union]

Du solltest ReadRootComponent() nicht aufrufen, das passiert automatisch. Stattdessen:
ReadSignature(), ReadPrefix(), ReadStr(), ReadProperties().