读XML节点（已经优化过的版本，可以直接COPY使用）
{-------------------------------------------------------------------------------
Fun/Pro:     GetXMLNodeSpecialValue

查看更多...

在delphi的单元文件中的Uses部分引入：xmldom, XMLIntf, msxmldom, XMLDoc。这是Delphi支持读写的几个单元文件。
然后具体的实例原码：
     procedure TForm1.LoadXML(filepath:string);
var
      AXMLDocument :TXMLDocument;

查看更多...

function GetHtmltxt(aHtml:string):string;

function DelStrbyTag(aHtml,aFtTag,aEndTag:string):string; // 除去制点 tag 之间的数据
var
  aFt,aBk:integer;

查看更多...

var
  Icon:TICON;
  Key : string;
  App : string;
  Index : Integer;

查看更多...

shortcut------快捷方式
一、DIR 命令的格式：

dir [D:][PATH][NAME][/A][:attrib][/osorted][/l][/c[h]
(1)dir /a:attrib 缺省包含所有文件(系统文件.隐含文件)

查看更多...

Unit cltMenu;

interface

uses Windows,Classes,Messages,SysUtils,Forms,StrUtils,

查看更多...

祝你安好

我想想想疯了

有时电脑中了病毒，会对你的快捷方式文件（lnk文件）做些手脚。杀毒软件杀掉病毒后，却没有把lnk文件的关联恢复，导致所有的快捷方式打不开。这是一件很纠结的事情。不过不用着急。把下面一段代码复制，在记事本里粘贴。把这个文件保存为reg类型的文件，如“恢复关联.reg”。注意把以前的扩展名txt删掉。然后双击这个文件，点确认，就搞定了。

Windows Registry Editor Version 5.00

[-HKEY_CLASSES_ROOT\.lnk]

查看更多...