الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيفية جعل edit ينزل كل الكلمات التي تبدأ بالحروف التي كتبت عليه للاخنيار

مغلق
بدأه محمد نجيب في 7 ديسمبر 2006 · 5 رد · 1,190 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

لدي edit في الفورم و اريد لما يكتب عليه الحرف يعطيك كل اكلمات التي تبدأ بذلك الحرف و الكلمات مخزونة في قاعدة البيانات

يعني مثل الدلفي لما اكتب edit1.te يظهر لي لتتمة الكلمة text

#2

و عليكم السلام, قم باستخدام ComboBox عادية و اضبط الخاصية style على القيمة csSimple لتحصل على ما تريد

و لكن عليك ان تضيف ال Items بشكل يدوي

مثلا عند انشاء الفورم تقوم بتعبئة هذا ال ComboBox بال Items و ذلك بعمل حلقة على البيانات التي تريد تعبئتها و من ثم تستخدم التابع Add لل Items

اهلا بك في المنتدى :) و لكن حاول ان تبحث اولا قبل وضع سؤالك

رب اجعلني مقيم الصلاة ومن ذريتي ربنا وتقبل دعاء.

لا تنسى: "العقل مثل العضلة كلما استخدمته أكثر كلما ازدادت قوته"

#3

esslame alikem

procedure TForm1.Edit1Change(Sender: TObject);

begin

if edit1.Text ='' then

table1.Filtered:=false

else

begin

table1.Filtered:=true;

table1.Filter:='NOM='''+edit1.Text+'*''';

end;

DBLookupListBox1.Height:=table1.RecordCount*10;

end;

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

#4

بارك اله فيك الاخ المشرف لكن ليس هذا ما قصدت

الاخ زكريا بارك الله فيك لكن الكود مخربط شوية لكن ساحاول معرفة الفكرة و تجريبها مشكووووورين

#5

السلام عليكم

هذا ما مقصده الأخ زكريا

بالتوفيق

RM31.zip

عن ‏ ‏أسامة بن زيد قال: ‏قال رسول الله - ‏صلى الله عليه وسلم -: ( من صنع إليه معروف فقال لفاعله جزاك الله خيرا فقد أبلغ في الثناء ) .

رواه الترمذي و قال ‏هذا ‏ ‏حديث حسن جيد غريب.

و صححه العلامة الألباني في صحيح الترغيب

www.sahab.net

#6

بارك الله فيك

زكيري من فضلك او عبد العالي يكون احسن

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…