Block With工具，用来提取开域with的工具，如下代码：
经过使用此工具，提取ADOQuery_Tmp字符串后，代码为：
我们可以使用开源的CnPack代码进行扩展，打开CnWizards_D11.dpr(Dephi2007进行开发),在EditorWizard文件夹下，新增CnEditorCodeBlockWith单元
代码如下
然后进行编译即可。
ufrmBlockSet.pas为：
Block With工具，用来提取开域with的工具，如下代码：
经过使用此工具，提取ADOQuery_Tmp字符串后，代码为：
我们可以使用开源的CnPack代码进行扩展，打开CnWizards_D11.dpr(Dephi2007进行开发),在EditorWizard文件夹下，新增CnEditorCodeBlockWith单元
代码如下
然后进行编译即可。
ufrmBlockSet.pas为：
![Windows系统下通过CMD命令行或运行窗口打开常用附件和功能[图]](data:image/gif;base64,R0lGODlhAQABAIAAAP///wAAACwAAAAAAQABAAACAkQBADs=)