Qry_info.clear;

송정엽 wrote:

> 현재 case문을 쓰고

> Qry_info.Close;

> qry_info.SQL.add('and FMAN_ID = :id');

> qry_info.ParamByName('id').asstring := Lab_classValueid.Caption ;

> qry_info.ParamByName('endDay').asstring := stdate;

> qry_info.Prepare;

> Qry_info.open;

> 형식으로 SQL.add를 여러가지 사용하고 있습니다.

> 그런데 case마다 SQL.text를 보니

> 지금껏 add한 SQL문이 계속 남아 있더군요.

> 어떻게 하면 SQL을 초기화할 수 있을까요.

>

>

용운 wrote:

> Qry_info.clear;

> 송정엽 wrote:

> > 현재 case문을 쓰고

> > Qry_info.Close;

> > qry_info.SQL.add('and FMAN_ID = :id');

> > qry_info.ParamByName('id').asstring := Lab_classValueid.Caption ;

> > qry_info.ParamByName('endDay').asstring := stdate;

> > qry_info.Prepare;

> > Qry_info.open;

> > 형식으로 SQL.add를 여러가지 사용하고 있습니다.

> > 그런데 case마다 SQL.text를 보니

> > 지금껏 add한 SQL문이 계속 남아 있더군요.

> > 어떻게 하면 SQL을 초기화할 수 있을까요.

> >

> >



Qry_info.clear;은 컴파일이 안되고

Qry_info.sql.clear;는 sql을 완전히 지우므로 다시 Add를 해줘야 하거든요

제가 원하는 건 원래 있는 sql으로 초기화를 말합니다.

죄송하지만 다시 답변 좀 해주세요.

case문을 사용하신다면...

select 나 join문은 그대로 있다는 말씀인듯...

그럼 qry_info.SQL[3] := 'and FMAN_ID = :id';

이렇게 해보세요.

여기서 3은 특정 라인입니다.

예)

select * from ZIP

where ZCODE=:ZCODE

(여기에 변경되는 SQL문장)



1,2줄은 변경이 안되는 부분이고...

3줄은 case로 변한다는 말씀인듯....

그럼 qry_info.SQL[3]만 변경시켜 주면 될듯...





Qry_info.Close;

qry_info.SQL[3] := 'and FMAN_ID = :id';

qry_info.ParamByName('id').asstring := Lab_classValueid.Caption ;

qry_info.ParamByName('endDay').asstring := stdate;

qry_info.Prepare;

Qry_info.open;