مشكلة في حقل Increment field (فايربارد)

[لؤي]

السلام عليكم

لدى إستعمالي قاعدة بيانات من نوع firebird أنشأت جدول يحتوي على حقل تلقائي الزيادة (Auto-Increment fields) ولكن المشكلة أنه لا يضيف في كل إضافةجديدة. إستعملت تعليمات الـfirebird بإضافة trigger لكن دون جدوى :

كود :

CREATE TRIGGER autoincrementor_id FOR new_one ACTIVE BEFORE INSERT POSITION 0 AS BEGIN IF (NEW.col1 IS NULL) THEN NEW.col1 = GEN_ID(my_gen_id,1); END

بإستعمال مكون IBDataSet1 ممكن ضبط العملية كما تبين الصورة المدرجة لكن لم تعطيني المطلوب !!!