property FormMode :integer read GetFormMode;function TForm1.GetFormMode:integer;
begin
Case ActiveDataset.State of
dsEdit: Result:=0;
dsInsert : result:=1;
....
end;
end;
begin
Case ActiveDataset.State of
dsEdit: Result:=0;
dsInsert : result:=1;
....
end;
end;
解决方案 »
- 很有规律的数据怎么用代码实现
- 急!急!急!一个上午都没解决,希望谁能帮助我,小弟先谢谢了!
- 主从表的问题
- 如何制作.pdf文件,哪里可下到Acrobat?(不是Adobe Reater)
- ☆★☆★哪位仁兄有《Delphi in nutshell》这本书的中文电子版啊???★☆★☆
- 一个图形方面的问题
- 菜鸟问题:多个线程同时动态创建timer1到同一个form,会造成冲突吗?
- 十万火急:关于ADOconnection的问题?
- 初学Delphi,请教关于soap/web service客户端调用perl服务端的问题。
- 如何屏蔽 Alt+F4 键关闭自编程序,多谢各位大侠?
- windindance,可否说得更清楚一点 ?
- 菜鸟问题:如何建立一个无窗口单元,包含若干函数供其他窗口调用
你可以(动态)创建一个DataSource,把DataSource的DataSet
指向对应的DataSet,然后
DataSource.OnStateChange:=你自己定义的函数。
然后在对应的代码写,不久得了。