dbgrid的selectrow和多行选择问题(150分)

L

litte wing

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-20

• #1

1。
有两个表：
Table1 ,Table2
table1字段：zydm,zymc，kcdm , table2字段：kcdm,kcmc
用2个DBGRID,dbgrid1 dataSource->Table1 ,dbgrid2 dataSource ->Table2
希望在dbgrid2中选取多行，并将选取的行的字段kcdm和tabel2中的字段zymc
append 到Tabel1中。选取方式：鼠标、键盘都可以用。

2。在Qreport中如何实现这样格式的打印：

QRlabel1 QrDbedit1 | QRlabel1 QrDbedit1 |
... | ...

也就是将记录分两行，第一行记录从1-15，第二行记录从2-16，
两行显示的都是一个字段的值。

 

L

litte wing

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-20

• #2

第二行记录从2-16，不好意思，说错了应该是第二行记录从2-30.

 

V

Victortim

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-20

• #3

>>

 

O

OopsWare

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-21

• #4

procedure TForm1.Button1Click(Sender: TObject);
var
i, j: Integer;
s: string;
begin
if DBGrid1.SelectedRows.Count>0 then
with DBGrid1.DataSource.DataSet do
for i:=0 to DBGrid1.SelectedRows.Count-1 do
begin
GotoBookmark(pointer(DBGrid1.SelectedRows.Items));
for j := 0 to FieldCount-1 do
begin

if (j>0) then s:=s+', ';
s:=s+Fields[j].AsString;
end;
Listbox1.Items.Add(s);
s:= '';
end;
end;

 

L

litte wing

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-21

• #5

To Oopsware:
该procedure 能判别先选中在去掉选中的其中几条吗？我才看到你的
回答，还未来得及试。GotoBookmark(pointer(DBGrid1.SelectedRows.Items));
这条语句的具体含义是什么？

 

C

Crab

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-21

• #6

这条语句的含义是：跳转到选中的多行记录中的其中一行：第 i 个。

 

O

OopsWare

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-21

• #7

BookMark是数据集的标签，GotoBookMark当然就是跳到标记行啦！

 

L

litte wing

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2000-06-30

• #8

谢谢各位的答案.