STR: = TABLE1.TABLENAME ؛ Query1.Close ؛ Query1.SQL.Clear ؛ query1.sql.add (تنسيق ('Select * from ٪ s' ، [str])) ؛ Query1.Open ؛