Вверх ↑
Ответов: 356
Рейтинг: 31
#1: 2010-05-03 20:39:19 ЛС | профиль | цитата
Вроде работает:

Make(delphi)
ver(4.04 build 184)
Add(MainForm,2953706,315,231)
{
Position=1
link(onCreate,13789938:doWork2,[])
}
Add(CommandCenter,2343900,378,245)
{
Name="centr1"
Commands=['^open='=[ZIP7E03000078DA8592B16EC23010860F65281B4C284B25D8DA47E8566564ECC8DAA51263C72C546264CCE8358FC068A908C9521746C6489D3C66B42A21FE9E13088E89E1F29F75BAFBEE74494CD4E36738243E63FA88884644F4C4CE291A539DB7F61A51C0E254DC900F67EA8E9C9658289600E6FBA09E85EC7FE62E9F6AC32DA9EE5281645DB8FC24DFBDC83DF3CBB24B1A892C5D3E596B6EC981CC74EB4DEA99DCD52DCCF3867CAE8C5DA95333850C68F865C5CF6581CA0C7CE395E0F225A64AD72F7E430D2F0C566D7966F9F32FE018ED6D4F8050A1CBC01FC79BE614792CACDE51C597964657F3C435DFAE7AF98A0CF267C08F45986FAA1E63E3EF01B078002872BCE7F929F7B501B6BFC01FFBE107383E02FF4E088099],'^save='=[ZIP7E03000078DAC58EA10EC2301884FF652F30459048ECE41CA9ACDC2B60F09518047272B2AF5039D904555989ACADC54D20CA2D259896261384DB7559EEFFEE5F892A3C4D43786FE954136D88688F83887614F345879AFEA473D749CE25635322D9B68B31E53CC2FA2AECF1082351521A21DC343D9E619E67EF7DE4E334E52D36F6BD1E06E75CAC94796F8C624C09815EAC947967AD1D47FC452985CADDDA025F76CAE3DA596779E4B86DD6B192E54DA232BF76BFD6FA17FBF18DD07C11461F78ADC25BB72A84CB9A53C7DE0BDCD689D3],'^saveas='=[ZIP7E03000078DAC58EA10E833010868FF002A865727216895B2A2B7905CC7CE5CCC42412D957A8443699AAAC9CACE51190DD4F2E9025B066A8FD5CC9E5BFEFBF9628C3571484FF91AE39D18188CE38B0E844EC4FBAE4F427DDAA4A4BA985E857D2653915A652326C1FCA370D0A8ED1DA2915FA3EC6388EE3300CCCF374CD7B6CAC6BDBB621048EA4F9C1392384510A398EA4F9E0BDEF3ADC628C41E4E57D824FD79AC7B3376B93871F3F047FE939B2C9BB59F0B949F39B5724786BEDB2999B5FF6B39F783F7A98EE8B305AE0BD9AEF7C6631DEF79C9C736F97297936]]
link(onRefresh,11554892:doSetState,[])
link(onAction,14510590:doCase,[])
}
Add(CMD_ToolBar,4201814,364,189)
{
CommandCenter="centr1"
ToolBar="plane1"
Menu=#4:open|4:save|6:saveas|
}
Add(ToolBar,8277116,420,189)
{
Left=130
Top=1
Width=72
Height=24
Align=2
Name="plane1"
Layout="gorToolBar"
Caption=0
Wrapable=1
Buttons=[]
}
Add(CMD_State,11554892,525,245)
{
CommandCenter="centr1"
Name="open"
Enabled=1
link(onSetState,1873712:doSetState,[])
link(Checked,7264026:Value,[])
}
Add(CMD_State,1873712,574,245)
{
CommandCenter="centr1"
Name="save"
Enabled=1
link(onSetState,7137511:doSetState,[])
link(Enabled,8321406:Var2,[])
}
Add(CMD_State,7137511,630,245)
{
CommandCenter="centr1"
Name="saveas"
Enabled=1
link(Enabled,8321406:Var3,[(643,236)])
}
Add(Case,14510590,427,252)
{
Value=String(open)
link(onTrue,13102671:doSwitch,[])
}
Add(Switch,13102671,476,259)
{
DataOn=Integer(1)
DataOff=Integer(0)
Point(State)
link(onSwitch,10368315:doEvent,[(517,265)(517,238)(483,238)(483,195)])
}
Add(IndexToChanel,10368315,490,189)
{
Data=Integer(1)
link(onEvent1,7264026:doValue,[])
link(onEvent2,7264026:doClear,[])
}
Add(GetDataEx,8321406,581,231)
{
Angle=3
link(Data,13102671:State,[(563,236)(563,301)(482,301)])
}
Add(Memory,7264026,539,189)
{
Default=Integer(0)
link(onData,13789938:doWork1,[(580,195)(580,226)(361,226)])
}
Add(HubEx,13789938,357,245)
{
link(onEvent,2343900:doRefresh,[])
}

sla8a писал(а):
список последних открытых файлов

В компоненте CMD_ToolBar измени текст на

open
(
alpha
)


карма: 0

1
Голосовали:sla8a