摘要： var j: Integer;begin j := StrToInt(edt1.Text); if (j > 1) and ((j and (j - 1)) = 0) then ShowMessage('是2的次方数'); 1. (j and (j - 1)) 这部份条件里的and是进行位与运算 这里假设j符合条件(4) 0100 = 4 (j) 0011 = 3 ... 阅读全文

摘要： 今天又想在数据字典里多增加一项新的功能，想想又要去增加字段，麻烦！翻了一下资料。决定让规范TAG，让TAG可以表示更多的含义 *前题TAG_STR里的数字只允行为2的次方 1.增加TAG的编制栏位[TAG_STR]，为字符串，可以生成TAG2.[TAG_STR]栏可以输入1 or 2 or 4 or 8 or 16 or 32 ... 只允许有数字和'or' 然后生成TAG， 数字只允行为2的次... 阅读全文

摘要： 今天研究了一下TMail2000,发现他的Demo发送Email根本就行了. 开始发现每次[Save fields to header]时老是在mToNames列表中多了一个空的Item,发送email返回的消息也是Bad address xxxx 后来跟踪发现 function TSMTP2000.SendMessageTo(const From, Dests: String): Boolean... 阅读全文

摘要： 以前一直认为这个xp的一个bug(也应该是系统的bug)每次需要复制中文的时候到另外的记事本里的时候在要复制的界面里我都将输入法切换到中文输入法,然后复制才可以解决复制出现的乱码问题. 到前几天我帮我老婆装个输入法时习惯性的装好输入法后,把[简体中文-美式键盘]删除,换成[英语(美国)-美式键盘]然后她就报怨说复制有乱码问题,说以前没有的,后来想想是不是我把[简体中文-美式键盘]删除的问题.一试果... 阅读全文

摘要： ADO打开操作Excel Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=E:\My Documents\资金流水帐.xls;Extended Properties=Excel 5.0;Persist Security Info=False 查询分析器里面Open Excel数据 SELECT *FROM OpenDataSo... 阅读全文

摘要： 1.OPENDATASOURCE来远程读取数据 SELECT *FROM OPENDATASOURCE( 'SQLOLEDB', 'Data Source=10.10.1.1;User ID=sa;Password=sf2001;' ).erpdata_sf.dbo.jxc_CustOrder_M 使用mssql的链接服务器 sp_addl... 阅读全文

摘要： 今天发现D2007启动后主界面下面出现:automation服务器不能创建对象搜了一下百度。注册下就解决问题了 引用自百度 “automation服务器不能创建对象”的问题的解决方案大全 本人工作中的应用系统都是jsp的，大量javascript程序，一旦出“automation服务器不能创建对象”问题，大量报表及查询无法保存，苦思冥 想、千尝万试，终于将其搞定，现将相关方案与大家共享。 1、如果... 阅读全文

摘要： 引用自:http://blog.nettoapp.com/trackback.asp?tbID=83查询后是该组件没有注册成功，可以使用下面的方法进行处理：开始->运行 regsvr32 "C:\Program Files\Common Files\Microsoft Shared\DAO\dao350.dll" 发现电脑上此文件版本已经是dao360.dll，同样只要把文件更换一下，注册... 阅读全文

摘要： unit ufrmSelGuest; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ufrmBsGridSelect, cxStyles, cxCustomData, cxGraphics, cxFilter, cxData, cxDataS... 阅读全文

摘要： temperature010203 Ares 15:02:10 Check(DSCursor.ModifyRecord(ActiveBuffer)); Mofen 14:58:06 就这样OK了？ Mofen 14:58:25 谢谢了 Mofen 14:58:32 我试一下。:) Ares 15:02:54 function TAcbsClientDataSet.LoadBlobData(Fiel... 阅读全文