5,388
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
hzwmjl 2005-07-06
- 打赏
- 举报
欢迎加入DELPHI 程序员群 1805366 参加技术讨论 ！！
hqhhh 2005-07-06
- 打赏
- 举报
见意用DBGridEh控件，它里面有这个属性设置，你可以用鼠标拖到选择多行，也可拖到选择某一小块！
zaza_bbface 2005-07-06
- 打赏
- 举报
dbgrid.options属性multiselect要设为true
zaza_bbface 2005-07-06
- 打赏
- 举报
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
begin
adoquery1.Open ;
adoquery1.DisableControls ;
adoquery1.First ;
while not adoquery1.Eof do
begin
dbgrid1.SelectedRows.CurrentRowSelected :=true;
adoquery1.Next ;
end;
adoquery1.EnableControls ;
end;
var
i:integer;
begin
adoquery1.Open ;
adoquery1.DisableControls ;
adoquery1.First ;
while not adoquery1.Eof do
begin
dbgrid1.SelectedRows.CurrentRowSelected :=true;
adoquery1.Next ;
end;
adoquery1.EnableControls ;
end;
sfanpu 2005-07-06
- 打赏
- 举报
up
jerrie_1 2005-07-05
- 打赏
- 举报
关注！
看看这个对你是否有效
while not eof do
begin
listbox1.items.add(string(dbgrid1.SelectedRows));
next;
end;
看看这个对你是否有效
while not eof do
begin
listbox1.items.add(string(dbgrid1.SelectedRows));
next;
end;
wtg476 2005-07-05
- 打赏
- 举报
SelectedRows
elite01 2005-07-05
- 打赏
- 举报
定义BookMarkList,作数据集的Not Eof循环
逐条取得BookMark
这样可全选
逐条取得BookMark
这样可全选
lovend 2005-07-05
- 打赏
- 举报
没这么选过 帮你顶
