كيفية معالجة خطأ List Index Out Of Bound

[jeanjamil]

السلام عليكم

كود :

var i: Integer begin   for i := Low(FVle) to High(FVle) do     if PopValuesend.PopupComponent = FVle[i] then     begin   (FVLE[i].DeleteRow(FVLE[i].row ; end;

هذه مصفوفة Tvaluelisteditor  عند التشغيل  Run Without Debugging  يعمل بدون مشاكل
لكن عند التشغيل العادي احصل على خطأ 
...(EstringListError With message List Index Out Of Bound(3
3 هو رقم السجل المراد حذفه

[لؤي]

السلام عليكم
تحقق جيدا من السجل الذي تود حذفه حسب الخطأ تود الوصول إلى مؤشر غير موجود
إستعمل معالجة الأخطاء لتفادي مثل هاته الحالات 

PHP كود :

 Try
     ... 
     The code we want to execute
     ...
   Except
     ...
     This code gets executed if an exception occurs in the above block
     ...
   end; 


[Ben.Ja]

وعليكم السلام, ممكن تفصل أكثر مالذي تريد إنجازه؟

[kerbadou]

لغات البرمجة تبدأ التعداد من الصفر
ربما عليك ان تعدل الكود كما يلي:
for i := Low(FVle) to High(FVle) -1 do