摘要: 有4个字节类型的值,用移位或逻辑运算符怎么合成一个整数?比如 $FFEEDDCC。高$FF$EE$DD$CC低//方法 1: 共用内存procedure TForm1.Button1Click(Sender: TObject);varbf: record b1,b2,b3,b4: Byte end;... 阅读全文
posted @ 2014-08-27 10:47 梁彦坤 阅读(543) 评论(0) 推荐(0) 编辑
摘要: 在使用Delphi中的TClientSocket和TServerSocket进行通信编程时,当使用TClientSocket这方的客户端使用TClientSocket.close断开连接并退出程序时,使用TServerSocket这方的服务端有时会报‘’Asynchronous socket e... 阅读全文
posted @ 2014-08-19 10:15 梁彦坤 阅读(1508) 评论(0) 推荐(0) 编辑
摘要: 在使用delphi的对象技术的时候,经常会看到一个词汇:self,它到底指的是什么呢?我们还要从对象与类的关系谈起。类是对将要创建的对象的性质的描述,是一种文档。这很重要:类只是一段描述性的文字,它并不会真去分配内存,无论在其中定义多少变量。如果打个比方,类就是图纸,而对象就是根据图纸盖的房子。对象... 阅读全文
posted @ 2014-08-17 22:50 梁彦坤 阅读(400) 评论(0) 推荐(0) 编辑
摘要: 32位Delphi程序中可利用TRegistry对象来存取注册表文件中的信息。 一、创建和释放TRegistry对象 1.创建TRegistry对象。为了操作注册表,要创建一个TRegistry对象:ARegistry := TRegistry.Create; 2.释放TRegistry对象。... 阅读全文
posted @ 2014-08-13 16:28 梁彦坤 阅读(742) 评论(0) 推荐(0) 编辑
摘要: if MessageDlg('Welcome to my Delphi application. Exit now?', mtConfirmation, [mbYes, mbNo], 0) = mrYes thenbeginClose; end;MessageDlg用法对话框类型:mtwarning... 阅读全文
posted @ 2014-08-13 13:38 梁彦坤 阅读(329) 评论(0) 推荐(1) 编辑
摘要: Transact-SQL中的存储过程,非常类似于Java语言中的方法,它可以重复调用。当存储过程执行一次后,可以将语句缓存中,这样下次执行的时候直接使用缓存中的语句。这样就可以提高存储过程的性能。Ø 存储过程的概念 存储过程Procedure是一组为了完成特定功能的SQL语句集合,经编译后存储在数据... 阅读全文
posted @ 2014-07-29 21:28 梁彦坤 阅读(137) 评论(0) 推荐(0) 编辑
摘要: SELECT convert(datetime,'30-03-2011',105)--字符串转化为时间CAST和CONVERT都经常被使用。特别提取出来作为一篇文章,方便查找。 CAST、CONVERT都可以执行数据类型转换。在大部分情况下,两者执行同样的功能,不同的是CONVERT还提供一些特别... 阅读全文
posted @ 2014-07-23 22:33 梁彦坤 阅读(237) 评论(0) 推荐(0) 编辑
摘要: Declare @StartDate varchar(10)Declare @EndDate varchar(10)Set @StartDate='2000-01-01'Set @EndDate='2003-03-02'Create Table #YearMonth(YM varchar(10))W... 阅读全文
posted @ 2014-07-23 17:38 梁彦坤 阅读(1453) 评论(0) 推荐(0) 编辑
摘要: 第一种方法:电脑自动开机、且音乐随你定.自动定时开机此功能需要在BIOS中设定,并且你的主板的高级电源管理设置必须支持这个功能,不过现在大多数的主板全支持,放心使用吧.步骤一:启动系统按DEL,进入BIOS,然后选中 "POWER MANAGEMENT FEATURES"(电源管理设置),回车进入.... 阅读全文
posted @ 2014-07-21 11:57 梁彦坤 阅读(1282) 评论(0) 推荐(0) 编辑
摘要: 关键词:一个四舍五入的函数这是一个四舍五入的函数,具体用法 myround(1.999,2) = 2.00 第一位1.999为要四舍五入的数,2为要取的小数位。欢迎大家测试探讨。QQ:81392790uses Math, StrUtils;function myround(const yuan: E... 阅读全文
posted @ 2014-07-13 12:30 梁彦坤 阅读(1175) 评论(0) 推荐(0) 编辑