Actually it dosen't work?
---------------------------
Debugger
Exception Notification
---------------------------
Project Project3.exe raised
exception class EOleSysError with message 'Unspecified error'.
---------------------------
Break Continue Help
---------------------------
Delphi-Quellcode:
class function CoMessenger.Create: IMessenger4;
begin
Result := CreateComObject(CLASS_Messenger) as IMessenger4; <<brake
end;