一些小技巧

1、将OpenDialog打开的图片显示到image控件：

//如果需要打开jpg图片，需要引用单元  uses jpeg;

image1.Picture.LoadFromFile(OpenDialog1.FileName);

2、产生随机数 

//uses math;



Randomize;  //初始化随机种子，否则结果相同。





Randomrange(0,5); //随机产生0至4的随机数。

random(5);   //随机产生0到4的随机数。

 3、修改Delphi工具控件的默认字体：

注册表：

Delphi 6:
    HKEY_CURRENT_USER\Software\Borland\Delphi\6.0
Delphi 7:
    HKEY_CURRENT_USER\Software\Borland\Delphi\7.0
下增加一个名为“FormDesign”的项，再在这个项下面新建一个字符串值：
新建字串：DefaultFont ，值为： 宋体,9
［注意不是原来的Form Design 项，新建项没有空格］