try
    { CreateFileMapping, when called with $FFFFFFFF for the hanlde value,
      creates a region of shared memory }
    FHandle := CreateFileMapping($FFFFFFFF, nil, PAGE_READWRITE,  0 ,
        Size,PChar(Name));
    if FHandle =  0  then abort;
   // err:= GetLastError =  0 ;
    { We still need to map a pointer to the handle of the shared memory region }
    FFileView := MapViewOfFile(FHandle, FILE_MAP_WRITE,  0 ,  0 , Size);
    if FFileView = nil then abort;
  except
   raise Exception.Create(Format('Error creating shared memory %s (%d)', [TempEventName , GetLastError]));
  end;