M malingfeng Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-07 #2 利用word自动化，将document.range.last.paste 即可
C cat.yy Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-16 #4 PaintBox中有个CopyRect,你可以把PaintBox中的图片Copy到Image中 在利用Image提供的CopyToClipboard(好象这样写的) 将图片Copy到剪贴班中 ----- 本方法 管用的
PaintBox中有个CopyRect,你可以把PaintBox中的图片Copy到Image中 在利用Image提供的CopyToClipboard(好象这样写的) 将图片Copy到剪贴班中 ----- 本方法 管用的
Z Zephyr Unregistered / Unconfirmed GUEST, unregistred user! 2000-12-16 #5 Copy to clipboard: var Bmp: TBitMap; AFormat: Word; Data, APal: THandle; begin Bmp := TBitmap.Create; Bmp.Canvas.Assign(PaintBox1.Canvas); Bmp.SaveToClipBoardFormat(AFormat, Data, Pal); ClipBoard.SetAsHandle(AFormat, Data); Bmp.Free; end; 没试过，应该可以用。
Copy to clipboard: var Bmp: TBitMap; AFormat: Word; Data, APal: THandle; begin Bmp := TBitmap.Create; Bmp.Canvas.Assign(PaintBox1.Canvas); Bmp.SaveToClipBoardFormat(AFormat, Data, Pal); ClipBoard.SetAsHandle(AFormat, Data); Bmp.Free; end; 没试过，应该可以用。
T txytlc Unregistered / Unconfirmed GUEST, unregistred user! 2001-01-03 #6 Cat.yy: Image中没有CopyToClipord方法。
