如何实现,复制StringGrid中的文字到剪切板?
请问
如何实现,复制StringGrid中的文字到剪切板?
有没具体的方法或代码?谢了.
问题点数：20、回复次数：2Top
1 楼cowbo（友好的狮子&鬼故事砖家）回复于 2006-06-01 11:02:31 得分 0
dddTop
2 楼myanwei（潜水员）回复于 2006-06-01 11:36:06 得分 20
var StringTemp : String;
begin
StringTemp:='';
for i := 0 to StringGrid.RowCount - 1 do
begin
for j := 0 to StringGrid.ColCount - 1 do
StringTemp := StringTemp + StringGrid.Cells[j,i] + #9;
StringTemp := StringTemp + #13;
end;
clipboard.Clear;
clipboard.Open;
clipboard.astext := StringTemp;
clipboard.Close;
end;Top
