有一pbl文件,想修改里面的一函数

1.用getFileOpenName选择要打开的PBL

2.用setlibrarylist来把PBL包含进当前的应用程序

3.LibraryDirectory返回所有对象名,并写语句拆分对中笑象名,用listbox之类的控件显示出来供选择

4.获取dw对象所有列的方法(可以写成一个函数):

string colnames[] //如果写成函唯升数把它作为 ref 参数

创建一个datastore,把数据源设为d_1

datastore ds

ds = create datastore

ds.DataObjec = "d_1"

count = ds.describe("DataWindow.Column.Count")

for i = 1 to count

colnames[i] = ds.describe("指培老#" + string(i) + ".name")

next

destroy ds

当然你也可以利用 "datawindow.objects" 来获得所有对象的名称，然后拆分对象名,最后用

"对象名.type"来判断是否为列,这样写代码会长一点

更改网络工作组图标

在HKEY_LOCAL_MACHINE\\Software\\Microsoft\\Windows\\CurrentVersion\\explorer\\Shell Icons下

在右边的窗口中新建字符串值"2",并设其值为新图标的路径。

更改WEB文件夹图标

HKEY_LOCAL_MACHINE\\Software\\CLASSES\\CLSID\\{BDEADF00-C265-11D0-BCED-00A0C90AB50F}\\DefaultIcon,

在右边的窗口中修改"默认"为新图标的路径。

更改DOS程序的图标

在HKEY_LOCAL_MACHINE\\Software\\Microsoft\\Windows\\CurrentVersion\\explorer\\Shell Icons

下，在右边的窗口中新建字符串值"2",并设其值为新图巧举标的孝滚碧路径。

更改5寸软盘的图标

在HKEY_LOCAL_MACHINE\\Software\\Microsoft\\Windows\\CurrentVersion\\explorer\\Shell Icons

下，在右边的窗口中新建字符串值"5",并设其值为新图标的路径。

更改可移动驱动器的图标

在HKEY_LOCAL_MACHINE\\Software\\Microsoft\\Windows\\CurrentVersion\\explorer\\Shell Icons

下，在右边的窗口中新建字符串值"5",并设其值为新图标的路径。

更改"注销"的图标

在HKEY_LOCAL_MACHINE\\Software\\Microsoft\\Windows\\CurrentVersion\\explorer\\Shell Icons

下，在右边的窗口中新建字符串值"44",并设其值为新图标的路径。

更改"运行"的图标

在HKEY_LOCAL_MACHINE\\Software\\Microsoft\\Windows\\CurrentVersion\\explorer\\Shell Icons

下，在右边的窗口中新建字符串值"24",并设其值为新图标的路径。

更改"关闭系统"的图标

在HKEY_LOCAL_MACHINE\\Software\\Microsoft\\Windows\\CurrentVersion\\explorer\\Shell Icons

下，在右边的窗口中新建字符串值"27",并设其值为新图标的备液路径。

更改"收藏夹"的图标

在HKEY_LOCAL_MACHINE\\Software\\Microsoft\\Windows\\CurrentVersion\\explorer\\Shell Icons

下，在右边的窗口中新建字符串值"43",并设其值为新图标的路径。

更改"查找"的图标

在HKEY_LOCAL_MACHINE\\Software\\Microsoft\\Windows\\CurrentVersion\\explorer\\Shell Icons

下，在右边的窗口中新建字符串值"22",并设其值为新图标的路径。

更改"开始"菜单中"程序"的图标

在HKEY_LOCAL_MACHINE\\Software\\Microsoft\\Windows\\CurrentVersion\\explorer\\Shell Icons

下，在右边的窗口中新建字符串值"19",并设其值为新图标的路径。

更改pbl文件的图标

在HKEY_CLASSES_ROOT下查找键值"pblfile",

并在这个主键的\\DefaultIcon,修改右边窗口中的“默认”值为新图标的路径.

更改Internet Explorer的图标

HKEY_LOCAL_MACHINE\\Software\\CLASSES\\CLSID\\{871C5380-42A0-1069-A2EA-08002B30309D}\\DefaultIcon，

在右边的窗口中修改字符串值“(默认)”为新图标的路径，如：“C:\\w.ico,0”。

更改"打开的文件夹"的图标

在HKEY_LOCAL_MACHINE\\Software\\Microsoft\\Windows\\CurrentVersion\\explorer\\Shell Icons

下，在右边的窗口中新建字符串值"4",并设其值为新图标的路径。

更改3寸软盘的图标

在HKEY_LOCAL_MACHINE\\Software\\Microsoft\\Windows\\CurrentVersion\\explorer\\Shell Icons

下，在右边的窗口中新建字符串值"6",并设其值为新图标的路径。

更改IE的图标

在HKEY_LOCAL_MACHINE\\Software\\CLASSES\\CLSID\\{871C5380-42A0-1069-A2EA-08002B30309D}\\DefaultIcon

下，在右边的窗口中修改字符串值“(默认)”为新图标的路径。

更改"我的公文包"的图标

在HKEY_LOCAL_MACHINE\\Software\\CLASSES\\CLSID\\{85BBD920-42A0-1069-A2E4-08002B30309D}\\DefaultIcon

下，在右边的窗口中修改字符串值“(默认)”为新图标的路径。

更改“计划任务”的图标

在HKEY_LOCAL_MACHINE\\Software\\CLASSES\\CLSID\\{D6277990-4C6A-11CF-8D87-00AA0060F5BF}\\DefaultIcon

下，在右边的窗口中修改字符串值“(默认)”为新图标的路径。

更改“收件箱”的图标

在HKEY_LOCAL_MACHINE\\Software\\CLASSES\\CLSID\\{00020D75-0000-0000-C000-000000000046}\\DefaultIcon

下，在右边的窗口中修改字符串值“(默认)”为新图标的路径。

给“控制面板”改名、改图标

在HKEY_LOCAL_MACHINE\\Software\\CLASSES\\CLSID\\{21EC2020-3AEA-1069-A2DD-08002B30309D}下

在右边的窗口中修改字符串值“(默认)”为新的名称

改图标:在HKEY_LOCAL_MACHINE\\Software\\CLASSES\\CLSID\\{21EC2020-3AEA-1069-A2DD-08002B30309D}\\DefaultIcon下　,在右边的窗口中修改字符串值“(默认)”为新图标的路径。

更改“打印机”图标

在HKEY_LOCAL_MACHINE\\Software\\CLASSES\\CLSID\\{2227A280-3AEA-1069-A2DE-08002B30309D}\\DefaultIcon

下，在右边的窗口中修改字符串值“(默认)”为新图标的路径。

给“回收站”改名、改图标

HKEY_CLASSES_ROOT\\CLSID\\{645FF040-5081-101B-9F08-00AA002F954E}

在右边的窗口中找到字符串值：“默认”，把“回收站”改为其它名称。

HKEY_CLASSES_ROOT\\CLSID\\{645FF040-5081-101B-9F08-00AA002F954E}\\DefaultIcon

在右边的窗口中修改图标的路径。

给“我的电脑”改名、改图标

HKEY_CLASSES_ROOT\\CLSID\\{20D04FE0-3AEA-1069-A2D8-08002B30309D}

在右边的窗口中找到字符串值：“默认”，把“我的电脑”改为其它名称。

HKEY_CLASSES_ROOT\\CLSID\\{20D04FE0-3AEA-1069-A2D8-08002B30309D}\\DefaultIcon

在右边的窗口中修改图标的路径。

给“我的文档”改名、改图标

在右边的窗口中找到字符串值：“默认”，把“我的文档”改为其它名称。

HKEY_CLASSES_ROOT\\CLSID\\{450D8FBA-AD25-11D0-98A8-0800361B1103}\\DefaultIcon

在右边的窗口中修改图标的路径

2.选择WorkSpace下举碧的第一渣裂个application.PBT文件，然后单击鼠标右键，选择属性Properties 3.在d出的属性页面中选择Library list 4.单击New，这样你可以新增一个PBl；另外，你也可以增加一个已经存在的Pbl文件 5.增加完毕后，Ok就正梁举可以了。

---