🚀 go-pugleaf

I don't think it's necessary to define a UserItem to
gray out an item. The following bit shuld work:

PROCEDURE GrayDItem(d:DialogPtr; item:Integer);
VAR
	itemType : Integer;
	itemHand : Handle;
	itemRect : Rect;
	pState : PenState;

BEGIN
	GetPenState(pState); {save the pen's state}
	GetDItem(d, item, itemType, itemHandle, itemRect);
		{Get the dialog item}

	PenPat(gray);
	PenMode(PatBic);	{set gray pen, PatBic drawing mode}

	PaintRect(itemRect);	{gray out the item}

	SetPenState(pState);	{restore the pen's state}
END;

This way, you don't need any UserItems, nor do you
have to worry about placing the items in correct order.

		--Rich
ig