关于ComboBox.Visible的应用问题，求助！ ( 积分: 20 )

P

pandame

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-22

• #1

我已经添加了5个ComboBox，它们的.visible设为了fasle。
for i:=1 to 5 do
begin
ComboBoxi.Visible:=true;
end;
当我添加上面这段程序后，再运行就会报出以下的错误信息，请问到底是怎么回事呢？：
Project operation.exe raised execption class EAccessViolation with message'Access violation at address 0043262B'operation.exe'.Read of address 00000057'.Process stopped.Use step or Run to continue.

 

P

pandame

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-22

• #2

我已经添加了5个ComboBox，它们的.visible设为了fasle。
for i:=1 to 5 do
begin
ComboBoxi.Visible:=true;
end;
当我添加上面这段程序后，再运行就会报出以下的错误信息，请问到底是怎么回事呢？：
Project operation.exe raised execption class EAccessViolation with message'Access violation at address 0043262B'operation.exe'.Read of address 00000057'.Process stopped.Use step or Run to continue.

 

D

dyfh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-22

• #3

ComboBoxi？可以这么写的吗？

 

P

power2010

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-22

• #4

天啊,这样也可以写,晕倒

 

墨

墨剑

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-22

• #5

怎么不行呀，他放了一个叫ComboBoxi的控件。否则怎么编译得过去？

 

A

ahhlian

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-22

• #6

老实点，一个一个来吧
ComboBox1.Visible:=true;
ComboBox2.Visible:=true;
ComboBox3.Visible:=true;
ComboBox4.Visible:=true;
ComboBox5.Visible:=true;

 

Y

youngwind

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-22

• #7

for i:=1 to 5 do
begin
ComboBoxi.Visible:=true;
end;
有创意，偷懒的好方法。

 

G

GoMyWay

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-22

• #8

只有5个并不多，就用：
ComboBox1.Visible:=true;
ComboBox2.Visible:=true;
ComboBox3.Visible:=true;
ComboBox4.Visible:=true;
ComboBox5.Visible:=true;
就好了。。。。。

 

P

pandame

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-22

• #9

for i:=1 to n do
begin
ComboBoxi.Visible:=true;
end
这个n是不确定的啊。

 

C

chen_liang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-22

• #10

厉害，这种写法都有，

 

C

chen_liang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-22

• #11

使用FindComponent函数来完成你的功能

 

P

pandame

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-22

• #12

钻研了半天英文帮助，FindComponent是用来确定一个指定的组件是否属于另一组件。返回值是组件列表中与AName相同的组件？不太清楚
function FindComponent(const AName: string): TComponent;

 

M

mpeg001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-24

• #13

for I := 0 to componentcount-1 do
begin
if (Components is Tcombobox) then
(Components as Tcombobox).visible:=true
end;

 

P

pandame

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-26

• #14

我知道了：
var
tiaojian:array[1..500]of TcomboBox;
for i:=1 to m do
begin
tiaojian:=TComboBox.Create(self);
tiaojian.Parent:=shuruForm;
tiaojian.left:=160;
tiaojian.Top:=176+25*i;
tiaojian.Height:=21;
tiaojian.Width:=49;
tiaojian.ItemIndex:=0;
tiaojian.TabOrder:= 6;
[red]?[/red] tiaojian.Items.Strings[1]:= //但是我想在它们的items里放入‘<’、‘>’、‘=’以作为选择的条件，这句怎么写呢？

 

C

cloudmjh

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-11-26

• #15

http://www.fm201.com/down.htm
相关的 源码 这儿有 希望能对你有帮助

 

P

pandame

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2005-12-01

• #16

tiaojian.items.add('<=');