Проблема с COM объектом.

[Son]

Изучаю COM в Delphi. Создал проложения. Добавил COM объект и в редакторе создал метод:

function TTestCOM.GetName: WideString;
begin
  Result:='123';
end;

В другом приложении пытаюсь вызвать метод:

  app_interf := CoSharedMemoryName.Create;
  ShowMessage(widestring(app_interf.GetName));
  app_interf:=nil;

Получаю ошибку доступа к памяти. В чем моя ошибка?