如何让程序读取*.SQL文件里的部分语句

Question

写的一个程序,不同的操作ADOQuery组件需要调用不同的SQL语句,为考虑到SQL的方便维护将其另外存了一个*.sql文件(类似于*.txt文件),
*.sql文件分三段SQL语句,以两个"--"之间行的内容为一段(不包括"--"行后的内容)大致如下:
--M11_SELECT
select KTSXE.*
 FROM $$KTSXE KTSXE
 where 1=1
--D11_SELECT
select KTSXF.* ,MA003 AS XF002C 
  from $$KTSXF AS KTSXF
  LEFT JOIN $$INVMA INVMA ON INVMA.MA002 = XF002 AND INVMA.MA001 ='4'
   where 1=1
--D11_KEY
XF001,XF002问:程序的ADOQuery组件如何分情况来调用不同段的SQL语句?

Answer 1

怎么又发一遍
如果像这样管理的话,可以考虑用ini文件格式,那样存取比较方便

Answer 2

建议你先看一下ini文件结构
[节名]
字段=值你可以用节名分类
字段作为小类
值就是sql语句var
  F:TIniFile;(引用inifiles单元)
  sql:string;
begin
 sql := F.ReadString('节名','字段','默认值'); //默认值是读取出错时返回的值
 //sql就是读出的sql 语句
end;