delphi中DBEdit问题?
我用DBEdit显示数据库中对应的内容,为什么我想在DBEdit中修改,但是只能看,不能修改,我用的是adoquery数据集组件!DBEdit的属性ReadOnly已设为...
我用DBEdit显示数据库中对应的内容,为什么我想在DBEdit中修改,但是只能看,不能修改,我用的是adoquery数据集组件!DBEdit的属性ReadOnly已设为false ,并把数据集adoquery设为编辑状态adoquery1.edit,但是运行以后还是改不了??请问这是为什么呀?
DBEdit的哪个属性可以消除这种情况,能在运行的时候可以随便修改DBEdit中的值呀!!!
哪位知道了说下!!!谢谢了 !!!
二楼的大哥,请问一下如果用edit来编辑修改,怎么样实现在点击上一记录和下一记录按钮时实现EDIT显示数据,谢谢 展开
DBEdit的哪个属性可以消除这种情况,能在运行的时候可以随便修改DBEdit中的值呀!!!
哪位知道了说下!!!谢谢了 !!!
二楼的大哥,请问一下如果用edit来编辑修改,怎么样实现在点击上一记录和下一记录按钮时实现EDIT显示数据,谢谢 展开
2个回答
展开全部
举最简单的例子:
窗体上放一edit,两个button,分别显示上一记录和下一记录
首先连上数据库
初始化窗体事件//
procedure Tm_log.FormShow(Sender: TObject);
begin
with m_log.q do
begin
close;
sql.Clear;
sql.Text:='select * from book_user_info';
open;
first;
edit1.Text:=fieldbyname('username').AsString;
end;
end;
//下一记录按纽的onclick事件
procedure Tm_log.Button1Click(Sender: TObject);
begin
m_log.q.Close;
m_log.q.SQL.Clear;
m_log.q.SQL.Text:='select * from book_user_info';
m_log.q.Open;
m_log.q.Next;
edit1.Text:=m_log.q.fieldbyname('username').AsString;
end;
//上一记录的onclick事件
procedure Tm_log.BitBtn1Click(Sender: TObject);
begin
m_log.q.Close;
m_log.q.SQL.Clear;
m_log.q.SQL.Text:='select * from book_user_info';
m_log.q.Open;
m_log.q.Prior;
edit1.Text:=m_log.q.fieldbyname('username').AsString;
end;
xp sp3下delphi7.0调试通过!
窗体上放一edit,两个button,分别显示上一记录和下一记录
首先连上数据库
初始化窗体事件//
procedure Tm_log.FormShow(Sender: TObject);
begin
with m_log.q do
begin
close;
sql.Clear;
sql.Text:='select * from book_user_info';
open;
first;
edit1.Text:=fieldbyname('username').AsString;
end;
end;
//下一记录按纽的onclick事件
procedure Tm_log.Button1Click(Sender: TObject);
begin
m_log.q.Close;
m_log.q.SQL.Clear;
m_log.q.SQL.Text:='select * from book_user_info';
m_log.q.Open;
m_log.q.Next;
edit1.Text:=m_log.q.fieldbyname('username').AsString;
end;
//上一记录的onclick事件
procedure Tm_log.BitBtn1Click(Sender: TObject);
begin
m_log.q.Close;
m_log.q.SQL.Clear;
m_log.q.SQL.Text:='select * from book_user_info';
m_log.q.Open;
m_log.q.Prior;
edit1.Text:=m_log.q.fieldbyname('username').AsString;
end;
xp sp3下delphi7.0调试通过!
威孚半导体技术
2024-08-19 广告
2024-08-19 广告
威孚(苏州)半导体技术有限公司是一家专注生产、研发、销售晶圆传输设备整机模块(EFEM/SORTER)及核心零部件的高科技半导体公司。公司核心团队均拥有多年半导体行业从业经验,其中技术团队成员博士、硕士学历占比80%以上,依托丰富的软件底层...
点击进入详情页
本回答由威孚半导体技术提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询