Delphi(程序人生)

摘要： Delphi函数大全(Double Neaten) 首部 function Languages: TLanguages; $[SysUtils.pas 功能 返回系统语言对象 说明 通过此函数可以得到系统的语言环境 参考 type SysUtils.TLanguages 例子 ///////Begin Languages procedure TForm1.Button1Click... 阅读全文

摘要： 1. API之网络函数 WNetAddConnection 创建同一个网络资源的永久性连接 WNetAddConnection2 创建同一个网络资源的连接 WNetAddConnection3 创建同一个网络资源的连接 WNetCancelConnection 结束一个网络连接 WNetCancelConnection2 结束一个网络连接 WNetCloseEnum 结束一次枚举操... 阅读全文

摘要： Random(8) 会得到0 但不会得到8 ---------------------------------- RandomRange(1,8),会得到1,但不会得到8 阅读全文

摘要： ----------- uses GIFImg; procedure TForm1.FormCreate(Sender: TObject); begin // 先在窗体上放一个 TImage 组件：Image1； Image1.Picture.LoadFromFile('C:\Example.gif'); // AnimationSpeed 设定动画速度，值越大，速度越快； TGI... 阅读全文

摘要： ----------------------- 1, EXP(LN(M)*N ----------------------- 2, Uses Math Power(M,n) 阅读全文

摘要： 获取方法: 运行: tdump.exe C:\windows\system32\gdiplus.dll c:\temp\gdiplus.txt 阅读全文

摘要： 为什么有的end后面有分号(end;),有的是点号(end.),有的什么都没有 ----------------------------------------------------------------- 1,Begin 与 End并不配对,不是所有的End前面都有一个Begin 2,If...else中 else前面的end不加何任符号,没有end的情况与也不加任何符号,表过此叛断还没... 阅读全文

摘要： Delphi的单引号,真是会把人搞晕的一个符号 ---------------------------------------- Delphi中不使用双引号,单引号必须配对 -------------------------- ①引号内无字串的情况下 ShowMessage('');->空字串 ShowMessage(' ' ');->这是错的 ShowMessage('''');->... 阅读全文

摘要： 在做日期时间的计算时候常用的函数 Use DateUtils var a: TDateTime; ①HourOf(a)->得到小时的值 ②DayOf(a)->得到天的值,一年中的第几天 ③MonthOf(a)->得到月的值,一年中的第几月 ④MinuteOf(a)->得到小时内的分钟值 ⑤SecondOf(a)->得到分钟内的秒值 ⑥格式化日期的方式 ShortDateFormat ... 阅读全文