WinForms

Απ: Drag & drop

Thiseas — Fri, 24 Aug 2007 23:40:16 GMT

xenophon:
ε ναι σε ενα textbox που ειναι στο notepad

πΩς?

Απ: Drag & drop

xenophon — Fri, 24 Aug 2007 22:50:49 GMT

ευχαριστω παρα πολυ !!!

Απ: Drag & drop

evliatsas — Thu, 23 Aug 2007 05:47:46 GMT

Θα υποθέσω πως εννοείς ότι έχεις ένα TextBox Control (έστω πως λέγεται TextBox1) σε μία φόρμα.

Θα πρέπει πρώτα να ορίσεις το Property AllowDrop του TextBox1 σε True.

Έπειτα θα πρέπει να ενεργοποιείσεις τα εξής δύο Events του TextBox1:

DragDrop και DragEnter.

Αρχικά θα πάρεις Copy τα Data που γίνονται Dragged στο TextBox1

Private Sub TextBox1_DragEnter(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles TextBox1.DragEnter
e.Effect = DragDropEffects.Copy
End Sub

Έπειτα θα πάρεις από τα δεδομένα αυτά το όνομα του αρχείου και θα διαβάσεις το Text περιεχόμενο χρησιμοποιώντας ένα StreamReader

Private Sub TextBox1_DragDrop(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles TextBox1.DragDrop
Dim tmpStr As String()
tmpStr = e.Data.GetData("FileDrop", True)
Dim file As IO.TextReader = New IO.StreamReader(tmpStr(0))
TextBox1.Text = file.ReadToEnd()
file.Close()
End Sub

Στο σημείο αυτό μπορείς να προσθέσεις και έναν έλεγχο για να δείς ότι το αρχείο είναι όντως TextFile, αλλιώς να το απορίψεις.

Απ: Drag & drop

xenophon — Wed, 22 Aug 2007 08:59:03 GMT

ε ναι σε ενα textbox που ειναι στο notepad

Απ: Drag & drop

evliatsas — Wed, 22 Aug 2007 01:59:59 GMT

Πρέπει να γίνεις λίγο πιο σαφής.

Θέλεις να κάνεις Drag & Drop ένα txt αρχείο από το παράθυρο του Windows Explorer που???

Σε ένα ανοικτό Notepad ??

Σε κάποιο RichText Control κάποιας φόρμας ???

Drag & drop

xenophon — Mon, 20 Aug 2007 03:43:19 GMT

Με το notepad παλι που δουλευω
θελω να μπορω μεσα απο τον Explorer των windows
να κανω drag & drop ενα αρχειο
και απο αυτο να διαβαζω το κειμενο που γραφει
ξερει κανεις πως γινετε ?
(σε VB 2005)