PDA

View Full Version : نمایان شدن اطلاعات



مهدی ص
سه شنبه 22 آذر 1384, 01:29 صبح
سلام
چطور میتوان در یک Text.edit وقتی (به فرض کد کالا) وارد شود بقیه اطلاعات آن هم ظاهر شود لازم به ذکر است پایگاه داده هم درست کرده ام یعنی اطلا عات را از پایگاه داده دریافت کند و در edit.text ها نمایش دهد.
باتشکر
:لبخندساده

hr110
سه شنبه 22 آذر 1384, 06:52 صبح
اگر تعداد رکوردها و حجم اطلاعات نمایشی زیاد باشد انجام این عمل با فشار هر کلید کمی سرعت برنامه را کم خواهد کرد. توصیه : بعد از وارد نمودن کد توسط کاربر و خروج از کنترل(TEdit) و یا فشار کلید Enter میتوانید جستجو را انجام داده واطلاعات را به کاربر نمایش دهید. نمایش اطلاعات بهتر است در یک label یا StaticText باشد. متدی که برای خروج استفاده میکنید : onExit و فشار کلید Enter متد onKeyPress خواهد بود.

babak869
سه شنبه 22 آذر 1384, 21:05 عصر
با دستورات Locate میتونی اون فیلد خاص رو پیدا کنی


Table1.Locate('My_Field',edit1.Text,[loPartialKey]);

اونوقت مقدار هر فیلد رو به ادیت باکس نسبت بدی البته با انتخاب Dbedit احتیاج به این کار نخواهی داشت


Edtit2.Text:=Table1Name.Asstring;
Edit3.Text:=Table1Family.AsString;
.....

موفق باشید

m-khorsandi
چهارشنبه 23 آذر 1384, 14:30 عصر
پیشنهاد میکنم از Query برای جستجو استفاده کنید.

babak869
چهارشنبه 23 آذر 1384, 21:28 عصر
البته به قول دوست خوبم جناب خرسندی عزیز بهترین و مطمئن ترین روش استفاده از کوئری هستش.اما دستورات بالا هم چندان بی کاربرد نیستند.شما برای استفاده از کوئری به اینصورت عمل کنید :


Query1.Active:=FALSE;
Query1.SQL.Clear;
Query1.SQL.Add('SELECT * ');
Query1.SQL.Add('FROM Table1');
Query1.SQL.Add('WHERE (family LIKE ''%'+ EDIT1.TEXT+'%'') ');
Query1.ExecSQL;
Query1.Active:=TRUE;

موفق باشید