15-03-2011, 09:50 AM
السلام عليكم
أختي نينا،
ممكن توضيح أكثر
أنا فهمت :
1- أنك تريدين عدم تكرار رقم الموظف
ج: إستعملي خاصية Key في قاعدة البيانات عند حقل رقم الموظف .
2- أما بخصو البحث استعملي الفلترة
إليك الكود للبحث :
ضعي هذا في Edit1 = OnChange
استبدلي:
Code باسم الحقل الذي تريدين البحث بداخله
Table باسم قاعدة البيانات الموظفين
أختي نينا،
ممكن توضيح أكثر
أنا فهمت :
1- أنك تريدين عدم تكرار رقم الموظف
ج: إستعملي خاصية Key في قاعدة البيانات عند حقل رقم الموظف .
2- أما بخصو البحث استعملي الفلترة
إليك الكود للبحث :
ضعي هذا في Edit1 = OnChange
كود :
IF edit1.GetTextLen<> 0 then
begin
Table.Filter:='Code='''+Edit1.Text+'*''';
Table.Filtered:=true;
end
else begin
Table.Filtered:=false;
end;استبدلي:
Code باسم الحقل الذي تريدين البحث بداخله
Table باسم قاعدة البيانات الموظفين

