Hallo Leute,
nach langer Zeit mal wieder was von mir
Ich bastle an einem Simplen File-Manager. Der braucht natürlich auch eine CopyPaste-Funktion.
Ich habe zunächst diesen Code geschrieben(Vereinfachte Version):
Mein Problem ist, dass zwar das Bytearray richtig eingelesen wird, aber nicht gescheit in´s Clipboard geschrieben(oder
aus dem Clipboard gelesen) wird. Hat jemand eine Idee, wie ich es hinbekommen würde?
Grüsse,
Mircosofter
nach langer Zeit mal wieder was von mir
Ich bastle an einem Simplen File-Manager. Der braucht natürlich auch eine CopyPaste-Funktion.
Ich habe zunächst diesen Code geschrieben(Vereinfachte Version):
VB.NET-Quellcode
- Public Sub Kopieren(ByVal FileName As String)
- Dim ByteCollection As Byte() = GetBytesFromFile(Path.GetFullPath(FileName))
- My.Computer.Clipboard.SetData("ExplorerFileData", ByteCollection)
- My.Computer.Clipboard.SetData("ExplorerFileName", Path.GetFileName(FileName))
- End Sub
- Public Sub Einfügen(ByVal FileName As String)
- Dim Names As String = CType(My.Computer.Clipboard.GetData("ExplorerFileName"), String)
- Dim args As Byte() = CType(My.Computer.Clipboard.GetData("ExplorerFileData"), Byte())
- File.WriteAllBytes(Names, args)
- End Sub
- Public Function GetBytesFromFile(ByVal FileName As String) As Byte()
- Dim fs As FileStream = New FileStream(FileName, FileMode.Open)
- Dim reader As BinaryReader = New BinaryReader(fs)
- Dim Data As Byte() = reader.ReadBytes(CType(fs.Length, Long))
- reader.Close()
- fs.Close()
- Return Data
- End Function
Mein Problem ist, dass zwar das Bytearray richtig eingelesen wird, aber nicht gescheit in´s Clipboard geschrieben(oder
aus dem Clipboard gelesen) wird. Hat jemand eine Idee, wie ich es hinbekommen würde?
Grüsse,
Mircosofter