02 2012 档案

Drupal(一)
摘要：drupal安装会出现问题，主要出现的问题原因在：1、要提前建立数据库，在填写数据库时候使用。（如果重复安装时候，可能需要删除该数据库重新建立。）2、导入时候出错，注意： 在php.ini中设置memory_limit的数值大一些 在php.ini中设置max_execution_time的数值大一些 在site\default中建立files目录，切记将files目录的权限为文档，不可以只读。 default.settings.php复制一份，改为setting.php。3、修改后的设置，记得重启 http服务。（IIS或者apach等） 阅读全文
posted @ 2012-02-18 19:14 步履蹒跚 阅读(228) 评论(0) 推荐(0)
模式学习（3）：Abstract Factory 抽象工厂模式（工具箱kit）
摘要：概述：Abstract Factory 提供一个接口用于构建一群相关或者相互以来的对象，而无需指定他们的具体类。结构： 1、抽象工厂TAbstractFactory：声明构建（生产）抽象产品操作的接口。 2、具体工厂 TConCreateFactory:实现构建（生产）抽象产品接口的操作。 3、抽象产品 TAbstractProduct:声明某一类型对象的接口。 4、具体产品 TConCreateProduct:相对于某一具体工厂定义欲构建的一个产品对象，并实现抽象产品的接口。 阅读全文
posted @ 2012-02-17 19:52 步履蹒跚 阅读(218) 评论(0) 推荐(0)
模式学习（2）：Factory工厂模式
摘要：工厂模式，又叫VIrtual Contructor。工厂模式定义创建对象的接口，有派生类来决定哪一个类创建对象。结构：1、抽象产品：TProduct。定义工厂方法所构建的产品的对象接口，是具体产品的共有接口类。 2、具体产品：TConcreateProduct。是实现抽象产品对象的接口，最终创建的对象实例。 3、抽象工厂：TFactory。声明工厂方法，返回特定的产品。 4、具体工厂：TConcreateFactory。是实现抽象工厂类的具体类。类图：最常用，也最好理解的模式。 阅读全文
posted @ 2012-02-17 09:49 步履蹒跚 阅读(273) 评论(0) 推荐(0)
模式学习（1）：Decorator装饰者模式
摘要：学习（主要参考 刘艺 delphi模式编程）概念：Decorator以对客户端透明的方式动态的为对象提供修饰等附加的功能。使用时机：1、在不影响其他对象的情况下，动态透明的增加责任或功能到某一对象。 2、这些功能可以随时添加或取消； 3、为了增加大量的功能，而导致派生类激增，继承关系复杂而不现实时；累的定义被隐藏或定义不方便派生类的。模式结构：1、抽象的部件：定义一个接口（类），可以动态附加在其他对象上。抽象虚拟类。(可理解为要实现的功能，当然是类中定义的方法) TMethod:=class(TObject); procedure XXX();virtual;Abstract; end;2、具 阅读全文
posted @ 2012-02-17 01:12 步履蹒跚 阅读(278) 评论(0) 推荐(0)
Delphi操作XML：变量与常量
摘要：4.4.变量(Variables)UnitNativeXml; cDefaultBinaryEncoding:TBinaryEncodingType = xbeBase64; cDefaultDropCommentsOnParse:boolean = False; cDefaultEncodingString:UTF8String = 'UTF-8'; cDefaultExternalEncoding:TStringEncodingType = seUTF8; cDefaultFloatAllowScientific:boolean = True; cDefaultFloatS 阅读全文
posted @ 2012-02-15 11:12 步履蹒跚 阅读(435) 评论(0) 推荐(0)
Delphi操作XML：数据类型
摘要：4.3.类型(Types)4.3.1.PBigByteArray Unit NativeXml PBigByteArray =^TBigByteArray;4.3.2.PUnicodeChar Unit NativeXml PUnicodeChar = PWideChar;4.3.3.RawByteString Unit NativeXml RawByteString = AnsiString;4.3.4.TBigByteArray Unit NativeXml TBigByteArray =array[0..MaxInt - 1] of byte; TBigByteArr... 阅读全文
posted @ 2012-02-15 11:11 步履蹒跚 阅读(608) 评论(0) 推荐(0)
Delphi操作XML:函数详解(二)
摘要：4.2.30.sdDateTimeFromStringDefault UnitNativeXml functionsdDateTimeFromStringDefault(const ADate: UTF8String; ADefault: TDateTime;UseLocalBias: Boolean): TDateTime; 根据W3C日期/时间规范，转换UTF8String类型的ADate为日期时间(TDateTime)类型，可以在http://www.w3.org/TR/NOTE-datetime找到该规范。如果有一个转换错误，返回缺省值ADefault。4.2.31.sdDat... 阅读全文
posted @ 2012-02-15 11:10 步履蹒跚 阅读(543) 评论(0) 推荐(0)
Delphi操作XML:函数详解(一)
摘要：4.2.函数(Functions)4.2.1.ComponentCreateFromXmlFile unit NativeXmlObjectStorage functionComponentCreateFromXmlFile(const FileName: string; Owner: TComponent; constName: string): TComponent; 从文件名称为FileName的XML文件读取并创建组件。为了成功地从头开始创建组件，组件的类必须事先调用RegisterClass进行登记。添加到指定Owner组件的子组件列表。这通常是一个形式。指定Name作为创建... 阅读全文
posted @ 2012-02-15 11:09 步履蹒跚 阅读(997) 评论(0) 推荐(0)
Delphi操作XML:TXmlNodeList
摘要：4.1.17.TXmlNodeList TXmlNodeList= class(TList) TXmlNodeList是一个继承自TList的工具。 例子如下：procedure FindAllZips(ANode: TXmlNode);var i: integer; AList: TXmlNodeList;begin AList := TXmlNodeList.Create; try // Get a list of all nodes named 'ZIP' ANode.NodesByName('ZIP', AList); for i := 0 to ALi 阅读全文
posted @ 2012-02-15 11:08 步履蹒跚 阅读(530) 评论(0) 推荐(0)
Delphi操作XML:TXMLNode类(三)
摘要：4.1.16.60.NodeByAttributeValue functionNodeByAttributeValue(const NodeName: UTF8String; const AttribName: UTF8String;const AttribValue: UTF8String; ShouldRecurse: boolean): TXmlNode; 这个函数返回子节点中第一个节点名等于NodeName，并且名为AttribName属性的值为AttribValue的节点。如果ShouldRecurse为True(缺省)，则函数自身递归。4.1.16.61.NodeByElem... 阅读全文
posted @ 2012-02-15 11:07 步履蹒跚 阅读(651) 评论(0) 推荐(0)
Delphi操作XML:TXMLNode类(四)
摘要：4.1.16.90.ReadPen procedure ReadPen(constAName: UTF8String; APen: TPen); virtual; 从名字为AName的子节点中读取Color、Mode和Style信息到TPen类型的APen中。4.1.16.91.ReadString function ReadString(constAName: UTF8String; const ADefault: UTF8String): UTF8String; virtual; 从名字为AName的子节点中读取并且转换值为UTF8字符串(UTF8String)类型，如果子节点没... 阅读全文
posted @ 2012-02-15 11:07 步履蹒跚 阅读(857) 评论(0) 推荐(0)
Delphi操作XML:TXMLNode类(一)
摘要：4.1.16.TxmlNode类 TXmlNode =class(TPersistent) 该TXmlNode代表在XML文件中的元素。每个TNativeXml拥有一个根(Root)元素。在根元素下面，子元素可以嵌套（没有限制有多深）。ElementType属性定义这个节点是什么类型的元素。4.1.16.1.AttributeByName property AttributeByName[const AName: UTF8String]: UTF8String; AttributeByName返回的指定属性名称AName的属性的值。设置AttributeByName可以添加这个属性到... 阅读全文
posted @ 2012-02-15 11:05 步履蹒跚 阅读(2701) 评论(0) 推荐(0)
Delphi操作XML:TXMLNode类(二)
摘要：4.1.16.30.ValueDirect property ValueDirect:UTF8String; ValueDirect是从流里面解析的原始文本值。如果有多行文本，将在ValueDirect中用CR符号分割。4.1.16.31.WriteOnDefault property WriteOnDefault:boolean; WriteOnDefault属性值用于返回或设置父文档(Parent Document)的WriteOnDefault 属性值。4.1.16.32.Assign procedure Assign(Source:TPersistent); overrid... 阅读全文
posted @ 2012-02-15 11:05 步履蹒跚 阅读(1343) 评论(0) 推荐(0)
Delphi操作XML(八)
摘要：4.1.3.TPersistentAccess类 TPersistentAccess =class(TPersistent)4.1.4.TReaderAccess类 TReaderAccess =class(TReader)4.1.5.TsdBufferedReadStream类 TsdBufferedReadStream =class(TStream) TsdBufferedReadStream是一个流的缓冲，它为另外的TStream建立读取缓冲区，并从流读取到缓冲区。此流类型只能支持读取。4.1.5.1.Create constructor Create(AStream:TSt... 阅读全文
posted @ 2012-02-15 10:59 步履蹒跚 阅读(441) 评论(0) 推荐(0)
Delphi操作XML(九)
摘要：4.1.10.TsdSurplusReader类 TsdSurplusReader = class TsdSurplusReader是一个简单的类，它可以存储少许字符，并可以在读取基础流前，返回这些字符。4.1.10.1.Surplus property Surplus:UTF8String;4.1.10.2.Create constructor Create(AStream:TStream);4.1.10.3.ReadChar function ReadChar(var Ch:AnsiChar): integer;4.1.10.4.ReadCharSkipBlanks func... 阅读全文
posted @ 2012-02-15 10:59 步履蹒跚 阅读(268) 评论(0) 推荐(0)
Delphi操作XML(七)
摘要：符号引用(Symbol Reference)4.1.类(Classes)4.1.1.TComponentAccess类 TComponentAccess =class(TComponent)4.1.1.1.ComponentState property ComponentState;4.1.1.2.SetComponentState procedureSetComponentState(const AState: TComponentState);4.1.2.TNativeXml类 TNativeXml =class(TPersistent) TNativeXml是XML文件的载体... 阅读全文
posted @ 2012-02-15 10:58 步履蹒跚 阅读(1030) 评论(0) 推荐(1)
Delphi操作XML(六)
摘要：引自百度使用NativeXml的例子3.1.例子A:XML的装载、存储和导出 这个例子显示如何加载一个XML文档，然后以可读格式导出到一个TMemo领域。 拖放一个TEdit（Edit1），TButton（Button1）和一个TMemo到你的窗体，然后连接到下面的按钮的OnClick事件代码。填写文件名到Edit1，然后按一下按钮，您会看到在memo控件中列出XML文件的内容。procedure TForm1.Button1Click(Sender: TObject);var ADoc: TNativeXml;begin Memo1.Lines.Clear; ADoc := TNati... 阅读全文
posted @ 2012-02-15 10:52 步履蹒跚 阅读(701) 评论(0) 推荐(0)
Delphi操作XML(五)
摘要：xml.FloatSignificantDigits := 7;这用来控制浮点类型的小数位数，经测试，发现：value：=123.123456789（共13个数字，不含点）如果 xml.FloatSignificantDigits：=1，则为100；为2，则为120，为3则为123，为4，则为123.1.....为7，则为123.1234.....是不是有点怪异？呵呵以下引自万一：安装包中的 NativeXmlObjectStorage.pas 是 NativeXml 的扩展应用，可以把组件、对象和窗体序列化为 Xml 文件。其中方便使用的是两个类：TsdXmlObjectWriter、Ts. 阅读全文
posted @ 2012-02-15 10:40 步履蹒跚 阅读(478) 评论(0) 推荐(0)
Delphi操作XML(四)
摘要：以下引自万一：关于NativeXML的编辑操作：SourceURL:http://www.cnblogs.com/del/archive/2011/03/25/1995863.htmlXml (10)锛氱紪杈� - 涓囦竴 - 鍗氬鍥�uses NativeXml; var xml: TNativeXml; const xmlStr = '<?xml version="1.0" encoding="UTF-8"?>' + '<List>' + '<item ID="No.1 阅读全文
posted @ 2012-02-15 10:31 步履蹒跚 阅读(473) 评论(0) 推荐(0)
Delphi操作XML(三)
摘要：八、属性、注释以及内容的添加添加属性:node := xml.Root.NodeNew('item'); node.AttributeAdd('ID', '1'); node.AttributeAdd('age', '11'); node.Value := '张三'; node := xml.NodeNewTextAttr('item', '张三', [xml.AttrText('ID', '1'), xml.AttrInt(' 阅读全文
posted @ 2012-02-15 10:28 步履蹒跚 阅读(1279) 评论(0) 推荐(0)
Delphi操作XML(二）
摘要：继续研究NativeXML：NativeXml的方法属性:ANativeXml := TNativeXml.Create(Self);//创建ANativeXml.XmlFormat := xfReadable; //格式ANativeXml.EncodingString := 'UTF-8';//编码ANativeXml.ExternalEncoding := seUTF8;ANativeXml.LoadFromFile();//从文件夹中导入XML文件ANativeXml.SaveToFile();//XML文件保存到文件夹节点的方法属性:ANativeXml.Root;/ 阅读全文
posted @ 2012-02-15 10:12 步履蹒跚 阅读(928) 评论(0) 推荐(0)
Delphi操作XML(一)
摘要：原来自己是个一个菜鸟。 Delphi操作XMl，只要使用 NativeXml。我是用的版本是4.02。NativeXML的使用方法比较简单，但是功能很强大。XE2的话，要在simdesign.inc后面加上： // Delphi XE2 / 16 {$ifdef VER230} {$define D7UP} {$defineD10UP} {$define D15UP} {$endif}一、使用 1) Copy the NativeXml files from the NativeXml directory into your project folder. Copy additional .. 阅读全文
posted @ 2012-02-15 00:17 步履蹒跚 阅读(1475) 评论(0) 推荐(0)