Вверх ↑
Ответов: 16884
Рейтинг: 1239
#1: 2011-12-15 14:10:34 ЛС | профиль | цитата
nesco писал(а):
а у тебя не предусмотрено изменение маски ODialog-a, а у меня предусмотрено
А нафига ?
RinniX писал(а):
Теперь-то можно сказать, что схема, для новичков будет полезна?
Боже избавь и сохрани.
code_26193.txt
Имея в StrList-е точку doSort применять что-то ещё - нет слов. Вернее есть, но все непечатаемые.
------------ Дoбавленo в 14.10:
Вот, примерно, как смотрится твой плеер
plvp.png
а вот схема "верхней панели". Всего 28 компонент и работает
Add(ChildPanel,8914957,420,210)
{
@Hint=#8:Верхняя |6:панель|
@Color=22015
AddHint(16,-37,60,26,@Hint)
}
BEGIN_SDK
Add(EditMulti,11379764,14,14)
{
@Color=14933984
EventCount=2
WorkCount=1
Width=909
Height=270
VOffset=28
HOffset=28
link(doWork1,1299792:In,[])
}
Add(Panel,1200760,91,21)
{
@Color=14933984
Width=721
Height=20
Align=2
BorderWidth=0
BevelInner=0
BevelWidth=0
}
Add(Button,13052747,42,105)
{
@Color=14933984
Width=115
Caption="Выбрать папку"
link(onClick,13984571:doBrowse,[])
}
Add(Button,12820089,42,182)
{
@Color=14933984
Left=115
Width=115
Caption="Выбрать файлы"
link(onClick,16572113:doExecute,[])
}
Add(FileSearch,11341435,154,105)
{
@Color=14933984
link(onSearch,11034758:doEvent1,[])
link(onEndSearch,10149094:doWork1,[(193,118)])
}
Add(Browse,13984571,98,105)
{
@Color=14933984
Title="Выбор каталога"
Edit=1
NewDirButton=1
link(onBrowse,11341435:doSearch,[])
}
Add(ODialog,16572113,98,182)
{
@Color=14933984
Filter="mp3|*.mp3|wma|*.wma"
Title="Open Files"
FileName=""
Select=1
Point(StartDir)
link(onExecute,7388129:doEvent1,[])
}
Add(Hub,7388129,140,182)
{
@Color=14933984
link(onEvent1,9743703:doWork3,[(375,188)])
link(onEvent2,10149094:doWork2,[])
}
Add(HubEx,10149094,189,189)
{
link(onEvent,14869665:doEvent1,[])
}
Add(Hub,11034758,210,105)
{
link(onEvent1,15620919:doPart,[])
link(onEvent2,11219923:doCompare,[(240,118)(240,146)])
}
Add(FilePartElm,15620919,252,105)
{
Mode=4
link(onPart,14982035:doGetIndex,[(293,111)(293,125)])
}
Add(StrList,14982035,308,77)
{
Strings=#3:mp3|3:wma|3:avi|0:|
Point(Index)
Point(doGetIndex)
}
Add(If_else,11219923,329,140)
{
Type=5
Op2=Integer(-1)
link(onTrue,9743703:doWork2,[])
link(Op1,14982035:Index,[])
}
Add(HubEx,9743703,371,140)
{
link(onEvent,9543230:doAdd,[])
}
Add(StrList,9543230,483,140)
{
@Hint=#15:Найденные файлы|
@Color=14933984
Point(doGetString)
Point(onGetString)
Point(doSort)
link(onGetString,11379764:onEvent1,[(581,153)(581,48)])
AddHint(-47,-24,110,13,@Hint)
}
Add(FilePartElm,3504482,679,140)
{
@Color=14933984
Mode=2
link(onPart,12076056:doAdd,[])
}
Add(ArrayEnum,15693035,497,210)
{
@Color=14933984
link(onItem,3504482:doPart,[(642,216)(642,146)])
link(onEndEnum,781061:doEnum,[])
link(Array,9543230:Array,[])
}
Add(Hub,14869665,448,189)
{
link(onEvent1,9543230:doSort,[])
link(onEvent2,15693035:doEnum,[(483,202)(483,216)])
}
Add(StrList,12076056,728,140)
{
@Hint=#12:Имена файлов|
Point(doGetString)
Point(onGetString)
AddHint(18,-22,90,13,@Hint)
}
Add(ArrayEnum,781061,742,217)
{
link(onItem,9490522:doRowAction,[])
link(Array,12076056:Array,[])
}
Add(MST_RowAction,9490522,791,217)
{
@Color=14933984
MSTControl="parent.table"
link(onChange,6399236:doEvent1,[])
}
Add(MST_ColAction,1788040,861,224)
{
@Color=14933984
Action=9
MinColWidth=150
MaxColWidth=300
MSTControl="parent.table"
}
Add(Hub,6399236,833,217)
{
link(onEvent1,11379764:onEvent2,[(911,223)(911,55)])
link(onEvent2,1788040:doColAction,[])
}
Add(LineBreak,12861508,420,168)
{
Caption="Выбор"
link(Out,9543230:doGetString,[(475,174)(475,188)])
Primary=[1299792,-392,-126]
}
Add(InfoTip,2810047,21,56)
{
Info=#20:Поиск и выбор файлов|
Font=[MS Sans Serif,8,1,255,1]
Width=365
Height=186
Margin=5
}
Add(InfoTip,516776,406,56)
{
Info=#12:Список путей|12:и сортировка|
Font=[MS Sans Serif,8,1,255,1]
Width=225
Height=193
Margin=5
}
Add(InfoTip,4610623,651,63)
{
Info=#26:Вывод имен файлов на экран|
Font=[MS Sans Serif,8,1,255,1]
Width=253
Height=207
Margin=5
}
END_SDK
и всё понятно и без кабелей, а если применить мультикипанели Ex, то можно и точкам дать осмысленные имена.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 2code_26193.txt [1.9KB] [393], plvp.png [2.8KB] [439]