首先用query或Table控件来连接dbgrid,然后双击query/Table控件,右击,选择add all fields,选择定义为memo类型的字段,选择该字段的ongettext事件,在事件里写入以下程序: