易截截图软件、单文件、免安装、纯绿色、仅160KB

DELPHI中怎么把DBGrid所选的数据赋值给EDIT

譬如我有一个DBGrid控件，里面显示有N条数据！我随便选择一条数据，点击“修改”它就表显示在我设定的对应EDIT中显示出来！并有修改的功能
为什么我点来点去都是只会显示第一次数据？

在“修改”按键加入的代码是：
procedure TForm4.Button2Click(Sender: TObject);
begin
  Application.CreateForm(TForm7,Form7);
  Form7.ShowModal;
  Form7.Free;
end;
在FORM加入的代码是：
procedure TForm7.FormCreate(Sender: TObject);
begin
  Edit1.Text:=ADOQuery2.Fieldbyname('IDNO').AsString;
end;
end.
Edit1.Text=AdoQuery1.FieldByName('字段名').Values;
呃，上面只是说的选中数据，显示到EDIT里边
如果你想带修改功能，建议你用DBEDIT
Delphi(Pascal) code:
Edit1.Text:=dbgrid1.SelectedField.AsString;

procedure Tform1.adoquery1AfterScroll(DataSet: TDataSet);


begin
Edit1.Text=AdoQuery1.FieldByName('字段名').AsString;
end;

这个更好用....
引用
Delphi(Pascal) codeEdit1.Text:=dbgrid1.SelectedField.AsString;


你按照3楼的写法试一下！
引用
呃，上面只是说的选中数据，显示到EDIT里边
如果你想带修改功能，建议你用DBEDIT

不建议用DBEDIT这类东西，太慢了，还是用EDIT好


相关问答：

Delphi中数据库查询的疑惑

昨晚在Delphi数据库查询中遇到了一个疑惑。代码如下：
procedure TFormSearchAchievement.ComboBoxXYChange(Sender: TObject);
var
  XY : string;
begin
  XY := comboboxxy.Items[comboboxx ......

delphi动态数组如何去掉一个元素

procedure DynArrayDelete(var A;elSize:Longint;index,Count:Integer);
var
len,MaxDelete:Integer;
P:PLongint; //4 个字节的长整形指针
begin
P:=PLongint(A);// 取的 A 的 ......

Delphi怎么取返回内容中的指定部分.

返回的内容是如下代码,怎么能渠道2b?
<p class="text1">1a </p>
<p class="text1">2b </p>
<p class="text1">3c </p>
<p cl ......

关于避免delphi版权或者收律师函的方案。

最近换了家公司，郁闷的是关于Delphi的问题，公司之前用的也是D版Delphi7企业版的。后来被送了律事函以后，就强制改用Delphi7个人版，剧说这个版本是免费版，或者说很便宜，如果查出来，就买个好了。这下可好。苦了� ......

delphi画布绘坐标图

请问delphi中的画布能绘坐标图吗，那位大师有这方面的例子，帮忙发一个，谢谢了！我的邮箱是springbird2006@126.com
tChart控件就可以，还有一些第三控件。下载频道里就有不少。

可不可以说具体点呢，我刚学delp ......
© 2009 ej38.com All Rights Reserved. 关于E健网 | 联系我们 | 站点地图 | 赣ICP备09004571号