تطابق الكلمات باللغة العربية...

السلام عليكم...

أريد إنشاء برنامج يكون محمي بكلمة مرور بحيث لا يمكن لمستعمله مواصلة إستعمال البرنامج إلا إذا كان يعرف هذه الكلمة.

الفكرة ببساطة هي عبارة عن

- كلمة المرور هي منتدى توجد داخل قاعدة بيانات أكسس

- داخل الفورم أستعمل TntEdit1 و tntBitBtn1 وعند الضغط على هذا الزر يتم تفعيل الكود التالي:

procedure TIndex.TntBitBtn1Click(Sender: TObject);
begin
  ADOTable1.Active:= True;
  ADOTable1.First;
  if TntEdit1.Text = ADOTable1.FieldByName('Pass').Text then
    ShowMessage('كلمة المرور صحيحة')
    else
    ShowMessage('كلمة المرور خاطئة');
end;

المشكل أن البرنامج لا يستطيع التعرف على كلمة المرور...

كلما وضعت لة كلة مرور تحتوي على خمسة أحرف (نفس عدد حروف كلمة منتدى) يعتبرها صحيحة...

علما و أنني أستعمل:

- ويندوز اكس بي فرنسي تمت إضافة الإعدادات الخاصة باللغة العربية

- دلفي 7 نسخة انجليزية Entreprise Second Edition

- TntWare Components

و شكرا

ملاحظة بسيطة:

if TntEdit1.Text = ADOTable1.FieldByName('Pass').value

if TntEdit1.Text = ADOTable1.FieldByName('Pass').asstring

لا تغير شيئا من النتيجة النطلوبة... و شكرا