delphi caption问题

来源：百度知道 编辑：UC知道 时间：2024/05/24 08:39:25
我想用Label1.Caption:=' '
弄一个button1点击一下随机显示出其中一个
e.g Label1。Caption:=‘ggg’
Label1. Caption:='hhh'
当button1点击‘ggg’与‘hhh’以百分之50的几率随机弹出
我是新手，语言有些不通，请原谅

begin
Randomize;
case Random(2) of
0:label1.caption := 'ggg';
1:label1.caption := 'hhh';
end;
end;

用随机数，会自动产生数值，可以按自己的方法转换成字符串就可以了。