Вверх ↑
Этот топик читают: Гость
Ответов: 1088
Рейтинг: 112
#1: 2008-04-19 07:06:09 ЛС | профиль | цитата
Прозрачная панель задач
карма: 0
Время верстки: %cr_time% Текущее время: %time%
1
файлы: 1trayalpha.zip [640B] [287]
Голосовали:Валерий
Разработчик
Ответов: 26304
Рейтинг: 2146
#2: 2008-04-19 22:35:44 ЛС | профиль | цитата
А вот так и значение прозрачности при запуске передавать можно как параметр


Add(MainForm,471723,91,154)
{
Left=20
Top=105
link(onCreate,4713128:doEvent1,[])
}
Add(DoData,10941799,273,308)
{
Data=Integer(100)
link(onEventData,8348915:doAlphaBlendValue,[(313,314)(313,335)])
}
Add(WinTools,8348915,329,301)
{
Point(doAlphaBlendValue)
link(Handle,10948910:Handle,[(335,289)(279,289)(279,352)(223,352)])
}
Add(WinTools,10828096,364,168)
{
Point(doAlphaBlendValue)
link(Handle,464983:Handle,[(370,160)(216,160)])
}
Add(FindWindow,10948910,217,308)
{
ClassName="Progman"
SkipParam=1
link(onFind,10941799:doData,[])
}
Add(FindWindow,464983,210,175)
{
ClassName="Shell_TrayWnd"
SkipParam=1
link(onFind,12470304:doData,[])
}
Add(Hub,4713128,147,168)
{
OutCount=3
link(onEvent1,13820895:doRead,[(195,174)(195,104)])
link(onEvent2,464983:doFind,[])
link(onEvent3,471723:doClose,[(189,188)(189,208)(79,208)(79,181)])
}
Add(DoData,12470304,308,175)
{
Data=Integer(190)
link(onEventData,10828096:doAlphaBlendValue,[(352,181)(352,202)])
link(Data,9457179:Value,[])
}
Add(InfoTip,7334058,196,273)
{
Info=#28:Рабочий стол с прозрачностью|
Width=183
Height=88
}
Add(Application,8077533,203,49)
{
}
Add(ArrayRW,13820895,210,98)
{
Index=Integer(0)
link(onRead,13358263:doCase,[])
link(Array,8077533:Params,[])
}
Add(Memory,9457179,308,98)
{
Default=Integer(190)
}
Add(Case,13358263,259,98)
{
link(onNextCase,9457179:doValue,[])
}


------------ Дoбавленo:

Мне понравилось и я ее немного улучшил. Прицепил TrayIcon и TrackBar для оперативной настройки с сохранением в реестре



Add(MainForm,471723,49,203)
{
Left=20
Top=105
Visible=1
Icon=[ZIP5E07000078DA636060044209090610C9E0C1CEC020C6C0C0A001C4402106030688380828B0338C82210E74666A18D42B19D52919D72A19572819572B1A542A1956291A562B9815299817C8BB66C978444B36D872B73AF335D8F001190D7640C4034320769B23AFF6221DBDD95A06D3D44CFBD54C7A54F5BAB495AA2D242B9DE51B2DF46668EA4FD534AC574A8E135F9EAFBA2A5D69B6BFC09C00C1398140526876800084312F50685188B0E12A7DFD357A8A1B354557A9F02E13E26E76E39D5C2031A349A4D151BC535771A5A6CA0C0DD57C85E9BD16272A548E644B1DCE963A922D7D2447E6301081B8D287B2A4B6264B1AAD31D45FA7A33ACB49A8DE56ACC64CB32348E9CE0FC13BFFC567CE16A9B7535BA7A3BD4CC7B450A1B356F772A3C6C552B90B4054A670A14CEE62990208952BDCACD7DA9325ADBF425F6DA1996AAB6D46B3F6F32992FFA732546F9EC670E233EF8A0D22CD3E52DD9E9A2B3583CBE5AA4A35EE4D32B9D9A07CBD4EF946BDD28D7A20A9024437EB951F77191E2E96335C0E34C75CACDE6566AFF8FF83FCFF77305C3BC2C07F2759F144A8FC446BBEEA70ED65DA3E657253CB349FCDB37ADCADF5B053E35EBBFAFD7620A9711F8C5E4D363B53A3ACBF584F6F9DAE689393E574F1BB5B24AECE524E5B15A9FBBFC6E37F95EE061FBECA40993996F6A50A4BEAF55E2DB17B3959EFC5041D10EA0792DA2F26E83E9FA8FB79AEE5C52675DD25BA7AEB74F8BA2D399ACDD5E34E2A9B7C63B0F82F77799AE55B77DDBD4EA26D4E32336C8109606B9FE5C7E5361F66E97D9865F06196FE7B100342EAFD5A6673BB4B5B67818EC9462391F9F23C75D6C2415FD54DFF4BE8FEE72E8FE2EF55106DB7565860AA365BDF2257EEDE12D79F3B3C7E2C31F9BAD0088C4CBE2E00B28DBF2D30FEBFD6E1FE643D9D85DABEFB3D430EFB194C7375EF5E6898F0D5A07873E06A97BCF37ED1E7535C4FFBCA77AB9965CA3E58EEFE67BFDF9FB5367F565BFD5967F377B3E3DF2DCE7F76B8FDDB60FF7FA7E7D3190686CB0D03AE0686DE0AC9F99A93F12633FD4546D4F5D8CCF759B9DF72125F2424BD4854AB57F52E547AB32FE2CFCDF4FFB733FEDF4AFB7F2BFDFFDD6C10BA9FFBFF61DEFFEB29EF17980003D96C9799C97613931D26E67BCDF5B7E94190F14E23ABFD56D607AD0A9AD537F4E83E5F60F96E99F5FBB58E6F9658BC5E60F26AAE111CBD9E67FC7681E9680933B4C07F1C0024450AC60500391FB554]
link(onCreate,4713128:doEvent1,[])
}
Add(WinTools,10828096,658,203)
{
Point(doAlphaBlendValue)
link(Handle,464983:Handle,[(664,191)(398,191)(398,275)(174,275)])
}
Add(FindWindow,464983,168,231)
{
ClassName="Shell_TrayWnd"
SkipParam=1
link(onFind,12470304:doData,[])
}
Add(Hub,4713128,98,217)
{
OutCount=4
link(onEvent1,4398565:In,[(140,223)(140,216)])
link(onEvent2,13820895:doRead,[(146,230)(146,160)])
link(onEvent3,464983:doFind,[])
link(onEvent4,11699333:doHide,[(153,244)(153,321)])
}
Add(DoData,12470304,287,231)
{
Data=Integer(190)
link(onEventData,10136096:doEvent1,[])
link(Data,9457179:Value,[])
}
Add(Application,8077533,161,105)
{
}
Add(ArrayRW,13820895,168,154)
{
Index=Integer(0)
link(onRead,5063807:doWork2,[])
link(Array,8077533:Params,[])
}
Add(Memory,9457179,287,154)
{
Default=Integer(190)
}
Add(Case,13358263,238,154)
{
link(onNextCase,9457179:doValue,[])
}
Add(TrayIcon,11699333,168,308)
{
Hint="TrayAlpha"
ShowWORemoveIcon=0
Point(doHint)
link(onClick,6833938:doEvent,[])
}
Add(IndexToChanel,6833938,224,308)
{
link(onEvent1,3368625:doData,[(268,314)(268,286)])
link(onEvent2,8397361:doEvent1,[])
}
Add(ChildForm,15144711,539,315)
{
link(onEvent1,3875105:doEvent1,[])
link(onEvent2,11699333:doHint,[(583,328)(583,447)(153,447)(153,335)])
}
BEGIN_SDK
Add(EditMulti,10790387,21,21)
{
EventCount=2
WorkCount=4
VarCount=1
Width=216
Height=165
link(doWork1,287234:doEvent1,[(52,27)(52,97)])
link(doWork2,307283:doLeft,[(46,34)(46,111)])
link(doWork3,307283:doTop,[(39,41)(39,118)])
link(doWork4,10538825:doWork1,[(77,48)(77,34)])
link(Var1,307283:Height,[(27,135)(139,135)])
}
Add(MainForm,307283,133,70)
{
Width=28
Height=200
Visible=1
BorderStyle=0
ClientSize=0
Position=1
Point(doVisible)
Point(doLeft)
Point(doTop)
Point(Height)
}
Add(ChildPanel,10538825,133,28)
{
link(onEvent1,10790387:onEvent1,[(187,34)(187,27)])
link(onEvent2,10790387:onEvent2,[(201,41)(201,34)])
}
BEGIN_SDK
Add(EditMulti,169549,21,21)
{
EventCount=2
WorkCount=2
Width=328
Height=130
link(doWork1,5259947:doCalc,[(42,27)(42,83)])
link(doWork2,11592609:doSetFocus,[(42,34)(42,48)])
}
Add(TrackBar,7982650,112,77)
{
Left=5
Top=5
Width=18
Height=190
TabOrder=-1
Max=0
Min=-255
Kind=1
Point(doHint)
link(onPosition,2160857:doOperation,[])
}
Add(Panel,11592609,63,35)
{
Width=28
Height=200
Point(doSetFocus)
}
Add(Math,2160857,161,77)
{
OpType=33
ResultType=0
link(onResult,10151876:doEvent1,[])
}
Add(MathParse,5259947,63,77)
{
DataCount=1
MathStr="- %1"
link(onResult,7982650:doPosition,[])
}
Add(Hub,10151876,210,77)
{
OutCount=3
link(onEvent1,169549:onEvent1,[(259,83)(259,27)])
link(onEvent2,257092:doString,[])
link(onEvent3,7982650:doHint,[(258,97)(258,133)(100,133)(100,97)])
}
Add(FormatStr,257092,273,84)
{
DataCount=1
Mask="TrayAlpha - %1"
link(onFString,169549:onEvent2,[(327,90)(327,34)])
}
END_SDK
Add(Hub,287234,63,91)
{
link(onEvent1,10538825:doWork2,[(114,97)(114,41)])
link(onEvent2,307283:doVisible,[])
}
END_SDK
Add(DoData,3368625,287,280)
{
Data=Integer(0)
link(onEventData,8667935:doWork1,[(354,286)])
}
Add(HubEx,8667935,350,308)
{
link(onEvent,15144711:doWork1,[])
}
Add(MouseEvent,1471177,392,336)
{
}
Add(DoData,6823919,392,399)
{
link(onEventData,15144711:doWork2,[(433,405)(433,328)])
link(Data,1471177:MouseX,[])
}
Add(Hub,8397361,287,315)
{
OutCount=3
link(onEvent1,8667935:doWork2,[])
link(onEvent2,6823919:doData,[(353,328)(353,405)])
link(onEvent3,3990090:doCalc,[(343,335)(343,412)])
}
Add(MathParse,3990090,441,406)
{
MathStr="%1 - %2 - 16"
link(onResult,15144711:doWork3,[(500,412)(500,335)])
link(X1,1471177:MouseY,[(447,387)(405,387)])
link(X2,15144711:Var1,[(454,387)(545,387)])
}
Add(Hub,10136096,357,231)
{
link(onEvent1,2373126:doWork2,[])
link(onEvent2,15144711:doWork4,[(464,244)(464,342)])
}
Add(HubEx,2373126,623,224)
{
link(onEvent,10828096:doAlphaBlendValue,[])
}
Add(Registry,16506524,658,322)
{
HKey=1
Key="SoftwareTrayAlpha"
Value="Alpha"
DataType=0
link(onRead,6219115:In,[])
link(Data,10024593:Value,[])
}
Add(Hub,3875105,588,315)
{
OutCount=3
link(onEvent1,2373126:doWork3,[(627,321)])
link(onEvent2,10024593:doValue,[(635,328)(635,286)])
link(onEvent3,16506524:doWrite,[])
}
Add(Memory,10024593,658,280)
{
Default=Integer(0)
}
Add(LineBreak,14677926,581,350)
{
Caption="doRead"
link(Out,16506524:doRead,[(645,356)(645,328)])
Primary=[4398565,-420,-140]
}
Add(LineBreak,723301,161,189)
{
Caption="onRead"
link(Out,5063807:doWork3,[(221,195)])
Primary=[6219115,546,133]
}
Add(HubEx,5063807,217,147)
{
link(onEvent,13358263:doCase,[])
}

карма: 22

0
2
Сообщение
...
Прикрепленные файлы
(файлы не залиты)