Drag&Drop - von ShellListView -> SynMemo

[citybreaker]

Hallo,
wie kann ich eine Datei aus einer ShellListView in eine SynMemo ziehen
und den inhalt in der SynMemo anzeigen lassen?

[fylo]

Hi,

vielleicht hilft dir das weiter:

Delphi-Quellcode:

  
if (sender is TSynMemo)and(Source is TShellListView)
     then begin
          synmemo1.SelText:=ShellListView1.SelectedFolder.DisplayName;
          end;