delphi4arab منتديات دلفي للعرب
استفسار عن حلقتين مع بعض - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : استفسار عن حلقتين مع بعض (/showthread.php?tid=3118)



استفسار عن حلقتين مع بعض - Agmcz - 22-05-2011

السلام عليكم
استفسار
أولا هل عملي صحيح هكدا
كود :
procedure TForm1.Button1Click(Sender: TObject); var i, ii : Integer; begin for i := 0 to Form1.Memo1.Lines.Count -1 do begin for ii := 0 to Form1.Memo2.Lines.Count -1 do Test(Form1.Memo1.Lines.Strings[i], Form1.Memo2.Lines.Strings[ii]); end; end;
أنا أود عند بدأ الحلقة i أخد Line 0 ودخول مباشرة في الحلقة ii وعدم الخروج منها حتى الإنتهاء
وبعدها الرجوع للحلقة i وإعادة دوران في ii مجددا ونفس الشيء حتى إنتهاء i أظن أن مثالي
واضح


استفسار عن حلقتين مع بعض - kachwahed - 24-05-2011

وعليكم السلام ورحمة الله
لم أفهم شيئا، هذا أشبه باللغز!
ما الذي تود عمله؟ ربما نجد طريقة أفضل...
وضح في مشروع جديد مرفق.



استفسار عن حلقتين مع بعض - me_delphi - 24-05-2011

وعليكم السلام ورحمة الله و بركاته

على مايبدو لي أني فهمت الأخ rami
إقتباس :أنا أود عند بدأ الحلقة i أخد Line 0 ودخول مباشرة في الحلقة ii وعدم الخروج منها حتى الإنتهاء
وبعدها الرجوع للحلقة i وإعادة دوران في ii مجددا ونفس الشيء حتى إنتهاء i أظن أن مثالي
واضح

الكلام الدي قلته هو مايجري في الكود

ولكي تعرف مايجري قم بعمل نقطة توقف على الحلقة الأولى و نفد الكود خطوة خطوة لتعرف كيف يتم التنفيد وقد تطرق الأ خوة لهاته الطريقة في دورة دلفي للعرب