数据库是ACCESS,为什么我在ondblick事件中双击某条记录,打开一个新的窗口,而窗口的记录与之对应,可这样写,为什么不对?procedure Tform1.DBGrid1DblClick(Sender: TObject);
begin
form2:=Tform2.Create(Self);
form2.Show;
form2.dbedit1.text:=adoquery1.fieldbyname('wpmc').AsString;
end;
begin
form2:=Tform2.Create(Self);
form2.Show;
form2.dbedit1.text:=adoquery1.fieldbyname('wpmc').AsString;
end;
解决方案 »
- 有血性的中国人,都来讨伐sinox,抵制sinox,来这签名.
- 谁知道Delphi 7 的SpinEdit控件在哪页上
- 哪位大侠用过devexpress的控件?(送高分,在线等待)
- 使媒体播放器窗口变灰(非激活状态)
- abstract error
- 紧急求助!!!一个Delphi新手到济南找工作这样的条件可以拿到多少钱??必重谢!!!!
- delphi7程序员开发指南的中文版现在有卖的吗?
- 关键字:PageControl控件......
- 在WIN2K下如何调用DLL中的字窗体
- 学DELPHI有用吗?我好像发现去考程序员时没有DELPHI这一项啊!?
- 请教大家!last 和 findlast 的区别? 在线等待,马上给分!
- 这个函数ShellExecute()怎样使用!
procedure TForm1.DBGrid1DblClick(Sender: TObject);
begin
form2 := TForm2.Create(Application);
form2.ShowModal;
end;procedure TForm2.FormCreate(Sender: TObject);
begin
edit1.Text := form1.adotable1.fieldbyname('deptid').AsString;
end;
dbedit1.text:=fieldbyname('字段').asstring;
dbedit2.text:=...
是可以解决问题的