PDA

View Full Version : locate یا filter بین دو فرم



maisam57
شنبه 27 آبان 1385, 08:43 صبح
من دوفرم ایجاد کردم
توی اولین فرم table1 و یه datasource قراردادم و ارتباطشون رو برقرار کردم
توی فرم دوم datasource و یک dbgrid قراردادم
حالا میخوام از فرم دوم عمل فیلتر یا locate رو روی table1فرم اول انجام بدم
این کارو رو کردم ولی جواب نداده


uses unit1

توی formshow اینو نوشتم


form2.table1.open;
dbgrid.datasource:=form2.datasource
form2.table1.locate('lname',trim(edit1.text),[]);

ولی هیچی جواب نمیده
با تشکر

mzjahromi
شنبه 27 آبان 1385, 08:57 صبح
منظورت اینه که Locate نمیکنه؟
این مساله ربطی به اینکه از چند تا فرم استفاده میکنی نداره

maisam57
شنبه 27 آبان 1385, 09:00 صبح
دقیقا همینطوره
اصلا عمل locate بین دو فرم انجام نمیشه

mzjahromi
شنبه 27 آبان 1385, 09:02 صبح
احتمالا مشکل از Locate است
همون دستورات رو توی فرم اول هم اجرا کنی نمیشه

maisam57
شنبه 27 آبان 1385, 09:03 صبح
چرا آقای ذولقدر من معمولا دستور locate رو اینجوری اجرا میکنم و مشکلی پیش نماید
--------------------
آقای ذولقدر من قبلا اینکارو کرده بودم و بدون مشکل locateشده بوده و لی الان نه filter انجام میشه و نه locate

maisam57
شنبه 27 آبان 1385, 09:16 صبح
آفای ذولقدر کد سورس رو براتون تستی گذاشتم

MNosouhi
شنبه 27 آبان 1385, 11:03 صبح
آقا میثم گل به جای دستور زیر

Form2.Table1.Locate('lastname', Trim(Edit1.Text),[])
این رو بنویس :
Form2.Table1.Locate('lastname', Trim(Edit1.Text),[loCaseInsensitive])
راستی وقتی میخای سورس آپلود کنی لازم نیست کل پروژت رو رو بغرستی فقط فایل های با پسوند dpr,pas,dcu,dfm کفایت میکنه (اینطوری 365 کیلوبایت میشه 20 کیلو بایت) . هم برای خودت بهتره و هم برای ما.

mzjahromi
شنبه 27 آبان 1385, 11:07 صبح
من دستور Locate رو به شکل زیر تغییر دادم درست شد.


Form2.Table1.Locate('lastname', Trim(Edit1.Text),[lopartialkey])

برای اینکه خطا نگیره در قسمت Uses یونیت DB رو هم اضافه کن