type
  TacAttachedLabelPosition = (lpAbove, lpBelow, lpLeft, lpRight);