Вверх ↑
Этот топик читают: Гость
Ответов: 205
Рейтинг: 3
#1: 2008-03-24 19:53:11 ЛС | профиль | цитата
Здравстуйте дорогие Хиасамовцы..
воть Тут у меня схемка ...
система сообщений->
code_8705.txt
кто нить подскажет...
как тоже самое но тока полегче ,а то слишком много элементов( :lol

карма: 1

0
файлы: 1code_8705.txt [6.8KB] [212]
Ответов: 5227
Рейтинг: 587
#2: 2008-03-24 22:03:13 ЛС | профиль | цитата
Ну а эта работает, проверял?

[size=-2]------ Добавлено в 22:03
Ну вот представь что завтра в клуб поставят ещё 5 компьютеров и что, будешь программу править?
вот пример с message, надеюсь пригодится для примера

code_2179.txt
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
файлы: 1code_2179.txt [2.1KB] [416]
Ответов: 205
Рейтинг: 3
#3: 2008-03-24 22:22:02 ЛС | профиль | цитата
да эта прога на сто процентов работает :lolтока на компе нужно включить "Служба сообщений" и в ячейках памяти прописать ip ..)
хоть я её написал с нуля за полтора часа..
просто думал может кто знает как облегчить прогу..
а то и так основной кусок много весит ..!
------------ Дoбавленo:

кстате твоя схема пригодиться!

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

спс..
карма: 1

0
Ответов: 5227
Рейтинг: 587
#4: 2008-03-24 22:57:14 ЛС | профиль | цитата
Да лучше делай сразу с таблицей там вобще всё просто получится...
карма: 4
Мой форум - http://hiasm.bbtalk.me/ схемы, компоненты...
0
Ответов: 205
Рейтинг: 3
#5: 2008-03-25 11:19:21 ЛС | профиль | цитата
да...
а у меня вместо ячеек памяти будут переменные. по этому таблица отпала..
а было бы хорошо ...как массив сканировать....эх...
------------ Дoбавленo:

а вот ещё вопрос как можно сделать выподающию строку больше...при нажатии (но хитрость в том что размеры грыппы должны остаться преждними)

Add(MainForm,15949274,21,105)
{
Left=20
Top=105
}
Add(ChildGroupBox,10064597,70,105)
{
}
BEGIN_SDK
Add(EditMulti,4512924,21,21)
{
Width=923
Height=641
}
Add(GroupBox,14773186,35,105)
{
Left=10
Top=10
Width=295
Height=162
Caption="messager"
}
Add(CheckBox,10291682,449,133)
{
Left=10
Top=15
Width=70
Caption="station 1"
}
Add(CheckBox,6374109,498,133)
{
Left=115
Top=15
Width=70
Caption="station 2"
}
Add(CheckBox,15106402,540,133)
{
Left=220
Top=15
Width=70
Caption="station 3"
}
Add(IndexToChanel,7200447,393,196)
{
Count=10
link(onEvent2,1941571:doCompare,[])
link(onEvent3,12437960:doCompare,[])
link(onEvent4,3879880:doCompare,[])
link(onEvent5,7190111:doCompare,[])
link(onEvent6,2511389:doCompare,[])
link(onEvent7,622169:doCompare,[])
link(onEvent8,4854549:doCompare,[])
link(onEvent9,15261863:doCompare,[])
link(onEvent10,7860723:doCompare,[])
}
Add(Button,13203814,113,182)
{
Left=10
Top=105
Width=120
Enabled=1
Caption="Сообщения"
Data=Integer(1)
Point(doEnabled)
link(onClick,15875013:doWork1,[])
}
Add(For,13546955,260,182)
{
Start=1
End=9
link(onEvent,13390970:doEvent1,[(300,188)(300,139)])
link(onStop,5664424:doWork1,[(342,195)(342,286)])
}
Add(ChanelToIndex,10454906,869,196)
{
Count=10
link(onIndex,15756190:doEvent,[(913,202)(913,380)(129,380)(129,559)])
}
Add(WinExec,7072916,456,518)
{
Mode=0
}
Add(GetIndexData,2246041,358,133)
{
Count=10
link(Data2,5724955:Var,[(371,91)(172,91)])
link(Data3,13522727:Var,[(378,91)(221,91)])
link(Data4,4903059:Var,[(385,91)(263,91)])
link(Data5,1502047:Var,[(392,91)(305,91)])
link(Data6,5303266:Var,[(399,91)(347,91)])
link(Data7,15885058:Var,[(406,91)(389,91)])
link(Data8,5459337:Var,[(413,91)(431,91)])
link(Data9,4547744:Var,[(420,91)(473,91)])
link(Data10,2569303:Var,[(427,91)(515,91)])
}
Add(Hub,13390970,309,133)
{
link(onEvent1,2246041:doIndex,[])
link(onEvent2,7200447:doEvent,[(353,146)(353,202)])
}
Add(Hub,623285,351,518)
{
InCount=3
link(onEvent1,7072916:doExec,[])
link(onEvent2,3698392:doMessage,[(398,531)(398,538)])
}
Add(Button,6714177,113,252)
{
Left=140
Top=130
Width=150
Enabled=1
Caption="отменить выключение"
Data=Integer(3)
Point(doEnabled)
link(onClick,15875013:doWork3,[(161,258)(161,202)])
}
Add(ChanelToIndex,5664424,393,280)
{
link(onIndex,16498304:doEvent1,[(437,286)(437,351)(35,351)(35,216)])
}
Add(If_else,1941571,442,203)
{
Op1=Integer(1)
link(onTrue,10454906:doWork2,[])
link(Op2,10291682:Checked,[])
}
Add(If_else,12437960,491,210)
{
Op1=Integer(1)
link(onTrue,10454906:doWork3,[])
link(Op2,6374109:Checked,[])
}
Add(If_else,3879880,533,217)
{
Op1=Integer(1)
link(onTrue,10454906:doWork4,[])
link(Op2,15106402:Checked,[])
}
Add(CheckBox,3725753,582,133)
{
Left=10
Top=35
Width=70
Caption="station 4"
}
Add(CheckBox,13355825,631,133)
{
Left=115
Top=35
Width=70
Caption="station 5"
}
Add(CheckBox,9770333,673,133)
{
Left=220
Top=35
Width=70
Caption="station 6"
}
Add(If_else,7190111,575,224)
{
Op1=Integer(1)
link(onTrue,10454906:doWork5,[])
link(Op2,3725753:Checked,[])
}
Add(If_else,2511389,624,231)
{
Op1=Integer(1)
link(onTrue,10454906:doWork6,[])
link(Op2,13355825:Checked,[])
}
Add(If_else,622169,666,238)
{
Op1=Integer(1)
link(onTrue,10454906:doWork7,[])
link(Op2,9770333:Checked,[])
}
Add(If_else,4854549,708,245)
{
Op1=Integer(1)
link(onTrue,10454906:doWork8,[])
link(Op2,12426999:Checked,[])
}
Add(If_else,15261863,750,252)
{
Op1=Integer(1)
link(onTrue,10454906:doWork9,[])
link(Op2,42339:Checked,[])
}
Add(If_else,7860723,799,259)
{
Op1=Integer(1)
link(onTrue,10454906:doWork10,[])
link(Op2,9193542:Checked,[])
}
Add(ComboBox,9550511,302,280)
{
Left=10
Top=80
Width=280
Height=21
Strings=#109:Внимание! Заполненность зала не позволяет увеличить длительность сеанса. Просим Вас освободить рабочее место!|43:Внимание! Ваше поведение мешает окружающим!|86:Внимание! Запрещено использование мобильной связи в пределах Интернет-зала библиотеки.|79:Внимание! Правилами Интернет-зала библиотеки запрещен просмотр подобных сайтов!|112:Внимание! Правилами Интернет-зала библиотеки запрещены работы, не связанные с информационным поиском в Интернет.|122:Суммарное время за неделю, проведенное Вами в Интернет-зале библиотеки, достигло 6-ти часов. Ждем Вас на следующей неделе.|200:Уважаемые читатели! До закрытия Интернет-зала осталось 10 минут. Просим заранее обращаться к Оператору для записи информации на носители. ВНИМАНИЕ! ПОСЛЕ 20.00 СОХРАНЕНИЕ ИНФОРМАЦИИ НЕ ПРОИЗВОДИТСЯ!!!|62:Уважаемые читатели! Интернет-зал закрывается. До новых встреч!|
Text="Текст"
ReadOnly=0
link(onClick,5664424:doWork2,[])
}
Add(FormatStr,7597269,197,518)
{
Mask="net send %1 "%2""
link(onFString,623285:doEvent1,[])
link(Str1,6393949:Data2,[(203,432)(273,432)])
link(Str2,9991219:Data1,[(210,443)(315,443)])
}
Add(CheckBox,9193542,806,133)
{
Left=220
Top=55
Width=70
Caption="station 9"
}
Add(CheckBox,42339,757,133)
{
Left=115
Top=55
Width=70
Caption="station 8"
}
Add(CheckBox,12426999,715,133)
{
Left=10
Top=55
Width=70
Caption="station 7"
}
Add(Memory,12622570,218,182)
{
link(onData,13546955:doFor,[])
}
Add(Button,87130,113,217)
{
Left=140
Top=105
Width=150
Enabled=1
Caption="выключить"
Data=Integer(2)
Point(doEnabled)
link(onClick,15875013:doWork2,[(156,223)(156,195)])
}
Add(ChanelToIndex,15875013,176,182)
{
Count=3
link(onIndex,12622570:doValue,[])
}
Add(IndexToChanel,15756190,141,553)
{
Count=3
Point(Index)
link(onEvent1,7597269:doString,[(185,559)(185,524)])
link(onEvent2,9494561:doString,[])
link(onEvent3,11546760:doString,[(223,573)(223,615)])
link(Index,12622570:Value,[(147,365)(224,365)])
}
Add(GetData,9991219,309,336)
{
link(Data,9550511:String,[])
}
Add(GetData,6393949,260,336)
{
Count=3
link(Data,2246041:Var,[(266,250)(364,250)])
}
Add(FormatStr,9494561,239,560)
{
Mask="shutdown -r -f -m %1 -t 180 -c "%2""
link(onFString,623285:doEvent2,[(311,566)(311,531)])
link(Str1,6393949:Data1,[(245,454)(266,454)])
link(Str2,9991219:Data2,[(252,464)(322,464)])
}
Add(Hub,16498304,50,210)
{
OutCount=3
link(onEvent1,13203814:doEnabled,[(98,216)(98,188)])
link(onEvent2,87130:doEnabled,[])
link(onEvent3,6714177:doEnabled,[(108,230)(108,258)])
}
Add(FormatStr,11546760,274,609)
{
DataCount=1
Mask="shutdown -a -m %1"
link(onFString,623285:doEvent3,[(328,615)(328,538)])
link(Str1,6393949:Data3,[])
}
Add(GlobalVar,5724955,166,36)
{
Name="ip1"
}
Add(GlobalVar,13522727,215,36)
{
Name="ip2"
}
Add(GlobalVar,4903059,257,36)
{
Name="ip3"
}
Add(GlobalVar,1502047,299,36)
{
Name="ip4"
}
Add(GlobalVar,5303266,341,36)
{
Name="ip5"
}
Add(GlobalVar,15885058,383,36)
{
Name="ip6"
}
Add(GlobalVar,5459337,425,36)
{
Name="ip7"
}
Add(GlobalVar,4547744,467,36)
{
Name="ip8"
}
Add(GlobalVar,2569303,509,36)
{
Name="ip9"
}
Add(Message,3698392,413,532)
{
}
END_SDK

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

воть как в excel
когда строка в выподающем списки больше чем список
при попытки выбрать выподающий список становиться больше...

карма: 1

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