نعم أخي لقد عدت اليك و انا جد آسف ان تاخرت عليك و بعثرت لك برنامجك فانا في فترة الامتحانات
و اماعن البحث فتوجد عدة طرق البحث بالمفتاح الرئيسي أم بالفهارس ..
سأضع لك عدة طرق و انت اختار :
طريقة FindKey و هنا في المثال عندنا جدول فيه اسماء الطلبة ونبحث برقم الطالب فان عثر عليه اخرج اسمه و لقبه
PHP كود :
table2.open ;
table2.First;
if not table2.FindKey ([edit1.text]) then
showmessage ('etudiont no trouvv ') ;
begin
edit2.Text := t2nom.text ;
edit3.Text := t2prenom.Value ;
end ;
طريقة GotoNearest الذهاب الى الأقرب و لها عدة اشكال و من الأحسن ان تجعل الكود التالي في edit فالطريقة تتحس للحروف فمثلا تريد البحث عن الرقم 2222 فعندما تكتب 2 يذهب المؤشر الى السجل 2 و عندما تضيف 2 اي 22 يذهب المؤشر الى ذلك السجل وهكذا حتى تصل الى 2222
و تستطيع البحث في حقل الاسم اذا كان مفهرس لان الطريقة خاصة بالفهارس
PHP كود :
table2.open ;
table2.First;
t2.IndexFieldNames := 'num' ;
table2.EditKey ;
table2.FieldByName('num').AsString := e6.text ;
t2.GotoNearest ;
طريقة EndOfFile نهاية الجدول ان صح التعبير
تشبه الطريقة الأولى
PHP كود :
table1.first;
while not table1.eof do
begin
if table1nom.value = edit1.text then
begin
edit2.text := table1prenom.value;
end;
table1.next;
end;
و بالمناسبة يوجد العديد من الطرق مثل loucat .. و ان لم تلبي المذكورة غرضك سأوافيك بالطرق الأخرى
و***** اني افدتك و معذرة مرة أخرى على التأخير لانه من الاجدر ان نجيب على كل سؤال طرح ف اوانه
بالتوفيق
كيف استطيع البحث في قواعد البيانات
