Вверх ↑
Этот топик читают: Гость
Ответов: 177
Рейтинг: 24
#1: 2014-11-03 19:31:52 ЛС | профиль | цитата
У меня на форме окно с прозрачностью. Окно при нажатии соответствующей кнопки должно менять свою рамку.
При выборе 0 - "bsNone", 1 - "bsSingle", 2 - "bsSizeable", всё проходит нормально, рамка меняется прозрачность сохраняется. Однако при выборе последующих рамок от 3 - "bsDialog" до 9 - "bsSizeBoxEdge" пропадает прозрачность формы! И если вернуть обратно 0 - "bsNone", то прозрачность не возвращается. Не спасает и закрытие дочернего окна, только перезапуск программы возвращает прозрачность форме!!!
Подскажите пожалуйста, как мне это можно поправить, чтобы форма оставалась прозрачной при выборе любой рамки???

code_34549.txt
карма: 1

0
файлы: 1code_34549.txt [4.2KB] [125]
Разработчик
Ответов: 26170
Рейтинг: 2127
#2: 2014-11-03 21:54:53 ЛС | профиль | цитата
Lora писал(а):
Подскажите пожалуйста, как мне это можно поправить, чтобы форма оставалась прозрачной при выборе любой рамки???

Add(MainForm,11952613,406,175)
{
Width=361
Height=245
Name="main"
AlphaBlendValue=230
BorderStyle=1
DragForm=0
TransparentColor=-16777201
TransparentManager="clf"
}
Add(ChildForm,9634494,350,175)
{
link(onEvent1,11952613:doClose,[(394,181)(394,202)])
}
BEGIN_SDK
Add(EditMulti,11363449,21,21)
{
EventCount=1
Width=727
Height=508
}
Add(MainForm,5793230,511,196)
{
Left=35
Top=105
Width=200
Height=140
Color=12632256
Ctl3D=0
WinStyle=1
Name="form2"
BorderStyle=0
TransparentManager="transp2"
FormFastening="parent.main"
Point(doBorderStyle)
}
Add(TransparentManager,12915390,504,147)
{
Name="transp2"
FormTranspColor=12632256
}
Add(ChildForm,3719989,427,217)
{
link(onEvent1,5793230:doClose,[])
}
BEGIN_SDK
Add(EditMulti,2633236,21,21)
{
EventCount=1
WorkCount=1
Width=727
Height=592
link(doWork1,2871258:In,[(49,27)(49,48)])
}
Add(MainForm,4779317,588,196)
{
Left=35
Top=105
Width=516
Height=395
Color=12632256
Ctl3D=0
WinStyle=1
Name="form2"
BorderStyle=1
Position=1
TransparentManager="transp3"
Point(doBorderStyle)
Point(doVisible)
Point(Handle)
link(onCreate,7332652:doWork1,[(627,216)(627,188)(494,188)])
}
Add(HubEx,11969497,287,133)
{
link(onEvent,15814920:doEvent1,[(378,139)(378,230)])
}
Add(Button,1989753,245,112)
{
Left=55
Top=315
Caption="0"
Data=Integer(0)
link(onClick,11969497:doWork1,[(291,118)])
}
Add(Button,10914283,229,444)
{
Left=360
Top=315
Caption="8"
Data=Integer(8)
link(onClick,1285805:doWork2,[])
}
Add(Button,198314,244,156)
{
Left=55
Top=335
Caption="1"
Data=Integer(1)
link(onClick,444523:doWork1,[(299,162)(299,163)])
}
Add(Button,6371677,243,202)
{
Left=130
Top=315
Caption="2"
Data=Integer(2)
link(onClick,2450179:doWork2,[])
}
Add(Button,3985280,241,288)
{
Left=130
Top=335
Caption="3"
Data=Integer(3)
link(onClick,8635997:doWork2,[])
}
Add(Button,7489892,240,245)
{
Left=205
Top=315
Caption="4"
Data=Integer(4)
link(onClick,8127519:doWork2,[])
}
Add(Button,8270556,236,325)
{
Left=205
Top=335
Caption="5"
Data=Integer(5)
link(onClick,13136149:doWork2,[])
}
Add(Button,16677445,234,362)
{
Left=285
Top=315
Caption="6"
Data=Integer(6)
link(onClick,1389637:doWork2,[])
}
Add(Button,6408118,233,403)
{
Left=285
Top=335
Caption="7"
Data=Integer(7)
link(onClick,8419353:doWork2,[])
}
Add(Button,11494622,222,491)
{
Left=360
Top=335
Caption="9"
Data=Integer(9)
link(onClick,1285805:doWork3,[(291,497)])
}
Add(HubEx,444523,287,157)
{
Angle=3
link(onEvent,11969497:doWork3,[])
}
Add(HubEx,2450179,287,202)
{
Angle=3
link(onEvent,444523:doWork3,[])
}
Add(HubEx,8127519,287,245)
{
Angle=3
link(onEvent,2450179:doWork3,[])
}
Add(HubEx,8635997,287,288)
{
Angle=3
link(onEvent,8127519:doWork3,[])
}
Add(HubEx,13136149,287,325)
{
Angle=3
link(onEvent,8635997:doWork3,[])
}
Add(HubEx,1389637,287,362)
{
Angle=3
link(onEvent,13136149:doWork3,[])
}
Add(HubEx,8419353,287,403)
{
Angle=3
link(onEvent,1389637:doWork3,[])
}
Add(HubEx,1285805,287,444)
{
Angle=3
link(onEvent,8419353:doWork3,[])
}
Add(LineBreak,3444888,518,231)
{
link(Out,11608429:doWork2,[])
Primary=[2871258,-448,-189]
}
Add(ButtonRush,5074755,518,259)
{
Left=435
Top=10
Caption="закрыть"
Data=Integer(0)
Glyphs=[]
link(onClick,11608429:doWork3,[(564,265)])
}
Add(HubEx,11608429,560,231)
{
link(onEvent,4779317:doVisible,[])
}
Add(Hub,15814920,406,224)
{
link(onEvent1,4779317:doBorderStyle,[])
link(onEvent2,7332652:doWork2,[])
}
Add(WinTools,11429526,588,308)
{
Point(doTransparentColor)
link(Handle,4779317:Handle,[])
}
Add(SelectColor,14739235,504,336)
{
Color=12632256
link(onColor,11429526:doTransparentColor,[])
}
Add(HubEx,7332652,490,231)
{
Angle=1
link(onEvent,14739235:doColor,[(494,342)])
}
END_SDK
Add(ButtonRush,7219300,350,217)
{
Left=10
Top=30
Caption="Рамки"
Data=Integer(1)
Glyphs=[]
link(onClick,3719989:doWork1,[])
}
END_SDK


карма: 22

1
Голосовали:Lora
Ответов: 177
Рейтинг: 24
#3: 2014-11-03 22:43:16 ЛС | профиль | цитата
nesco писал(а):

Спасиииибо!!!! Всё работает так как надо!
А я ведь думала над таким вариантом! Только правильно применить цвет к окну не смогла.
Еще раз спасибо! Вы маг и волшебник!
карма: 1

0
Разработчик
Ответов: 26170
Рейтинг: 2127
#4: 2014-11-04 00:20:54 ЛС | профиль | цитата
Lora писал(а):
Вы маг и волшебник!

Да не. Мне до этого еще очень и очень далеко
карма: 22

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