Einzelnen Beitrag anzeigen

made in Germany

Registriert seit: 28. Apr 2006
50 Beiträge
 
#1

drag & drop mit VST und Listbox

  Alt 17. Apr 2008, 23:24
abend,

ich grieg das mit dem drag & drop irgendwie nicht hin.

die markierten strings aus VST (daten.CPath) sollen per drag and drop in eine listbox übertragen werden.
über einen button hab ichs schon geschafft

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  node, selnode: PVirtualNode;
  daten: CTreedata;
  anz, i:integer;
begin
SelNode := VST.GetFirstSelected;
  while SelNode <> nil do
  begin
  daten := CTreedata (VST.GetNodeData(selnode)^);
  Listbox1.Items.Add(CTreedata(daten).CPath);

    SelNode := VST.GetNextSelected(SelNode);
  end;
  end;
wie grieg ich das jetzt über drag & drop zum laufen?
  Mit Zitat antworten Zitat