摘要：
这是一个修改文件属性的API使用下面WINDOWS API函数function SetFileAttributes(lpFileName: PChar; dwFileAttributes: DWORD): BOOL; stdcall; {$EXTERNALSYM SetFileAttributes} function SetFileAttributesA(lpFileName: PAnsiChar... 阅读全文
阅读排行榜
[转]delphi之多线程编程(一)
2011-04-13 08:18 by HYrz的菜园子, 2771 阅读, 收藏,
摘要：
本文的内容取自网络，并重新加以整理，在此留存仅仅是方便自己学习和查阅。所有代码均亲自测试 delphi7下测试有效。图片均为自己制作。多线程应该是编程工作者的基础技能, 但这个基础我从来没学过，所以仅仅是看上去会一些，明白了2+2的时候，其实我还不知道1+1。开始本应该是一篇洋洋洒洒的文字, 不过我还是提倡先做起来, 在尝试中去理解.先试试这个:procedureTForm1.Button1Click(Sender:TObject);vari:Integer;beginfori:=0to500000dobeginCanvas.TextOut(10,10,IntToStr(i));end;e.. 阅读全文
[delphi函数]FileGetAttr、FileSetAttr 读取与设置文件属性
2009-12-04 22:19 by HYrz的菜园子, 1724 阅读, 收藏,
摘要：
代码Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--//读取与设置文件属性FileGetAttr;FileSetAttrvarFileName:string;Attr:Integer;//属性值是一个整数beginFileName:='c:\temp\... 阅读全文
判断文件是否存在一个API函数
2009-11-14 17:08 by HYrz的菜园子, 1471 阅读, 收藏,
摘要：
一、声明（方式有两种）:[代码]二、使用（此处用第二种方式）：//该函数的返回值为布尔型，0 或1，[代码] 阅读全文
二分查找算法(预排序数组的查找) 实现 (DELPHI)
2011-08-26 01:05 by HYrz的菜园子, 1307 阅读, 收藏,
摘要：
二分查找可以解决（预排序数组的查找）问题：只要数组中包含T（即要查找的值），那么通过不断缩小包含T的范围，最终就可以找到它。一开始，范围覆盖整个数组。将数组的中间项与T进行比较，可以排除一半元素，范围缩小一半。就这样反复比较，反复缩小范围，最终就会在数组中找到T，或者确定原以为T所在的范围实际为空。对于包含N个元素的表，整个查找过程大约要经过log(2)N次比较。相信大家都知道二分查找算法 , 通过重复的比较将数组元素缩小到最小范围,然后找到要查找的值 . 并且最大化优化了CPU时间 , 是一个很不错的算法.测试结果 : 我用三个算法 进行了测试 , 但是从输出的结果来看 , 二分查找非常有效 阅读全文
浙公网安备 33010602011771号