delphi4arab منتديات دلفي للعرب

السلام عليكم إخواني :
برنامجي مزود بقاعدة بيانات برادوكس ، و عند استعماله لعدة شهور أو ايام يتوقف البرنامج عن العمل و يرسل رسالة تقول بأن الفهرسة ليست محينة
( les index ne sont pas a jour) فأقوم بحذف les fichiers index مثل px فيعود البرنامج للعمل و لكن بإرسال رسالة تقول بأن : Table : aucun index .
فهل توجد طريقة لإعادة فهرسة المفاتيح الأساسية آليا عند إقلاع البرنامج ( Reindexation ) و شكرا

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

يمكن ان تستدعي DbiRegenIndexes
شيئ مثل

كود :
Table1.Close;
Table1.Exclusive := True;
Table1.Open;
try
DbiRegenIndexes(Table1.Handle);
except
end;
Table1.Close;
Table1.Exclusive := False;

السلام عليكم ورحمة الله وبركاته ،
اسمح لي أخي الحبيب أن أقدم نصيحة بالمناسبة ،
أنصحك أخي بالانتقال الفوري إلى نظام قواعد البيانات أكثر أمنا و استقرارا ، ومنها FireBird إذا كانت تطبيقاتك ستعمل على الشبكة ،
أما إذا كانت تطبيقات لا تعمل على الشبكة فالخيار الأفضل هو Sqlite.
سامحني على هذه النصيحة. Blush

بارك الله فيكما على الرد السريع ( [size=small][size=medium][b]BM.AbdelAziZ[/size][/size][/b][size=small] و Unprogramme )[/size]

[size=small]لكن أريد بعض الاستفسار فيما يخص استدعاء dbiregenindex أين أضع هذا الكود ليتماشى مع اقلاع البرنامج ( executable).[/size]
استفسار آخر إذا سمحتم هل هذا الكود لجميع الجداول لاعادة الفهرسة أم لجدول table1 فقط . و جزاكم الله خيرا.

الكود فوق وضع كمثال فقط للتوضيع وليس لينسخ ويلصق ببرنامجك وهو لجدول واحد فقط

جزاكم الله خيرا على الرد و السلام عليكم

عبد الإله

محمد عبد العزيز

أبو معاذ

عبد الإله

محمد عبد العزيز

عبد الإله