[NumLock]

создай record с нужными полями...

Код:

type
  PGlobalData = ^TGlobalData;
  TGlobalData = record
    hWnd: HWND;
    uMsg: Cardinal;
    hDV2ControlHost: THandle;
    hShellTrayWnd: THandle;
    hButton: THandle;
  end;

      FileMappingHandle:=CreateFileMapping($ffffffff, nil, PAGE_READWRITE, 0, SizeOf(TGlobalData), FileMappingName);
      GlobalData:=MapViewOfFile(FileMappingHandle, FILE_MAP_ALL_ACCESS, 0, 0, SizeOf(TGlobalData));

  GlobalData^.hWnd:=hWnd;
  GlobalData^.uMsg:=uMsg;
  GlobalData^.hDV2ControlHost:=hDV2ControlHost;
  GlobalData^.hShellTrayWnd:=hShellTrayWnd;
  GlobalData^.hButton:=hButton;