如保控制一个小灯的亮和灭。 (0分)

  • 主题发起人 主题发起人 阿虫
  • 开始时间 开始时间

阿虫

Unregistered / Unconfirmed
GUEST, unregistred user!
我想通过一个RADIOBUTTON1来控制一个灯的亮灭,我是这样做的。
我先在FROM上放了一个IMAGE,然后载入一个绿色的小灯的图片。
我希望当我选择了RADIOBUTTON1时,小灯变成红色,不选时还是绿色。如何做到的。
请那位朋友教教我,谢谢了。
 
好像问题太那个了

在radiobutton1的OnClick事件中
if radiobutton1.checked then
Image1.Picture.LoadFromFile('红')
else
Image1.Picture.LoadFromFile('绿')
 
原来有一本VB的书说了一个简单方法,就是放两个(或多个--例如你要表示交通灯等时)
完全重合的Image控件,选择了RADIOBUTTON1时显示表示红灯的Image否则显示表示绿灯的
Image。
 
多谢二位了,我明白了,我去试试好了,谢谢你们。
 
楼上,两位老兄所说的方法好象不可行么,不是这样吧,那位老兄可以帮我再讲讲。
 
if radiobutton1.checked then
Image1.Picture.LoadFromFile('红.bmp')
else
Image1.Picture.LoadFromFile('绿.bmp')
image1.Invalidate;
应该没问题吧
 
好,我去试试。还有个问题,当我在FORM4中选取了RADIOBUTTON1的时候,我希望FORM1中的
RICHEDIT1。TEXT:=‘1234567890’;
可我在FROM1中的:
INTERFACE
USES:中添加了FROM4,
在FROM4中的:
INTERFACE
USES:中添加了FROM1,
可是编译通不过么,咋回事呢。不是这样做吗,请帮我讲讲啊,我没这样用过。

 
不在interface下面的uses里用,在implementation后面用uses
 
接受答案了.
 
后退
顶部