表中存在列

Question

您好，我正在使用 Delphi7 和 Oracle ODBC 我正在开发“测试知识”程序。如果该列不存在，我想插入一个表。

我可以做这个 ：

我有 5 个按钮（A、B、C、D、E）。

如果我点击 A ..

我用...

1) adoquery1 sql 到..

ALTER TABLE test
ADD COLUMN col1 INT 

2) adoquery2 sql 插入....

然后我单击“下一步”更改问题，效果很好，但是当我返回上一个问题时，我想看到所有 5 个按钮可见= false，因为这个问题已得到解答

我怎样才能做到这一点？因此我需要查找表中是否存在列

Answer 1

你的意思是

Button1.Visible := not Assigned(myDataSet.FindField('col1'));

？