Populating Two column in Pascal

Following code can populate them:

with listview1.Items.Add do
begin
caption := ‘first Column’ ;
SubItems.Add(‘Second Column’);
end ;