Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Drag & Drop mit sevListbox
Autor: icewather
Datum: 13.09.07 22:46
Danke für deine Anfrage! Spannend - genau die gleiche Frage wollte ich soeben auch ins Forum stellen. Was ich unterdessen weiss, ist, dass folgende OLE-Eigenschaften bei der sevListBox und auch sevGrid fehlen. zb OLEDragDrop, OLEDragover, OLESetData u.a. Folgender Code würde dein Problem lösen, wenn diese Eigenschaften vorhanden wären: Private Sub List1_OLEDragDrop(Data As DataObject, _ Effect As Long, Button As Integer, _ Shift As Integer, X As Single, Y As Single) Dim I As Integer ' Prüfen, ob es sich um eine Datei handelt If Data.GetFormat(vbCFFiles) Then ' alle Dateien (1 bis Files.Count) For I = 1 To Data.Files.Count ' Dateiname der Listbox hinzufügen List1.AddItem Data.Files(I) Next I End If End Sub Private Sub Text1_OLEDragDrop(Data As DataObject, _ Effekt As Long, Button As Integer, _ Shift As Integer, X As Single, Y As Single) ' Handelt es sich um eine Datei? If Data.GetFormat(vbCFFiles) Then ' ...aber nur WAVE-Dateien! If UCase(Right(Data.Files(1), 4)) = ".WAV" Then ' ab in die TextBox Text1.Text = Data.Files(1) End If End If End Sub Dieter, kannst du uns eine Antwort geben? - gibt es eine andere Lösung mit den sev-Controls, wie wir Dateien per DragDrop sowohl einfügen, wie auch an andere Programme weitergeben können? Danke für eine Antwort Beat Ungricht

Drag & Drop mit sevListbox	819	DrRK	13.09.07 16:47
Re: Drag & Drop mit sevListbox	522	icewather	13.09.07 22:46
Re: Drag & Drop mit sevListbox	489	Dieter	14.09.07 06:48
Re: Drag & Drop mit sevListbox	436	icewather	14.09.07 07:39
Re: Drag & Drop mit sevListbox	499	Dieter	14.09.07 10:08
Re: Drag & Drop mit sevListbox	432	icewather	14.09.07 10:38
Re: Drag & Drop mit sevListbox	435	Kracks	12.10.07 10:56
Re: Drag & Drop mit sevListbox	389	TurdFurgeson	17.05.08 06:08

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen