拉
拉瓦格切
Unregistered / Unconfirmed
GUEST, unregistred user!
如何点一下按钮，就随机在FORM面板上出现100个红点 。哪位高手能把代码贴出来一下，感激不尽啊
G
ghostxp2006
Unregistered / Unconfirmed
GUEST, unregistred user!
你能给我多少分
0
001zqk
Unregistered / Unconfirmed
GUEST, unregistred user!
循環100次不就得了.
Var
i:Integer;
r:integer;
c:Integer;
begin
Randomize;
for i:=0 to 99 do
begin
r:=Random(self.ClientWidth);
c:=Random(self.ClientHeight);
self.Canvas.Pixels[r,c]:=clRed;
end;
end;
Var
i:Integer;
r:integer;
c:Integer;
begin
Randomize;
for i:=0 to 99 do
begin
r:=Random(self.ClientWidth);
c:=Random(self.ClientHeight);
self.Canvas.Pixels[r,c]:=clRed;
end;
end;
X
xf-wangyi
Unregistered / Unconfirmed
GUEST, unregistred user!
Form长天花[
]
]
R
ranyang
Unregistered / Unconfirmed
GUEST, unregistred user!
有意思
H
hhjjhhjj
Unregistered / Unconfirmed
GUEST, unregistred user!
青春豆
B
babibean
Unregistered / Unconfirmed
GUEST, unregistred user!
001zqk的是正解
拉
拉瓦格切
Unregistered / Unconfirmed
GUEST, unregistred user!
多谢啊
