Файл в список воспроизведения

← →
keni © (2006-04-29 17:18) [0]

Вот почти доделал плеер, осталось несколько моментов!
Один из них:
Как сделать, чтобы приперемещении файла/папки в список воспроизведения в этот список этот файл/файлы в папки добавлялись?

← →
antonn © (2006-04-29 18:23) [1]

а как реализован список вопроизведения?

← →
keni © (2006-04-29 20:26) [2]

ListBox

← →
antonn © (2006-04-30 06:29) [3]

listbox.items.add("тыры-пыры");
вопрос совсем не конкретный...

ЗЫ если плейлистом "плотно" еще не занимались, попробуйте это:
http://an-files.narod.ru/TagInfo_iPlayList.rar 144Кб
там ПЛ и демо, но работает компонент только на D7 и закрыты исходники. И нет полосы прокрутки:)

← →
vrem (2006-04-30 07:54) [4]

> [3] antonn © (30.04.06 06:29)

Что за группа? :)

← →
Virgo_Style © (2006-04-30 14:18) [5]

А мой телепатор на WM_DropFiles указывает

← →
antonn © (2006-04-30 14:21) [6]

Virgo_Style © (30.04.06 14:18) [5]
listbox.items.add("тыры-пыры"); там тоже есть:)

> antonn © (30.04.06 06:29) [3]

Как сделать,чтоб из проводника в мой ListBox запихнуть файл?
или так:
Как узнать, что над моим ListBox"ом пользователь перестал перемещать файл->узнать резмещение файла и добавить в мой Бокс

Virgo_Style © (30.04.06 14:18) [5]
угу, хороший телепатор:)

keni © (02.05.06 16:36) [7]
у нужной формы добавь:
protected procedure CreateParams(var Params: TCreateParams); override; private procedure WMDropFiles(var Message: TWMDropFiles); message WM_DROPFILES; ... implementation ... procedure TF_PlayList.CreateParams(var Params: TCreateParams); begin inherited CreateParams(Params); Params.ExStyle := Params.ExStyle or WS_EX_ACCEPTFILES; end; procedure TF_PlayList.WMDropFiles(var Message: TWMDropFiles); var aFile: array [0..255] of Char; FilesCount,N : Integer; begin inherited; FilesCount := DragQueryFile(Message.drop, $FFFFFFFF, nil, 0); begin for N := 0 to FilesCount - 1 do begin DragQueryFile(Message.drop, N, aFile, 256); //aFile - это полный путь и имя перетаскиваемого объекта. //остается лишь узнать, что это, папка или файл //и добавить его куда надо, например так: //listbox.items.add(aFile); end; end; DragFinish(Message.Drop); end;

спасиб, щас попробую

Файл в список воспроизведения Найти похожие ветки