Oppure

Loading
10/03/05 22:55
schoolfighter
qualcuno sa come si fa il drag and drop in un programma visual basic?
grazie..
aaa
06/09/05 16:17
hedo
Premere F1 non far? nessun danno al computer!

cmq, per metterti sulla strada giusta guarda l'evento DragDrop!

Ciao!

HeDo
aaa
10/10/05 16:58
Impakto
e ma hedo F1 serve MSDN !!!!!
aaa
10/10/05 18:17
hedo
Ti sei per caso dimenticato di scaricarlo?

;);)
aaa
11/10/05 13:07
Impakto
no e che proprio per vb6 non l'ho mai provato, hai qualche link da suggerire???
aaa
13/10/05 15:12
Rand
prova con questo codice (da inserire nell'evento drag and drop delal form main in riferimento a un controllo "richtext";) ;)

Es... io ho creato un progetto wizard... di tipo MDIForm... il codice dovrebbe risultare cosi...

Private Sub MDIForm_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)
Dim OLEFilename As String
Dim fType As String
Dim i As Integer
    
    For i = 1 To Data.Files.Count
        If Data.GetFormat(vbCFFiles) Then
            OLEFilename = Data.Files(i)
        End If
    
        Select Case UCase(Right(OLEFilename, 3))
            Case "RTF"
                fType = rtfRTF
            Case Else
                fType = rtfText
        End Select
        
        On Error GoTo errexit
        ActiveForm.rtfText.LoadFile OLEFilename, fType 'carico il file
        ActiveForm.Caption = OLEFilename 'setto la caption della nuova finestra
    Next i
errexit:
    Exit Sub
End Sub


...questo ti permette di aprire in una nuova finestra un file di testo semplice(TXT) o di tipo RTF
...fammi sapere!! :k:
aaa