PDA

View Full Version : انتخاب یک مقدار از فرم دیگری برای DBCombobox



salmanuniversity
چهارشنبه 11 مهر 1386, 20:31 عصر
سلام.
من یک فرم A دارم و یه فرم B .
فرم B جستجو و فرم A نشون دهنده مقدار انتخاب شده است.
حالا می خوام ببینم اگه یه BDLookUpCombobox توی فرم A داشته باشم چه جوری
می تونم اون مقدار انتخاب شده روی فرم B رو به صورت اتومات انتخاب شده این
DBcombo توی A قرار بدم . یعنی به محض Close شدن فرم B توی فرم A این DBCombo مقدار انتخاب شده در فرم B رو داشته باشه .
ضمنا اینم بگم مقدار معتبره و توی بانک اطلاعاتی موجود .
اگه سوالم رو متوجه نشدین بگین تا به صورت واضح تری بنویسم . ممنون .

SYNDROME
چهارشنبه 11 مهر 1386, 20:54 عصر
با سلام
کد زیر را می توانی استفاده کنید.


For i:=0 To ComboBox.Items.Count-1 Do
Begin
IF (ComboBox.Items.Strings[i] = DBlookupComboBox.Text) Then
Begin
ComboBox.ItemIndex := i;
Break;
End;
End;

کد فوق مقدار کلیه آیتمهای combo را با مقدار DblookupComboBox مقایسه می کند و سپس مقدار Index را تغییر می دهد.
موفق باشید

salmanuniversity
پنج شنبه 12 مهر 1386, 09:27 صبح
سلام .
از کدی که نوشتی ممنون.
ولی متوجه نشدم چه جوری باید استفاده کنم.
اگه میشه بیشتر توضیح بده.

SYNDROME
پنج شنبه 12 مهر 1386, 20:41 عصر
با سلام
1-اول مقدار مورد نظر را در dblookupcombobobx انتخاب کن.
2-سپس کد مقابل را در زمان خروج از فرم قرار بده.(مثلا در onClose فرم)
3-سپس برنامه به تعداد آیتمهای داخل Combobox حلقه را تکرار می کند.
4-به ترتیب کل مقادیر را با مقدار dblookupچک کرده و هر کدام از مقادیر برابر باشد Combobox بر روی آن می ایستد و از حلقه خارج می شود.
موفق باشید