With Query do
Begin
  close;
  sql.clear;
  sql.add(' ~~~~~~~~~~~~~~~~~~');
  parmabyname('~~').asstring := ~~~~~~~~~~~~;

  if 조건을 여기서 주세요...

  만약  a의 값이 없으면 Like로 '%' 주고...

  있으면 a := 값을 주구여..

  이런식으로 비교해가면서 체크하시면 되실듯 싶은데...

end;

그럼 즐프..........~

에고..제가...질문을 이상하게 했나보네엽...ㅠ.ㅠ 죄송합니다..
더 자세히 예를 들어 질문을 다시 할께요..
디비쪽이 아니라..
라벨이 Label1, Lable2, Lable3, Lable4 가 있습니다.
버튼 a 를 누르면 label1.Enabled := true; 를 해줍니다.
버튼 b 를 누르면 label1.Enabled := true; 를 해줍니다.
:
:
버튼 g 를 누르면 label1.Enabled := true; label2.Enabled := true; 를 해주고
버튼 h 를 누르면 label2.Enabled := true; label3.Enabled := true;
:
:
이런식으로 버튼에 따라 보이는게 달라지는데
버튼이 아니라 조건으로 해서 함수를 만들어서 쓰고 싶습니다.

예에서의 라벨에 해당하는게 10개가 넘개 있거든요
근데 해당 조건마다 다 써주면 넘 쓸데없이 반복해주는게 많잖아요..
그래서 함수처럼 만들어 놓고 '13'이란 값을 넘겨 받으면
label1.Enabled := true; label3.Enabled := true; 이거를 실행해주는 식으로 하고싶은데..
예를 들자면
case a of
1 : label1.Enabled := true;
2 : label2.Enabled := true;
3 : label3.Enabled := true;
4 : label4.Enabled := true;
에서 만약에 값이 13이면 1과 3이 다 실행되게...하고 싶은데..

좋은 방법이 없을까요?

Tag 속성을 사용하는 것도 한 방법이 될 듯 합니다...