Einzelnen Beitrag anzeigen

Rolf Rostig

Registriert seit: 5. Mär 2003
Ort: Stade
117 Beiträge
 
Delphi 7 Professional
 
#1

DragDrop mit ShellDropper

  Alt 7. Feb 2008, 12:08
Hallo,

in eine Listbox kann ich per Drag & Drop den Dateinamen plus Pfad vom Explorer oder Desktop ziehen.

Delphi-Quellcode:
procedure TForm1.ShellDropper1Drop(Sender: TObject; const DropRec: TDropRec);
var i: integer;
begin
  for i := 0 to DropRec.Files.Count - 1 do
  begin
    ListBox1.Items.Add(DropRec.Files.Strings[i]);
  end;
end;
ich möchte aber nur den Dateinamen in der Listbox stehen haben und auch per Drag & Drop den Namen wieder entfernen oder in eine andere Listbox ziehen.
Wie kann das gehen?
Gruss
Rolf
  Mit Zitat antworten Zitat