Warum so kompliziert; sein Vorhaben lässt sich so bewerkstelligen:
Delphi-Quellcode:
For i:=1 to 20 do
ListBox1.Items.Add(inttostr(i) + '² = ' + inttostr(i*i));
Edit: In diesem Fall ist es links (find ich besser), aber ich schätze mal du kommst locker drauf, wie das ganze auszusehen hat, wenn du es rechts haben willst.