سلام
من دستور بالا را به روش زیر انجام دادم پیغام خطا می دهد

procedure TFreport.DBGrid1TitleClick(Column: TColumn);
VAR S:STRING;
begin
S:='CREATE INDEX N ON "N_NAGHSH.DBF" N_naghsh ('+Column.FieldName+')';
Freport.Caption :=S;
Query1.Active:=FALSE;
Query1.SQL.Clear;
Query1.SQL.Add(S);
Query1.Active:=TRUE;
end;

invalid use keyword token (Column.FieldName)


برای اجرای دستورات SQL بجای استفاده از ADOCommand می خواهم از QUERY استفاده کنم