var
I: Integer;
begin
Randomize; //!!!
for I := 1 to 50 do
begin
{ Write to window at random locations }
Canvas.TextOut(Random(Width), Random(Height), 'Boo!');
end;
end;
I: Integer;
begin
Randomize; //!!!
for I := 1 to 50 do
begin
{ Write to window at random locations }
Canvas.TextOut(Random(Width), Random(Height), 'Boo!');
end;
end;
解决方案 »
- delphi用ADO连接DB2数据库,有经验的帮帮忙
- delphi的高效率内存处理函数????
- 如何动态增加客户端对服务端的网络连接?
- 如何实现ListBox中的多选!(急啊~!~~各位大虾帮帮忙啊!)
- FastReport如何只打印满足一定条件的记录?例如
- 存储过程执行出现超时已过期!在Sql server查询分析器中执行没问题!但在程序中用ADO连接执行就提示超时已过期!
- 哈哈﹐終于又能上網了﹗
- 公司要设计一个物流C/S结构的系统,寻求建议,up有分
- 请问在一个机器上是否可以同时装Delphi 5,和Delphi6,不会有什么问题吧?
- 无效的授权说明
- 对昨天捧场的大虾们表示感谢!今天来问个关于调用外部程序的问题???
- 概念问题:指针和引用有什么区别?
你是不是在random()里面没有加参数啊
我运行正常