Вверх ↑
Этот топик читают: Гость
Ответов: 2236
Рейтинг: 676
#1: 2010-04-27 16:38:15 ЛС | профиль | цитата
1. Про "^" в ToolBar нигде не нашел, как им пользоваться? Чтоб как в HiAsm при клике на Open - диалог, при клике на стрелку выпадающий список.
2. Можно изминять состояния нажата/отжата кнопка при "+"?
3. Можно поместить ToolBar справа от Menu (как в HiAsm)? Пробовал резать Menu регионом и BringtoFront для ToolBar .
Пример: http://hiasm.com//getfile/17990

карма: 11

0
файлы: 1toolbar_01.sha [1.3KB] [426]
Ответов: 211
Рейтинг: 52
#2: 2010-04-28 04:05:59 ЛС | профиль | цитата
sla8a писал(а):
1. Про "^" в ToolBar нигде не нашел, как им пользоваться?

В ToolBar нереализована обработка события OnTBDropDown, препятствий особых нет, но интересно мнение форумчан касательно необходимости onDropDown.
В прищепке сей эксперимент, прежние ToolBar.pas, ToolBar.ini перед заменой сохранить.

карма: 1
слтв
5
файлы: 1toolbar_test.zip [3KB] [187]
Голосовали:Ravilr, sla8a, nesco, Konst, CriDos
Ответов: 4641
Рейтинг: 334
#3: 2010-04-28 07:48:23 ЛС | профиль | цитата
нужно однозначно! Попробовал. Работает!
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Разработчик
Ответов: 26113
Рейтинг: 2126
#4: 2010-04-28 10:10:16 ЛС | профиль | цитата
А будет ли продолжение сей реализации
карма: 22

0
Ответов: 2236
Рейтинг: 676
#5: 2010-04-28 10:19:44 ЛС | профиль | цитата
Конечно нужно! У меня тоже работает. Если есть возможность сделать чтоб кнопка нажималась, а не остовалась не нажатой при MouseDown, то вообще супер.
карма: 11

0
Разработчик
Ответов: 26113
Рейтинг: 2126
#6: 2010-04-28 10:33:36 ЛС | профиль | цитата
sla8a писал(а):
Если есть возможность сделать чтоб кнопка нажималась, а не остовалась не нажатой при MouseDown

Да, вот это бы неплохо реализовать, а то, чего-то, не комильфо это, с ненажатой кнопкой. А при клике, неплохо бы, чтобы выдавались координаты левого нижнего угла в сжатых координатых, понятных PopUpMenu
карма: 22

0
Ответов: 2236
Рейтинг: 676
#7: 2010-04-28 12:47:50 ЛС | профиль | цитата
nesco, оказывается "просто добавь воды" . Если после onDropDown идет PopupMenu то и кнопка нажата.
Пример: code_18003.txt

карма: 11

0
файлы: 1code_18003.txt [798B] [296]
Разработчик
Ответов: 26113
Рейтинг: 2126
#8: 2010-04-28 13:03:50 ЛС | профиль | цитата
sla8a писал(а):
Если после onDropDown идет PopupMenu то и кнопка нажата

Желательно вывести вот это
nesco писал(а):
А при клике, неплохо бы, чтобы выдавались координаты левого нижнего угла в сжатых координатых, понятных PopUpMenu

Имеется в виду -- левого нижнего угла текущей кнопки
карма: 22

0
Администрация
Ответов: 15295
Рейтинг: 1519
#9: 2010-04-28 17:43:49 ЛС | профиль | цитата
sla8a, а посмотреть примеры пакета ExampleFormsCommandCenter.sha?
карма: 27
0
Разработчик
Ответов: 26113
Рейтинг: 2126
#10: 2010-04-28 19:23:39 ЛС | профиль | цитата
Дааа, сильное там меню. Навел указатели, и фиг чего под ним видно. И что, с эти можно нормально работать, я, например, так не считаю
карма: 22

0
Ответов: 2236
Рейтинг: 676
#11: 2010-04-29 13:03:48 ЛС | профиль | цитата
1. Как сделать в CommandCenter.sha так:
Add(ToolBar,2486622,245,168)
{
Width=722
Height=24
Layout="gormenu"
Caption=0
Wrapable=1
Buttons=['=Новый'=[ZIP3604000078DA95912D6EC430104667A51EA04758D813EC010A2BF5240B03971A0606861A061A9A1A0E340C35749941813B4E1CCB7F59752D3D258AF5BE7C1E7F7EDFDE605B37E283788F5CE0BA6FC4FD7C79EF3704632F73B801C567F05683330ADC2A09014E2F04078B3331259C9E9FF8486ECCD022F3F38C8EBF70F20DF9BD8CA5CA38F15DE66FE750F11C6D46EDA358E8E9B20ECF7BD4BE26FFE797DE9D2DCF917AC834CF40E34B117D1733D6938CBDC7995F6674E619E641D4FE9AF92983FCA2C71A7BE88EAF4ABFCED8D160C857B2ED6F3A7E9A27113A284EF7368D2046F66F7FCBA07B358820C701AC20F81728762F7C8BF2D40F188DA0A6077835004E43E11EFF4F73EF10FE1F7C9C59E31EBEC592F0EDF81EEE57B247E3FD01BD0196AF],'^=Открыть'=[ZIP3604000078DA8D922D0F83301086BB64627212B9B9ED0F90CC2297CC4C6227919358241259CB4F40D62291486C2512D9DD958FDCE0283479D21E77EF4BAF6DF0F28FC20E1FB801E78183B8F489214F8731C6E2C57217633DC5CBCAFDCC3C3C595A24ACA37A9BBB54E2F4CD17FA5877D623D60E1A2382A259E8AF79251EAAB6FAA475001E816A17FAA0D0D6238738EBDCBC9516A1AA260FD4635F38A75DDF838BB0041F98A93E19F4916AA67D75CC3D21D88399EBA1B767A9A7B3DC03D54BE82B6560DF8AFC7F03181BA64F7AB76B63F4C0B3E7FE436321242A7A3E7D4CF3E841E1F63E7930FA659D64BE0FB90D3DADE5E235FFB57D70F563FC03A73D1FF4],'=Сохранить'=[ZIP3604000078DACD90AD0EC32010806FC91E608F30395BD3A4B6B2C94C5FA18F50393B5959C92B2091582472128B9D434CB03B5A9A8A9690345946F209B8FBEE87FA5E9E219C12B9219799135CA7C01C5F1FEFFD5FF0A82A604D03ACAE4108B1092B8A09CA43A22B9F3DE8AE0BD03B670C54DF8341E7FDF1E09C036BEDE2C7BC3D5F53BFB605390C608C596AE4FA5629E0B807C71968EE5823D7375A831EC73007E73CD478E15B8E9FCB9E4F3BA748F914A73D53C41A295FE1FF6D91EB1FED2FA5FC797FBA536C6FF708E5ACDDA37C017AD94051],'+'=[ZIP3604000078DA73F235636100033320D600620128666450804840E591C1FFFFFFF16262D4E0D34BAC3DB8F4EFDFBF9F68FD0C1F90D8AF50ED6778895D1D363318EE01F129A8FE0F50FA2454FC030137DC05E2FD40BC004D3F887F0062064EBD403782ED41D22BFFE22B83FE93F708334EFD47F10B8AFE8740BC0B556FFCF5FB0C8DE72E33C4DFB80F11DF055187E1E70F50B76F41E83700DADB74FE0A380E4034186C4184037A58A0DB2F07B51FA4370166FF4E4CFB51E2EC14AAFFE55E7E6530784C9CFFB1863F0C2C848ADF239C86C0669C84FA650B943E4538FE31D2DF43A89E07103E31E90F9F9964E52102FA01E5934A83]]
link(onDropDown,2959581:doEvent1,[])
}
Add(PopupMenu,16418563,483,154)
{
Point(onSelectStr)
}
Add(ArrayEnum,4433958,406,182)
{
link(onItem,16418563:doAddItem,[(464,188)(464,174)])
link(onEndEnum,16418563:doPopupHere,[(454,195)(454,160)])
link(Array,6830796:Array,[])
}
Add(StrList,6830796,392,112)
{
Strings=#6:File_1|6:File_2|
Point(doGetIndex)
Point(onGetIndex)
}
Add(Hub,2959581,364,175)
{
link(onEvent1,16418563:doClear,[])
link(onEvent2,4433958:doEnum,[])
}
Add(InfoTip,15058967,329,63)
{
Info=#32:список последних открытых файлов|
Frame=2
Width=211
Height=165
}


(чтоб выпадающий список можно было изменять)?
2. Почему если у ToolBar-а Align=None (CommandCenter.sha) он не отображается вообще? (или это только у меня)

А в ToolBar добавить возможность влиять на состояния кнопки (нажата/отжата) возможно? И вот еще и массив вынести отдельно для возможности изменять картинки кнопок.
карма: 11

0
Администрация
Ответов: 15295
Рейтинг: 1519
#12: 2010-04-29 19:42:48 ЛС | профиль | цитата
sla8a писал(а):
А в ToolBar добавить возможность влиять на состояния кнопки (нажата/отжата) возможно?

CMD_State
карма: 27
0
Ответов: 2236
Рейтинг: 676
#13: 2010-04-30 00:29:21 ЛС | профиль | цитата
Пример:code_18018.txt а список последних открытых файлов под open никак
карма: 11

0
файлы: 1code_18018.txt [2.3KB] [289]
Ответов: 2236
Рейтинг: 676
#14: 2010-05-03 13:21:56 ЛС | профиль | цитата
Не знаю, ошибка или опять я не так что делаю, проверьте схему. Хотел сделать, чтоб при не нажатой кнопке open кнопки save и saveas блокировались, а при вжатой разблокировались. Пробовал и так и этак, но без таймера не получилось.
Пример:code_18065.txt
карма: 11

0
файлы: 1code_18065.txt [3.5KB] [299]
Ответов: 356
Рейтинг: 31
#15: 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
Сообщение
...
Прикрепленные файлы
(файлы не залиты)