TlistBox Index 0 out of bounds 0..-1

Question

I am using Lazarus 2.0.6 with Ubuntu 20.04

I have a TpageControl with 24 pages on it. Each page contains a TlistBox and a Tbutton. When yhe button is clicked, a new