(free pascal 完整开源) 写了个随机数生成.. 不进来会后悔的XD - pascal吧

level 1

swx1995 楼主

无聊写了这么个玩意儿。。
free pascal除了库都是原创..库我自己也改了不少不然fpc编译不通过

2011年05月01日 06点05分 1

level 1

swx1995 楼主

Tech:
Windows GUI，Gdi+, DoubleBuffer, SelfUI, Timer, MouseEventTracking
代码太多了不贴了，直接扔博客地址
http://vistaswx.blogbus.com/logs/124540126.html
编译需要打开-Sd参数，如C:\FPC\2.2.4\bin\i386-win32\fpc.exe RndGenerator.pas -Sd

2011年05月01日 06点05分 2

level 1

swx1995 楼主

描述：这是一个Free Pascal程序，但是它有Windows GUI界面，有双缓冲，使用了Gdi+，并且界面上的按钮啥的是自绘的（Hint:还有过渡效果~）。

2011年05月01日 06点05分 3

level 11

革命家的右手

很牛逼，不过这不是蛋疼吗？有delphi不用硬硬是要绕弯子

2011年05月01日 07点05分 4

level 2

电线杆公子

哇塞第一次看到有人用pascal做出这种可视化软件

2011年05月01日 08点05分 5

level 1

swx1995 楼主

当然不去用delphi。用难以实现的工具去实现了这才有意思。
这个程序可以解释fpc是万能的

2011年05月01日 09点05分 6

level 1

space🌚

文轩好

2011年05月01日 09点05分 7

level 1

swx1995 楼主

Hello~

2011年05月01日 09点05分 8

level 1

space🌚

4L是我朋友4king..
- - 真巧啊
swx神马时候开始学pascal了

2011年05月01日 09点05分 9

level 11

革命家的右手

同10楼，delphi其实就是把你做的事封装起来罢了，写这个纯粹蛋疼啊
不过自绘很有意义，这个的确得从底层入手

2011年05月01日 10点05分 11

level 1

灵095

谁用汇编编一个这样的程序吧。
那估计代码要很长了。

2011年05月01日 10点05分 12

level 1

swx1995 楼主

有个简单办法就是把pascal编译出来的东西反汇编一下然后扔回pascal IDE XD
用汇编有时候是为了优化现在不是这个目的所以无意义了。。
记得以前筛质数用汇编写比feeePascal开启全优化快一倍
其实本来想借助asm完成回调实现一套完整的界面体系的然后觉得写完以后也基本用不上就作罢。。
用freepascal写这个的原来目的只是闲着没事儿干= =。

2011年05月01日 10点05分 13

level 1

swx1995 楼主

嗯 = = 闲着没事干~
Gdi+用在free pascal里估计也是第一次，范围是中国还是世界就不知道了。。反正一定有个第一XD

2011年05月01日 10点05分 14

level 1

swx1995 楼主

发现你朋友都是常逛贴吧粉丝一堆的。。跟你很像嘛= =。。
其实本来就是会pascal的，，只不过写项目一直不用。。除了那时候写MMX时候接fpc编译下汇编= =

2011年05月01日 10点05分 15

level 1

swx1995 楼主

唔~其实时间总计也没多少估计就3.5小时吧= =
只是以前一直没能在pascal上把几种技术合在一起现在关键的一个成功了其它顺便写一次。。
个人觉得pascal跟delphi的区别类似于c跟c#，只不过后者区别比前者大得多。
而pascal跟汇编的区别就不能相比较了，pascal编译为机器码等价于汇编，而delphi不是编译为机器码c#不是编译为c代码。。

2011年05月01日 11点05分 16

level 1

swx1995 楼主

笔误 = =“而delphi不是编译为机器码……”=> delphi不是编译为pascal代码

2011年05月01日 11点05分 17