极度菜鸟问题

DIGITMAN9 2004-09-01 07:24:23
1、Form1中有一个edit1 ,我想点一个buttom 打开一个Form2 ,并在form2中的 edit2里显示 edit1.text 的内容,如何实现啊
2、我用adoquery1+datasource1+dbgrid1, 如果有姓名=“张三”的数据,我想dbgrid1指针指在“张三”这一行,如果没有“张三”的数据,则指在第一行
3、用什么命令可能把dbgrid1指针所指的一行数据删除呢?
4、如何对dbgrid1指针指在的一行数据进行修改啊。我试了一下,如果在dbgrid中直接改的话,怎么一行之中有的地方可以改,有的地方不能改啊?如果点个键,调出一个Form,Form上把所有这一行的内容显示出来,这样也可以修改的吧,如何改啊,dbgrid指针的指的那一行数据如何调出来啊?

各位大侠,本人才入门,请教了,多谢了!
...全文
67 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
jiuzhangcs21dn 2004-09-01
  • 打赏
  • 举报
回复
1.form1 的单元文件里uses form2所在单元,然后在button的onclick事件里写form2:=Tform2.create(application); form2.edit2.text:=edit1.text;
2.Adoquery的lookup字段,查找后加bookmark,然后Move过去. 删除一行数据,只要指针移动到你要删除的记录位置,调用delete方法即可.
强烈建议你先多看点delphi的书.
madyak 2004-09-01
  • 打赏
  • 举报
回复
1.
procedure TForm1.Button1Click(Sender: TObject);
begin
Form2:=TForm2.Create(Self);
Form2.Edit2.Text:=Edit1.Text;
Form2.ShowModal;
Form2.Free;
end;

2.

procedure TForm1.Button2Click(Sender: TObject);
begin
if not ADOQuery1.Locate('姓名','张三',[]) then
ADOQuery1.First;
end;

3.
procedure TForm1.Button3Click(Sender: TObject);
begin
ADOQuery1.Delete;
end;

4.
可能是你部分字段
是只读得
mjh81621 2004-09-01
  • 打赏
  • 举报
回复
在form1 上button 的onclick 事件上写代码如下:
form2.show;
form2.edit2.text:=form1.edit1.text;
如果提示是否引用点‘是’

if not adoquery1.locate('姓名','张三',[]) then
adoquery1.first;

当前数据集如果是query1那么
query1.edit;
query1.delete;

你可以用dbedit指向当前的数据集对应的字段dbedit的datasource和datafield进行设置
然后可以在dbedit上修改数据了
还有要注意数据表的完整性约束

2,496

社区成员

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

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