delphi4arab منتديات دلفي للعرب

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

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

كود :
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;

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

M_Mori2010

sa7er100

onexite