一个奇怪的数据输入问题,高分急求请教?

flywolfa188 2003-09-13 09:35:09
在同一窗口上,建了5个DBedit,分别为ID NAME PWD等初始时将datasource autoedit设为false,但编辑时,ID项的DBedit始终无法输入,可其他的几个DBEdit都能输入.后将其他的控件复制后使用还是不能输入.我用的D7 DBEdit是用的Express系列的控件.
请高手指教.
...全文
60 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
hnhb 2003-09-14
  • 打赏
  • 举报
回复
你明明就是把新增的记录的ID用当前最后的ID号加了一个1,你还要输干嘛呢?不算是输了数字,你 按下insertbutton时,还是会自动加1啊
wyr521 2003-09-14
  • 打赏
  • 举报
回复
down
flywolfa188 2003-09-13
  • 打赏
  • 举报
回复
不是这个的问题
具体的说是在添加新的记录时 IDedit无法输入,但在修改记录的时候可以用.
添加记录代码
procedure TUserManageForm.InsertButtonClick(Sender: TObject);
var i: integer;
begin
MoodLabel.Caption:='编辑状态';
LoginForm.UserTable.Last;
i:=LoginForm.UserTable.fieldbyname('用户ID').AsInteger;
LoginForm.UserdateSource.AutoEdit:=true;
LoginForm.UserTable.Append;
IDEdit.Text:=inttostr(i+1);
OkButton.Enabled:=True;
CancelButton.Enabled:=True;
UserNameEdit.SetFocus;
//UserNameEdit.Text:=inttostr(i+1);
S:=S+1;
end;

修改记录代码
procedure TUserManageForm.ModifyButtonClick(Sender: TObject);
begin
MoodLabel.Caption:='编辑状态';
LoginForm.UserdateSource.AutoEdit:=true;
OkButton.Enabled:=True;
CancelButton.Enabled:=True;
S:=S+1;
end;
52vc 2003-09-13
  • 打赏
  • 举报
回复
你的ID 是不是 自动增加的呢?
还有没有把 ID项的DBedit readonly=false呢?

2,495

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧