import QtQuick
import QtQuick.Controls
import QtQuick.Window

ApplicationWindow {
    width: 640
    height: 480
    visible: true
    title: qsTr("Monterey scrolling issue")

    ListView {
        id: listView
        anchors.fill: parent
        spacing: 3
        boundsBehavior: ListView.StopAtBounds
        model: 255

        delegate: Rectangle {
            border.width: 1
            border.color: "black"

            readonly property real tint: ((256 - 10 * (1 + index)) % 256) / (256)
            color: Qt.rgba(tint, tint, tint, 1)
            width: listView.width
            height: 50

            Text {
                anchors.centerIn: parent
                text: index
                color: (tint > 0.4) ? "black" : "white"
            }
        }
    }
}