改为
procedure TForm1.Button1Click(Sender: TObject);
begin
table1.open;
Table1.Insert;
Table1.FieldByName('XM').AsInteger := StrToInt(Edit1.Text);
try
Table1.Post;
except
;
end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
table1.open;
Table1.Insert;
Table1.FieldByName('XM').AsInteger := StrToInt(Edit1.Text);
try
Table1.Post;
except
;
end;
end;
解决方案 »
- 怎么加密
- 每个包:数据长度(4个字节)+数据, 这个怎么实现?
- 表中日期的查询与表的修改 以及表内记录的转移
- 来都有份,软件实施调查!!
- 帮我分隔一条too too too ..........long 的Update语句。。。。。(小的很很急需解决的!!!)
- stack overflow
- 如何禁止在DBGRID末位自动添加一行记录
- 问个菜题:用sql语句筛选记录的问题。(sybase)
- 关于Delphi+SQLserver安装程序的问题,高手指教
- 讨论报表控件大杂脆!各位FastReport有何不足之处!对于其子表的操作功能是否强大!相比之下还有没有其它更好的报表控件?
- 我要怎么改?
- delphi的table有类似c++builder的table的sort函数吗?如果没有delphi的table怎样实现排序?
table.open
或者
table.active := true;
还有就是,虽然active是false,但是我我进行了判断的啊
还是提示:table没有设置为insert or edit
但是有这句啊:table1.inser
你再怎么用也是白搭。还有你没有检查canmodify的数值,如果canmodify为false调用insert和edit都会抛出异常。if table1.Canmodify=false then
table1.canmodify:=true;
table1.insert;
各位能不能给我介绍些网站啊,最好和DELPHI数据库有关的