Rect ir = r.Shrink(WidgetDimensions::scaled.fullbevel).Shrink(RectPadding::zero, WidgetDimensions::scaled.fullbevel);

		int y = ir.top;

		int pos = this->vscroll->GetPosition();

		for (const auto &item : this->list) {

			int item_height = item->Height();

			/* Skip items that are scrolled up */

			if (--pos >= 0) continue;

			if (y + item_height - 1 <= ir.bottom) {

				Rect full{ir.left, y, ir.right, y + item_height - 1};

				if (selected) GfxFillRect(full, PC_BLACK);

				item->Draw(full, full.Shrink(WidgetDimensions::scaled.dropdowntext, RectPadding::zero), selected, colour);

			}

			y += item_height;

		}

	}

	void OnClick([[maybe_unused]] Point pt, int widget, [[maybe_unused]] int click_count) override

	{

		if (widget != WID_DM_ITEMS) return;

		int item;