كيف اضيف كلمات الى Columns 1 و Columns 2 في ListView

[M_Mori2010]

السلآم عليكم ورحمةا لله وبركاته
كيف يمكنني ان اضيف الكلمات الى Columns 1 و Columns 2 علماً ان الاضافة الى Columns 0 بغاية السهولة لكني عجزت عن ايجاد الطريقة؟
شكراً لكم

[sa7er100]

وعليكم السلام
هل هذا قصدك ؟؟

كود :

procedure TForm1.FormCreate(Sender: TObject); var i:byte; begin ListView1.ViewStyle := vsReport; for i := 0 to2 do ListView1.Columns.Add ; ListView1.Column[0].Width:=70; ListView1.Column[1].Width:=25; ListView1.Column[0].Caption:='اسم'; ListView1.Column[1].Caption:='هنا' ; end;

[onexite]

PHP كود :

with lv1.Items.Add do  begin
 Caption:='aaaa';
 SubItems.Add('bbbbbbb') ;
 SubItems.Add('cccccccccc') ;
end;