Редактировалось 2 раз(а), последний 2025-01-09 15:00:15

Ну вот, спросил - и сразу убежал... Может напугал кто

Гость, смотри плэер имени Serj

Похоже, что этого файла больше в свободном доступе нет Как и сайта http://www.serjhack.nm.ru/

Гость, у меня есть этот плеер (S-Player), сделанный коллегой Serj на HiAsm-е, но я не знаю, будет-ли он работать при простой перезаписи; ~400 кб, если хочешь вышлю.

Редактировалось 2 раз(а), последний 2025-01-09 15:00:15

Редактировалось 2 раз(а), последний 2025-01-09 15:00:15

CASPER_Y, попробуйте использовать элементы из списка File: "Файловые операции" (FileTools), "Поиск файлов" (FileSearch), "Разделение имени" (FilePart).
"прога - слишком хороша" - если это про HiAsm, определение слабовато.

Редактировалось 2 раз(а), последний 2025-01-09 15:00:16

Вот так можно попробывать
[code:1]Add(ListBox,14022085,189,119) {
Left=75
Top=30
Width=215
Height=185
Strings=#6:Песня1|6:Песня2|6:Песня3|
Point(doSelect)
Point(String)
Point(Index)
Point(onDblClick)
link(onDblClick,5888901:doData,[])
}
Add(MediaPlayer,6570693,161,224)
{
link(onEndPlay,11008782:doOperation,[])
}
Add(DoData,5888901,280,140)
{
link(onEventData,9274301:doWork2,[(324,146)(324,146)])
link(Data,16664653:Var3,[(286,130)(254,130)(254,191)])
}
Add(Math,11008782,217,224)
{
Op2=1
link(onResult,1684351:doEvent1,[])
link(Op1,16664653:Var2,[(223,220)(223,241)])
}
Add(Hub,1684351,266,224)
{
link(onEvent1,14022085:doSelect,[(326,230)(326,204)(179,204)(179,167)])
link(onEvent2,9274301:doWork3,[(333,237)])
}
Add(ArrayRW,13151026,357,140)
{
link(onRead,6570693:doPlay,[(408,146)(408,277)(131,277)(131,230)])
link(Array,3492746:Array,[(363,128)(363,128)])
}
Add(GetDataEx,16664653,210,182)
{
link(Data,14022085:Index,[(223,182)(223,196)])
}
Add(StrList,3492746,343,70)
{
Strings=#8:C:1.mp3|8:C:2.mp3|8:C:3.mp3|
}
Add(HubEx,9274301,329,133)
{
link(onEvent,13151026:doRead,[(351,146)(351,146)])
}
[/code:1]

Редактировалось 2 раз(а), последний 2025-01-09 15:00:16

В компонент StrList добавляеш пути для трех песен
C:1.mp3

Редактировалось 2 раз(а), последний 2025-01-09 15:00:16

Редактировалось 2 раз(а), последний 2025-01-09 15:00:17

В голову пришло только это смотри пример в архиве
http://dncorp.narod.ru/Project1.zip