uses moban; //这是form1的程序单元procedure Tfrm_new.Button1Click(Sender: TObject);
begin
if not frm_moban.ADOTable1.Active then frm_moban.ADOTable1.Open;
frm_moban.ADOTable1.Append; //程序执行到这里似乎就停住了,但是也不报错,也未死机!
showmessage('继续');
end;
就是form2里,不能使用form1里的ADOTable1组件!
begin
if not frm_moban.ADOTable1.Active then frm_moban.ADOTable1.Open;
frm_moban.ADOTable1.Append; //程序执行到这里似乎就停住了,但是也不报错,也未死机!
showmessage('继续');
end;
就是form2里,不能使用form1里的ADOTable1组件!
解决方案 »
- 真么改delphi的工作界面啊,真郁闷
- IE 查看源文件菜单失效了
- 关于数据
- 修改 IXMLNode
- 关于用DELPHI+SQL SERVER开发简繁双语言版本的问题。高手请进!
- 急问:请问在com中怎样声明ADORecordSet类型的属性
- 新手进门,初来此地,敬请关照,献分100,多谢多谢!!!
- 大哥们我有问题~~~请教
- ******DSPACK播放远程站点上的视频文件的问题,请高手进来指点!******
- 请问,考高级程序员要几分才能过啊?我想去考
- fastreport打发票为啥打打会往上偏
- 有十个EDIT控件(edit1,edit2...edit10),现在想用循环对其text赋值,怎么实现?
或者你用的数据库不支持你用ADOTable1的Append方法。
应该不存在这个问题,你编译没有出错?或是你的adotable中有触发事件?
=================================================================挖哈哈,你老兄说得太对了,原来我以前自己设的事件,现在忘记了,是beforeinsert:
abort;
showmessage('不允许新增!');啊哈哈,好嗅啊。