- 博客(3)
- 资源 (1)
- 收藏
- 关注
原创 用键盘方向键移动无边框窗体并用Esc键关闭窗体
<br />{功能:用键盘操作无边框窗体移动并关闭。环境:delphi7+winxp3 通过测试完成时间:18:09 2011-3-7}unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;type TForm1 = class(TForm) Label
2011-03-09 20:41:00 671
原创 在Form的Image组件上随机绘制不同色彩的线条
{作用:在窗体的Image组件随机画不同颜色的线环境:delphi7+winxp3时间:12:10 2011-3-9}//************************unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls;type TFo
2011-03-09 20:28:00 567
原创 判断指定日期是星期几(delphi编程实现)
{作用:闰年指定日期是星期几。可以从公元1年1月1日算起。完成时间:0:49 2011-3-9环境:delphi7+winxp3 测试通过思路:从公元1年1月1日(为星期一)算起, 将指定日期距离公元第一天的总天数算出来,对7求余, 根据不同余数,指出具体是星期几。}unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Contr
2011-03-09 19:52:00 2751
设计模式(翻译版 简体中文 chm格式 范例由delphi改写)
2011-03-10
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人