مشكل في إجرائية حذف Button

[نصرالدين]

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

أما بعد فقد قمت بعمل النافذة التالية

كود :

http://www7.0zz0.com/2011/11/16/13/848332681.jpg

والتي تقوم بـ (الصورة التالية):

كود :

http://www7.0zz0.com/2011/11/16/13/489632121.jpg

المهم هو في الـButton الخاص بالحذف Delete
فهو لا يعمل كما ينبغي فلا يحذف الـButton الجدد
وقد أرفقت لكم الكود سورس مع البرنامج

و كيفية وضع إجراءات للـBUTTON الجدد
مثلا كجعل كل الـButton الجدد يغلق النافذة
للعلم فإني أستخدم دلفي 2009

والسلام عليكم.

[Agmcz]

السلام عليكم

كود :

TButton(Controls[ControlCount-1]).destroy;

[نصرالدين]

شكرا لك أخي ghost-dz

لكني لم أفهمك ما الذي تقصدة ولكن على العموم نجحت في عمل البرنامج بطريقة أخرى وهي Array of Button
والكود مرفق
يبدو أن البرنامج الأول به مشكل في المؤشرات أي في Button Add
سأحاول إصلاح الخلل في البرنامج الأول لأن هدفي عمل البرنامج بواسطة المؤشرات
ولمن لديه إقتراح أو وجد الخلل فليتفضل علينا به