Вверх ↑
Ответов: 2059
Рейтинг: 131
#1: 2018-01-24 14:14:31 ЛС | профиль | цитата
Rysik, http://forum.hiasm.com/getfile/38023


Add(MainForm,10038279,231,189)
{
Width=814
Height=543
}
Add(Button,11062379,385,196)
{
Left=10
Top=485
link(onClick,4287075:doSearch,[])
}
Add(Edit,395479,484,91)
{
Left=90
Top=485
Width=260
Text="Имя*"
}
Add(FileSearch,4287075,484,196)
{
link(onSearch,7681868:doAdd,[])
link(Ext,395479:Text,[])
link(Dir,8601004:Select,[(497,184)(464,184)(464,309)(419,309)])
}
Add(DriveBox,14089754,339,245)
{
Left=5
Top=5
Width=60
Height=21
Ctl3D=0
WinStyle=1
AutoSetDisk=0
Disk="c"
Point(doDisk)
Point(DefaultDisk)
link(onSelect,8601004:doSetDir,[])
}
Add(ShellBrowser,8601004,413,245)
{
Top=30
Width=392
Height=440
Font=[Tahoma,9,0,0,204]
DefaultDir="c:\"
Style=2
FileCollumWidth=200
SizeCollumWidth=80
ShowUpDir=0
AutoDblClicks=0
Point(onDblClick)
Point(onMouseDown)
Point(onMouseMove)
Point(doStyle)
Point(doShellUpdate)
Point(doShellSort)
Point(onChangeDir)
Point(doUpLevel)
}
Add(ListBox,7681868,624,196)
{
Left=401
Top=30
Width=394
Height=440
Font=[Tahoma,9,0,8388608,204]
Name="lista"
Hint=" "
HintManager=""
DataType=1
Point(doHint)
Point(String)
Point(onKeyDown)
Point(onDblClick)
Point(Value)
Point(Index)
Point(onMouseDown)
Point(onMouseMove)
Point(doSelect)
Point(MouseY)
Point(MouseX)
Point(PHandle)
Point(onMouseEnter)
Point(Width)
link(onClick,8601004:doSetfile,[(702,209)(702,233)(401,233)(401,258)])
}

P.S.
Поправил схему, в соответствии Т.З.
карма: 6

0
Редактировалось 2 раз(а), последний 2018-01-24 14:59:51