Question

怎么用delphi写一个放弃指令的程序

我用dbgrideh连接了数据库，里面有添加、修改等button按钮，现在放一个“放弃”的button按钮，但是不会写程序，具体点就如：当你点添加按钮后，在点放弃按钮，添加就消失，求指导

Answer 1

你想要的效果是不是这样？
点添加按钮的时候出现一个提示对话框，说明点是则把数据添加进数据库，点否则不会添加？
如果是这样的话就这样写：
if application.messagebox('点击是则数据将添加到数据库，点否则不进行添加','添加确认',mb_okcancel)=idok then
begin
这里写数据库添加的代码
end;
这样写就是，如果点击了OK才执行数据添加的代码，否则就不会执行

追问

不是这样的，再举个例子，当你点击修改按钮后，修改了里面的一些内容后，你在点击放弃按钮，然后就回到原来未修改的状态，求代码

追答

你想要的这个功能貌似只有数据回滚才可以实现了，但是数据回滚的功能貌似只有oracle数据库那样级别的财支持，连sqlserver好像都没有直接提供这样的功能，所以你这个功能想要在平民级的数据库和应用中实现由点牵强了，而且实际用的到的应该不是特别多！我觉得控制用户的误操作是必要的，但是也不是需要这么大力度的去控制，这样的投入和产出是不成正比的，所以我建议你只用我这样的一个操作确认提示去控制就可以了

Answer 2

在放弃按钮的点击事件里边让添加的visible为假。
比如说button1是添加，则在放弃按钮的点击事件里边写
button1.visble := false；就好了

追问

不对，不管是visible还visble都不对，提示[Error] Unit1.pas(132): Undeclared identifier: 'visible'；是不是要定义下visible，还有如果按钮多的话，是不是应该用buttons

Answer 3

或者你是用API创建创建和控件，然后销毁

Answer 4

enabled为false应该也可以的吧

Answer 5

这好像是基本功，直接隐蔽就可以了。

追问

隐蔽？怎么隐蔽，不会啊，新手，我的意思是，点放弃时，就让添加、修改程序不执行了，求大侠教教我方法

Answer 6

…… 掩藏该控件属性

追答

怎么隐藏啊？不太会，代码吗