PDA

View Full Version : درج در lmdlist box



Batman
سه شنبه 12 تیر 1386, 07:45 صبح
من از کامپوننت lmd listbox استفاده می کنم
میخواستم بدونم چجوری میشه توی یه سطر مثلا سه یا چهار ستون رو مقدار دهی کرد
ممنون از راهنماییتون

Saeid59_m
سه شنبه 12 تیر 1386, 12:36 عصر
توی خاصیت Item می تونی اضافه کنی . فقط باید بین ستونها علامت سیمیکالن بگذاری

مثلاً



LMDListBox1.Items.Add('Ali;Rezazadeh;Mashhad;3916' );

Batman
سه شنبه 12 تیر 1386, 18:23 عصر
آقا Saeid59_m دست گلت درد نکنه حل شد
اگه بخوام مقادیرش رو بخونم و تو یه جدول بریزم چجوریه؟
در ضمن چجوری مقادیر چند تا edit رو درج کنم (با هم)
mer30

Batman
چهارشنبه 13 تیر 1386, 06:50 صبح
دوستان کسی نظری نداره

Saeid59_m
چهارشنبه 13 تیر 1386, 07:42 صبح
برای سوال اول که چطوری مقادیر رو از لیست بخونی ، این کد رو ببین

خروجی A, B , C ,D همون فیلدها هستن



Var
i:integer;
A,B,C,D:String;
begin
For i:=0 To LMDListBox1.Items.Count-1 Do Begin
A:=LMDListBox1.ItemPart (i,0);
B:=LMDListBox1.ItemPart (i,1);
C:=LMDListBox1.ItemPart (i,2);
D:=LMDListBox1.ItemPart (i,3);


End;

end;


و برای سوال دوم در مورد Edit ها



A:=Edit1.Text;
B:=Edit2.Text;
C:=Edit3.Text;
D:=Edit4.Text;
LMDListBox1.Items.Add(A+';'+B+';'+C+';'+D);

Batman
جمعه 15 تیر 1386, 18:24 عصر
آقای saeid_59 دستت درد نکنه
مشکل حل شد
mer30