在标签名称中添加整数

时间:2019-01-22 15:28:18

标签: random integer label caption minesweeper

我有一个8x8的标签网格,我需要随机选择其中一些标签(它们的名称为label1..label64)并将其标题更改为('X')

有人可以建议一种方法来使用拉撒路吗?

randomize;
for i:=0 to StrToInt(EditMS. Text) do
    begin
    x:=random(63)+1;
    Label(x).caption:=('X');
end;

0 个答案:

没有答案