+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : ما طريقة جمع كل الاعداد الموجودة في Item ووضعها بمكون Edit (/showthread.php?tid=4513)
ما طريقة جمع كل الاعداد الموجودة في Item ووضعها بمكون Edit - M_Mori2010 - 04-09-2012
السلام عليكم ورحمة الله وبركاته
ماهي طريقة جمع كل مافي Item.caption في Edit
جربت هذه لكن لن افلح
PHP كود :
all_user:=all_user+lv1.Items[i].Caption;
se1.Value:=strToint(all_User);
ما طريقة جمع كل الاعداد الموجودة في Item ووضعها بمكون Edit - King SofT - 04-09-2012
وعليكم السلام
كود :
var i:integer;
all_user:String;
begin
for i:=0 to ListView1.Items.Count-1 do
all_user:=all_user+ListView1.Items[i].Caption;
se1.Value:=strToint(all_User);لكن بهذه الطريقة سوف يقوم بالدمج لا بالجمع مثال 2+2=22
اما اذا كنت تريد الحساب فتبع هذا :
كود :
var i,all_user:integer;
begin
all_user:=0;
for i:=0 to ListView1.Items.Count-1 do
all_user:=all_user+strToint(ListView1.Items[i].Caption);
se1.Value:=all_Userما طريقة جمع كل الاعداد الموجودة في Item ووضعها بمكون Edit - M_Mori2010 - 04-09-2012
شكرا اخي الكريم الحمدلله تمام جزاك الله كل خير وشكراً ع المعلومة بالفعل استفدت