combobox에서 조건을 선택하구

선택결과값에서 dbgrid루 값을 출력할려구 하는데..

않되여 ㅠ.ㅠ

좀 도와주셍



procedure TForm1.fSeasonChange(Sender: TObject);

begin

qua.close;

qua.sql.Clear;

qua.sql.add('SELECT Score.S_num, Score.Sub_code, Score."Year",

Score.Sc_term, Score.Grade, Score.Van, Score.P_score,

Score.H_score, Subject.Sub_name, Subject.P_name,

subject.Ha_score');

qua.sql.add('FROM "subject.DB" Subject INNER JOIN "score.DB" Score');

qua.sql.add('ON(Score.Sub_code = Subject.Sub_code)');

if fseason.ItemIndex <> '' then

qua.sql.add('where sc_term ='+fseason.items[fseason.itemindex]);

qua.open;

end;