yanghao1 发表于 2011-10-17 15:07:00

如何把一个实体放入系统剪贴板

如何把一个实体放入系统剪贴板

齐天大圣3386 发表于 2011-10-17 18:43:00

' Demonstrates SetData, ContainsData, and GetData
' using a custom format name and a business object.
Public ReadOnly Property TestCustomFormat() As Customer
    Get
      Clipboard.SetData("CustomerFormat", New Customer("Customer Name"))
      If Clipboard.ContainsData("CustomerFormat") Then
            Return CType(Clipboard.GetData("CustomerFormat"), Customer)
      End If
      Return Nothing
    End Get
End Property
...
Public Class Customer
    Private nameValue As String = String.Empty
    Public Sub New(ByVal name As String)
      nameValue = name
    End Sub
    Public Property Name() As String
      Get
            Return nameValue
      End Get
      Set(ByVal value As String)
            nameValue = value
      End Set
    End Property
End Class

yanghao1 发表于 2011-10-17 20:41:00


我一点也看不出您是如何把一个实体放入系统剪贴板的。请您举个例子,例如把一条直线对象放入系统剪贴板,然后到一个打开的dwg文档中去粘贴一下看看,看是否真的把这一直线对象通过编程放入了系统剪贴板。
页: [1]
查看完整版本: 如何把一个实体放入系统剪贴板