摘要：假设有一组数字 1~1000,请将它们随机填充在一个数组中要求：1、数组中无重复数字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 := ......
摘要：实在说，我对delphi的理解不是很深入，使用它写过一些小程序，不过鉴于borland的传奇，还是看了李维那本vcl内幕剖析，最终的感觉不是对delphi多么狂热，反而是另样的深入理解了c＋＋的优缺点以及模式设计一些理念的深化，不过，仍旧对borland抱有尊敬，另外也羡慕那些使用delphi的人，控间好多啊，：）这个是我早期从bbs上收集的文章，暂且贴在这里，算是开门大吉
delphi以其独特......
防止程序多次运行
网络id:wnhoo or sos_admin
网名:e梦缘 【程序编程相关:
DB2 通用数据库中的调度和自动化】 【推荐阅读:
优化大型数据库导入】mail:wnhoo@163.com 【扩展信息:
以并行方式处理 DB2 for iSer】 风花雪月 e梦情缘
http://delphi.ur-solution.com/delphi_download/upload/33954_wnhoo.rar
[dpr部分]
program project1; uses forms, unit1 in unit1.pas {form1} ,windows, messages; const hfck=wm_user+$1000; appname=myname; var myhandle:hwnd; {$r *.res} begin myhandle:=findwindow(appname,nil); if myhandle>0 then begin postmessage(myhandle,hfck,0,0); exit; end; application.initialize; ...
下一页 摘要：做一个.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
注意要把那些......
