procedure TForm1.DBListBox1DblClick(Sender: TObject);
var i:integer;
begin
for i:=0 to (dblistbox1.Items.Count-1) do
begin
if dblistbox1.Selected[i] then
begin
adotable1.Edit;
adotable1.FieldByName('ID').AsString:=dblistbox1.Items.Strings[i];
adotable1.Post;
end;
end;
end;
我想通过双击dblistbox1来修改adotable1里的纪录
可是我双击dblistbox1没反应啊
var i:integer;
begin
for i:=0 to (dblistbox1.Items.Count-1) do
begin
if dblistbox1.Selected[i] then
begin
adotable1.Edit;
adotable1.FieldByName('ID').AsString:=dblistbox1.Items.Strings[i];
adotable1.Post;
end;
end;
end;
我想通过双击dblistbox1来修改adotable1里的纪录
可是我双击dblistbox1没反应啊
解决方案 »
- 调用MYSql存储过程问题。
- 数据库代码字段的显示问题
- select 的as什么用?
- Delphi中句柄是什么意思?
- 讨论,delphi+win98和delphi+win2000的不同
- Delphi6+SqlServer退出时报"Connection Timed Out!"错误!
- Frame DELPHI 5 才有的东西,从没用过,请问:这玩意有什么用处?怎么用(50+50)
- 请问:为何我的程序重新编译,老是要提示"无法编译project1.exe",而且它的确仍然驻留在内存里.请指教
- 关于数据类型转换
- 大型的财务软件制作?我有规划、有模型、有市场,你有兴趣?
- 几个问题,有难的有简单的~~~~~~~大家快进来看看啊!!!!!!
- 加入图片为什么不行
EDIT之前已经把adotable打开了
另外问一下f7,f8 是什么东东啊
F7 Trace Into
F8 Step Over