2,498
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
NewPrince 2004-07-17
- 打赏
- 举报
疑问？ 点击DataGrid每一个行都弹出不同的form ，还是点击DataGrid每一个行都弹出同一个form？
如果是为了修改数据，那就在 oncellclick 时间中些代码 创建窗体
如果是为了修改数据，那就在 oncellclick 时间中些代码 创建窗体
metro 2004-07-17
- 打赏
- 举报
procedure TForm1.DBGrid1CellClick(Column: TColumn);
var i:integer;
begin
i:=dbgrid1.SelectedField.DataSet.RecNo;//得到当前选定的行值;
if i=1 then
form1.Show
else if i=2 then
form2.show
.........
end;
var i:integer;
begin
i:=dbgrid1.SelectedField.DataSet.RecNo;//得到当前选定的行值;
if i=1 then
form1.Show
else if i=2 then
form2.show
.........
end;
henreash 2004-07-16
- 打赏
- 举报
DBGrid.OnCellClick(....);
begin
Application.createForm(TForm2,Form2);
.....//根据点击的单元进行Form2的组件负值
Form2.show;
end;
begin
Application.createForm(TForm2,Form2);
.....//根据点击的单元进行Form2的组件负值
Form2.show;
end;
worldbug 2004-07-16
- 打赏
- 举报
同意pilicat(delphi迷）。
完全能实现！
完全能实现！
pcfans007 2004-07-16
- 打赏
- 举报
我写过类似的代码，在帮助中有相关代码 ，挺多的，具体的忘 了
但好像有这样的顺序： 设行选
得到点击行的索引
转化为指针
定位
但好像有这样的顺序： 设行选
得到点击行的索引
转化为指针
定位
pilicat 2004-07-16
- 打赏
- 举报
在DBGrid的OnCellClick事件中写代码
zty0527 2004-07-16
- 打赏
- 举报
我的意思是说点击DataGrid每一个行都弹出一个form '
myling 2004-07-16
- 打赏
- 举报
点击
然后
弹出
然后
弹出
Tensionli 2004-07-16
- 打赏
- 举报
form.show
ln521 2004-07-16
- 打赏
- 举报
在onclick中
你可以根据 selectedindex 进行处理
你可以根据 selectedindex 进行处理
jacket008 2004-07-16
- 打赏
- 举报
DataGrid.onclick
弹出窗口.show;
弹出窗口.show;
