img
00:00
imgФорум Delphi: Пишу плейлист. Нужна помощь!!!
imgimgimg
Форумы Delphi Пишу плейлист. Нужна помощь!!! (Всего сообщений: 28)Страницы:  01  02  03 
antonn

Старожил

Профиль
21 | #2246 | цитата01-05-2010 22:10
добавляй в обычный Tlist указатель на эту хрень:
delphi
pPLaylistItem = ^TPLaylistItem;
TPLaylistItem = record
  Title: string;
  Path: string;
  Duration: string;
  Slected: boolean;
end;

var Ti:pPLaylistItem;
New(ti);
ti.Title:='Fufel';
ti....
FList.Add(TObject(ti));

Ti:=pPLaylistItem(FList.Items[i]);
Dispose(Ti);
FList.Delete(i);


^^ перед удалением не забудь сделать Dispose, иначе утечка будет.

ну и обращайся к элументу:

delphi
var Ti:pPLaylistItem;
begin
Ti:=pPLaylistItem(FList.Items[номер]);
ti.title...
NITROGEN
Новичок

Профиль
22 | #2255 | цитата02-05-2010 17:25
спасибо. smiley
NITROGEN
Новичок

Профиль
23 | #2263 | цитата03-05-2010 20:22
эт снова я smiley спасибо за предыдущий ответ - это значительно увеличило скорость работы плейлиста. У меня еще пара траблов есть, думаю для тебя это не составит труда... Никак не могу выделять с SHIFT'ом (только с CTRL), не могу перемещать по плейлисту сразу несколько файлом (только один могу) и не могу сортировать треки (только по заголовкам могу, а по файлам, длительности и т.д. - никак). помоги плиззззззз)))))) Заранее благодарен! smiley

ЗЫ: в прикрепленном архиве компонент и демка для него. На случай если на все вышеизложенное дать простой ответ сложно, вноси изменения в компонент (думаю ты легко разберешься в моем коде))))
Прикрепленные файлы:
MyPlaylist.zip - (27.08 Kb) Кол-во скачиваний: 950
antonn

Старожил

Профиль
24 | #2266 | цитата04-05-2010 21:56
я делал так, что при каждом клике в некоторой второй переменной я сохранял номер элемента на который кликнули.
плюс при каждом таком выделении я проверял нажат ли шифт, если нажат, я пробегался циклом от той первой переменной до текущей и выделял их.
С перемещением не понмю точно, помню что там были мега костыли...
NITROGEN
Новичок

Профиль
25 | #2271 | цитата06-05-2010 06:45
спасибо. а с сортировкой поможешь?
antonn

Старожил

Профиль
26 | #2279 | цитата06-05-2010 15:17
сортировка была пузырьком smiley
NITROGEN
Новичок

Профиль
27 | #2283 | цитата07-05-2010 17:07
в смысле?
Проходимец
Гость
28 | #2666 | цитата06-09-2010 14:23
круто smiley
Форумы Delphi Пишу плейлист. Нужна помощь!!! (Всего сообщений: 28)Страницы:  01  02  03 
Тему просматривают: 2 гостей, 0 пользователей
Ваше Имя:
 
22000/22000 [Справка по кодам]
 Защита от спамботовВведите ответ:
Пишу плейлист. Нужна помощь!!! | Ответов: 28
 
Вход
Имя:
Пароль:
Запомнить
Регистрация Забыли пароль?
Мини-чат :)
Необходима регистрация
Архив мини-чата
26-03-2024 15:49
Roan
Надеюсь, оно ещё живо. Классный ресурс
03-03-2024 16:34
ПаХаН
Надо чтобы этот сайт был жив
20-02-2024 06:12
memoryspeak
обалденный сайт. искал ответ на вопрос, как скриптом закрыть вкладку, и наткнулся на это чудо.
08-02-2024 20:22
stark452
Разработчику огромный респект
08-02-2024 20:21
stark452
Если ее немного допилить
и сделать все правильно
то она может стать чем то весомым
08-02-2024 20:20
stark452
Странно что эта штука не популярна
08-10-2023 02:39
Darian
smiley
just testing the smileys
08-10-2023 02:38
Darian
._. -_- >o) ;(
08-10-2023 02:37
Darian
smiley
08-10-2023 02:36
Darian
smiley smiley smiley smiley :$ :?
Emoji Test
Статистика
 СегодняВсего
Посетителей64874101808
Запросов131268395540834
Online
Пользователей0
Гостей349
imgimgimgimg
 
img
     00:00