دخول

MOUMEN78 · 29-08-2013, 03:30 PM

أستعمل قاعدة البيانات IB Expert (Firebird 2.5 .
لم أعد أستطع إضافة سجلات أخرى لكن عند حذف DBGRID تسير العملية عادية

.jpg

PRO.jpg (الحجم : 26.31 ك ب / التحميلات : 53)
.

.jpg

PRO2.jpg (الحجم : 18.65 ك ب / التحميلات : 50)

**S.FATEH** · 29-08-2013, 04:58 PM

هل تستطيع الاضافة من IB Expert الصور غير واضحة + ما الخطأ بالتحديد لا يمكننا تخمين المشكلة
يجب ان توضح اكثر و ستحصل على اجابة من الاعضاء ان شاء الله و السلام عليكم

MOUMEN78 · 31-08-2013, 01:53 PM

S.FATEH كتب :هل تستطيع الاضافة من IB Expert الصور غير واضحة + ما الخطأ بالتحديد لا يمكننا تخمين المشكلة
يجب ان توضح اكثر و ستحصل على اجابة من الاعضاء ان شاء الله و السلام عليكم

عندما تكون قاعدة البيانات فارغة أقوم بعمليات البيع عادية لكن بعد إغلاق البرنامج وفتحه مجددا وعند إضافة عملية بيع أخرى تقوم dbgrid بترتيب العملية الأخيرة في أول الجدول مع العلم أنه عند فتح قاعدة البيانات أجد الترتيب عادي/ ومن هنا يظهر لنا مشكل تكرار في رقم عملية البيع ومنه لا يمكن إضافة تسجيلة أخرى أنظر الصورة الأولى تجد أن الرقم 24 في أول القائمة وفي الصورة الثانية الرقم 24 مكرر ، ****ا أن تكون المشكلة واضحة وجزاكم الله كل خير.

**S.FATEH** · 31-08-2013, 02:14 PM

السلام عليكم
هل حقل رقم البيع auto inc ام انت من تدخله يدويا على كل حال حاول تغيير خاصية required للحقل الى false
انا سألتك اذا تستطيع الاضافة من IB Expert اذا استطعت الاضافة فالمشكلة من البرنامج اذا لم تستطع الاضافة فالمشكلة من قاعدة البيانات ....

MOUMEN78 · 31-08-2013, 03:49 PM

S.FATEH كتب :السلام عليكم
هل حقل رقم البيع auto inc ام انت من تدخله يدويا على كل حال حاول تغيير خاصية required للحقل الى false
انا سألتك اذا تستطيع الاضافة من IB Expert اذا استطعت الاضافة فالمشكلة من البرنامج اذا لم تستطع الاضافة فالمشكلة من قاعدة البيانات ....

يمكن الإضافة من IBEXPERT
أما لإضافة رقم في يخص رقم البيع فأنا عامل الكود:

كود :
var
s, v   :integer;
begin
ClientDataSet1.Filtered:=false;
         ClientDataSet1.Last;
         if (dbedit1.Text='') then
         begin
           v:=0;
         end
         else
         begin
         v:=strtoint(ClientDataSet1.FieldByName('N_VENTS').AsString)+1;
         end;

**S.FATEH** · 31-08-2013, 09:19 PM

السلام عليكم
راجع هذا الموضوع http://www.delphi4arab.net/forum/showthr...p?tid=1515
او يمكنك استخدام generator في firebird

MOUMEN78 · 02-09-2013, 01:41 PM

مشكور يا أخي لم يتم حل المشكلة بعد
قمت بتجربة قاعدة البيانات إلى sql server ولم أقع في هذه المشكلة
لكن برنامجي كبير ولا يمكنني تغيير قاعدة البيانات لأنها تتطلب وقت طويل
على العموم شكرا على الرد

**S.FATEH** · 02-09-2013, 03:56 PM

العفو اخي ان شاء الله احد الاخوة يساعدك لايجاد الحل

MOUMEN78 · 03-09-2013, 02:13 PM

لقد حللت المشكلة وكم هي سهلة وبسيطة ستجدها في الصورة

.jpg

GetMetadata.jpg (الحجم : 18.45 ك ب / التحميلات : 26)

دخول
اسم المستخدم/البريد الالكتروني :
كلمة المرور :	فقدت كلمة المرور ؟
	تذكرني بالمرة القادمة