DBGrid好像不能多行复制吧,也不能进行列选择,列复制
解决方案 »
- 请教用QuickReport做单据打印时自定义纸张的走纸问题?
- 关于Ttreeview问题,高手请
- 出现这个问题是怎么回事啊?
- 在創建RAVE REPORT MASTER/DETAIL報表時提示,
- 高手支招:delphi或cb中如何实现vc中atl的IObjectSafe接口
- 类型转换
- AdoQuery+DBGridEh,其中AdoQuery是动态设置的,该如何在DBGridEh设置lookup字段呢?
- 怎样去掉字符中间的空格
- 怎样实现在delphi开发程序中实现背景音乐?着急!!!!!
- 怎样屏蔽键盘上的win键功能VK_LWIN AND VK_RWIN
- 告诉我几个关于delphi的好一点的网站?就是你们放在收藏夹里的。
- 在使用installshield最后关头碰到莫名其妙的问题,求救!
procedure TFormoriginal.btnCopyClick(Sender: TObject);
var
i:integer;
booklist:TBooklist;
bookstr:Tbookstr;
begin
bookstr:=Table1.book;
try
booklist:=dbgrid1.SelectedRows;
for i:=0 to booklist.count-1 do
begin
Table1.book:=booklist[i];
Memo1.lines.add(Table1.fieldbyname('workno').asstring);
end;
finally
Table1:=bookstr;
end;
end;