Ошибка: Сортировка DBgrid с помошью SQL

[MrMorozko]

procedure TForm1.DBGrid2TitleClick(Column: TColumn);
var st1:string;
begin
st1:=Table1S_Code.AsString;
Query1.SQL.Clear;
if Column.Index=1 then Query1.SQL.Add('SELECT C_Date as Дата, C_Move as Приход_расход FROM "cards.db" where C_Date <>"31.12.2010" and C_Code = '+st1+' order by C_Date');
if Column.Index=0 then Query1.SQL.Add('SELECT C_Date as Дата, C_Move as Приход_расход FROM "cards.db" where C_Move <>"1000" and C_Code = '+st1+' order by C_Move');
Query1.Open;
Datasource2.DataSet:= query1;
end;

Проверте пожалуйста! и подскажите где ошибка? Спасибо

[MrMorozko]

Спасибо Сам нашел Ы