안녕하세요?
김기원입니다.
먼저 Query1의 코딩란에 이렇게 써보세요...

Select *
From Summerys
Where Date =:KKK

여기서 Summerys는 DB이름이고요.,. 아시겠죠?
그리고 Where문 아래에는 Summerys DB의 필드인 Date(여기서는 날짜가 되겠죠!)
를 KKK라는 변수로서 잡아줍니다.
주의 할 점은 =: 입니다. 주의 하세요...

그리고 Query1의 프로퍼티에서 보면 Params에서 변수로 지정한 KKK를
String으로 잡아줍니다.

그리고 실제로 코딩할 때에는

Query1.Close;
Query1.Params[0].AsString := FormatDateTime('yyyymmdd',Now);
Query1.Open;

하시면 되고, 여기서 FormatDateTime('yyyymmdd',Now)를 Edit나
뭐를 받아도 됩니다.
예를 들어 숫자를 써도 됩니다.
온라인으로 쓰려니 좀 그렇네요...
아무튼 잘 안되면 연락주세요...
좋은 코딩하세요...