PDA

View Full Version : با استفاده از Edit



Roya Rayane
یک شنبه 07 مرداد 1386, 13:01 عصر
سلام.
من در حال نوشتن یک برنامه هستم که نیاز دارد و قتی مثلا در یک editاسمی را وارد می کنیم اگر اسم قبلا تکرار شده هست با زدن حرف اول آن تمام اسم در زیر edit نمایش داده شود.(شبیه combobox)
یک نمونه که الان به ذهنم رسید همین وارد به سایت خودمون که وقتی user را وارد می کنیم
اگه قبلا هم وارد شده باشیم نام userخودکار نمایش داده می شو.

Batman
یک شنبه 07 مرداد 1386, 13:05 عصر
با سلام
چرا از خود combobox استفاده نمیکنی
آیا اسمهایی که داری از بانک loud میشه
اگه از بانک loud نمیشه باید از کامپوننت استفاده کنی
یه نمونش مال شرکت tms هستش اگه خواستی بگو تا برات آپلود کنم
موفق باشید

mzjahromi
یک شنبه 07 مرداد 1386, 20:09 عصر
یه کد رو برات مینویسم ولی از حفظ شاید فقط بتونی ازش ایده بگیری ولی برای عملی کردنش نیاز به تغییرات داشته باشه


ُEdit1KeyUp(Sender:TObject Key:word)
var
L:Integer;
Begin
L:=TEdit(Sender).SelStart;
if DataSet.Locate('FieldName',FieldValue,[lopartialKey]) then
Begin
TEDit(Sender).Text:=DataSet.fieldByName('FieldName ').AsString;
TEdit(Sender).SelStart:=L;
TEdit(Sender).SelLength:=Length(TEdit(Sender).Text )-L;
End;
End