DC := GetWindowDC(GetDesktopWindow);
  SetBkMode (DC, TRANSPARENT);
  selectobject(dc, createfont(72,12, 120, 120, FW_NORMAL,
  0,0,0, DEFAULT_CHARSET, 0, 0, 1, 0, 'Times New Roman'));
  TextOut(DC, 150, 150, 'hi!', 3);
  ReleaseDC(GetDesktopWindow, DC);