Alexanderpa, вот схемка, но будте очень внимательны и осторожны!!:
[code:1]Add(MainForm,1587214,154,203) {
Left=20
Top=105
Width=342
Height=201
link(onCreate,738489:doCheck,[])
}
Add(Memory,1174238,413,189)
{
link(onData,12834885:doString,[(455,195)(455,327)(331,327)(331,314)])
}
Add(Memory,15366076,364,182)
{
}
Add(FileTools,15295667,413,308)
{
link(FileName,11866982:Value,[(419,297)(216,297)])
}
Add(FileSearch,120760,98,126)
{
link(onSearch,6347349:doEvent1,[])
link(onEndSearch,3762427:doText,[(140,139)(140,166)(88,166)(88,181)])
link(Ext,11045631:Text,[])
link(Dir,8820610:Value,[(111,118)(216,118)])
}
Add(Edit,11045631,98,77)
{
Left=10
Top=35
Width=85
Text="*.*"
}
Add(Browse,3228538,154,28)
{
link(onBrowse,8820610:doValue,[])
}
Add(ChildPanel,15903604,28,28)
{
link(onEvent1,10352675:doEvent1,[])
}
BEGIN_SDK
Add(EditMulti,149881,3,3)
{
EventCount=1
}
Add(Panel,10596757,35,105)
{
Left=10
Top=5
Width=86
Height=21
BorderWidth=0
BevelInner=0
BevelWidth=0
Alignment=2
Point(doColor)
}
Add(Button,6130314,35,21)
{
Left=2
Top=2
Width=82
Height=17
Align=5
Caption="Выбрать папку"
link(onClick,149881:onEvent1,[(185,27)(185,9)])
}
END_SDK
Add(Label,8043411,28,175)
{
Left=195
Top=135
Width=61
Height=17
Caption="шт. файлов"
}
Add(Message,11033451,259,28)
{
Caption="Начать переименование файлов в папке?:"
Type=2
link(onMessage,7414831:doCompare,[])
}
Add(If_else,7414831,308,28)
{
Op2=Integer(6)
link(onTrue,120760:doSearch,[(360,34)(360,70)(86,70)(86,132)])
}
Add(Memory,8820610,210,28)
{
link(onData,11033451:doMessage,[])
}
Add(Edit,6171539,406,147)
{
Left=260
Top=95
Width=65
Text="jpg"
}
Add(ChildPanel,10130288,28,224)
{
link(onEvent1,1587214:doClose,[])
}
BEGIN_SDK
Add(EditMulti,149881,3,3)
{
EventCount=1
}
Add(Panel,10596757,35,105)
{
Left=260
Top=135
Width=66
Height=21
BorderWidth=0
BevelInner=0
BevelWidth=0
Alignment=2
Point(doColor)
}
Add(Button,6130314,35,21)
{
Left=2
Top=2
Width=82
Height=17
Align=5
Caption="Выход"
link(onClick,149881:onEvent1,[(185,27)(185,9)])
}
END_SDK
Add(Hub,1690782,280,238)
{
link(onEvent1,11205507:doIndex,[(375,244)(375,244)])
link(onEvent2,2217446:doIndex,[(380,251)(345,251)])
}
Add(Edit,3762427,98,175)
{
Left=145
Top=135
Text="0"
ReadOnly=0
link(Str,120760:Count,[])
}
Add(FilePart,9206985,259,175)
{
link(onPath,11449907:doValue,[])
link(onName,15366076:doValue,[])
link(onExt,1174238:doValue,[])
}
Add(Edit,8322111,245,77)
{
Left=190
Top=95
Width=55
Text="0"
DataType=1
}
Add(Edit,3081043,357,140)
{
Left=5
Top=95
Width=150
Text="МоиФото"
}
Add(Memory,11449907,315,175)
{
}
Add(Memory,11866982,210,175)
{
link(onData,9206985:doPart,[])
}
Add(FormatStr,12834885,343,308)
{
DataCount=4
Mask="%1%2_%3.%4"
link(onFString,15295667:doMove,[])
link(Str1,8401819:Count,[(349,290)(251,290)])
link(Str2,11449907:Value,[(356,284)(321,284)])
link(Str3,2217446:Var,[])
link(Str4,11205507:Var,[(370,284)(412,284)])
}
Add(GetIndexData,2217446,357,245)
{
link(Data1,3081043:Text,[])
link(Data2,15366076:Value,[])
}
Add(GetIndexData,11205507,406,238)
{
link(Data1,6171539:Text,[])
link(Data2,1174238:Value,[])
}
Add(Hub,10352675,98,28)
{
OutCount=3
link(onEvent1,3228538:doBrowse,[])
link(onEvent2,8401819:doMin,[(200,41)(200,153)])
link(onEvent3,8401819:doReset,[(200,48)(200,146)])
}
Add(Hub,6347349,154,126)
{
link(onEvent1,8401819:doNext,[])
link(onEvent2,11866982:doValue,[(193,139)(193,181)])
}
Add(Counter,8401819,245,126)
{
Max=999999999
Point(Min)
Point(doMin)
link(Min,8322111:Text,[])
}
Add(Label,12695864,28,126)
{
Left=5
Top=135
Width=140
Height=17
Caption="Найдено и переименовано"
}
Add(CheckBox,738489,231,238)
{
Left=120
Top=5
Width=215
Caption="Сохранить старые имя и расширение"
link(onCheck,1690782:doEvent1,[])
}
Add(Label,4810700,28,77)
{
Left=120
Top=40
Width=188
Height=17
Caption="Маска файлов для переименований"
}
Add(Label,9642077,294,77)
{
Left=10
Top=75
Width=316
Height=17
Caption="Новые : Имя Номер Расширение"
AutoSize=1
}
Add(StyleXP,10391781,28,273)
{
}
[/code:1]
[b]Galkov[/b], почему-то не работает верхняя точка Ext (кроме *) у элемента FileSearch - посмотрите?