建议添加注释方式（添加代码说明，不是删除代码）
例：
begin                    {@begin查询***}
Query.Close;
Query.Sql.Clear;
Query.Sql.Add(Sql);
Query.Open;              {@end查询***}

可以手动注释或自动（选中代码块（n行），在代码块的首行加begin***（*为注释说明），末行加end***,注释前输入注释说明。单行则不加begin/end）。

加代码块注释查询窗口
把所有按格式注释的***（*为注释说明）列在一个窗体内。。。点击要查看的代码段，跳转到
{begin***}行。

一点建议，自己现在只是写{begin/end***}..想看哪段时查找begin***.找的时候比较方便。

不知道说的清楚不清楚。

还有定义字符类型时 String 类型的S是小写的。。动下手改成大写吧

SP这个！我找了半天没有好用的这种工具。
你有没有其他可用的？

这个没有消息了？觉得这个还是挺好的东西啊

关于第二个问题，Object Pascal 中 string 算关键字，而我们用的是关键字小写的规则。

个人string觉得还是小写比较好一些

哈哈，老大在回避第一个问题^^