+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : محو العناصر من categorypanelgroup واعادة انشائها (/showthread.php?tid=9005)
محو العناصر من categorypanelgroup واعادة انشائها - jeanjamil - 12-11-2017
السلام عليكم
هذا الكود يظهر خطا ْ
(List index out of bounds(4
for del := 1 to CategoryPanelGroup1.Panels.Count do
begin
([CategoryPanelGroup1.RemoveControl(CategoryPanelGroup1.Panels[del
; end
if not opendialog1.execute then
; halt
(ClientDataSet1.LoadFromFile(OpenDialog1.filename
for I := 0 to ClientDataSet1.RecordCount-1 do
begin
(newPanel := CategoryPanelGroup1.CreatePanel(self
;as tcategorypanel
ما المشكل وما الحل , وهذا حين بحتوي الجدول على 4 سجلات