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