استعمال الباركود في جلب المعلومات من قاعدة البيانات

[justnick]

ماذا لو كان الfocus بعيد عن edit1 ؟؟
===
الحل كان عن طريق برمجة القارئ نفسه باضافة prefix عند استخدامه واستخدمت ال prefix علامة الدولار ساين "$"

فى الForm جعل الخاصية KeyPreview:=True
وفى الحدث onkeypress للفورم نجعله ينتظر الرمز "$" ثم يضع الFocus فى الEdit1

كود :

if key = '$' then begin Edit1.SetFocus; end;

فى الحدث onkeypress للEdit1 ينبغى علينا حذف الprefix قبل القيام بعملية البحث

كود :

if key = '$' then begin key := #0; end;