SDate:= EncodeDate(StrToInt(ed_Year.Text), 1, 1);
LDate:= LastDayInMonth(EncodeDate(StrToInt(ed_Year.Text), strtoint(Ed_month.text), 1));
with Query1, Grid do
begin
Close;
SQL.Clear;
SQL.Add('select a.account_code, b.displayname accountname,');
생략
SQL.Add(' where slip_date between :sdate and :ldate ');
생략
SQL.Add(' group by a.account_code, b.displayname, c.field_name');
ParamByName('sdate').AsDate := SDate;
ParamByName('ldate').AsDate := LDate;
위에서 입력 받은 값을 (sdate)값을 확인하려고 합니다.
박스에 출력 해보려고 하는데..
self.edit1.text := <---- 이부분 어떻게 넣어야 하나요??
좀 부탁합니다..
초보이기 하지만
모르는 사람을 위해서..
showmessage(query1.parambyname('sdate').text);
이런식으로 하면 됩니다..ㅠㅠㅠ