简单问题！！！！！！！！！！ (15分)

I

inbreak

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-24

• #1

我有一个 combobox 。。
style 属性为：csDropDownList
items 属性设置有
1
2
3
4
5
6
7
8
9
有一个edit1，，我想当 在 edit1 中输入一个数字（当然这个数字是1至9）时.。
combobox 的text 值就为等于我 edit1 中的数值。。。。

如：我在edit1 中输入5 .。那个 combobox 中的值也为5.。

 

B

bbs-wqt

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-24

• #2

你把combobox换成dblookupcombobox就行了。

 

I

inbreak

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-24

• #3

?

 

S

sqlai

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-24

• #4

ComboBox1.ItemIndex:=strtoint(edit1.text)-1;

 

R

ReallyFail

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-24

• #5

ComboBox1.itemIndex:=ComboBox1.Items.IndexOf(edit1.text);

 

W

whitehorse

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-24

• #6

combobox.text:=edit1.text;

 

任

任豆豆

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-24

• #7

在EDIT的onChange或OnKeyPress中写代码
如:
procedure TForm1.Edit1Change(Sender: TObject);
begin
case StrToInt(Edit1.text) of
1,2,3,4,5,6,7,8,9 :ComboBox1.itemIndex:=ComboBox1.Items.IndexOf(edit1.text);
end;

end;

 

I

inbreak

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-24

• #8

to ReallyFail:
非常感谢你！！！！！！！！

同时也感谢大家的参与，谢谢~~~~~~~~~~~~~~~

 

I

inbreak

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-03-24

• #9

接受答案了.