Вверх ↑
Этот топик читают: Гость
Разработчик
Ответов: 26151
Рейтинг: 2127
#31: 2008-11-10 23:23:43 ЛС | профиль | цитата
Tad, я твою схему проверил и дома и на работе. Так вот -- на работе ключа не было, и она благополучно выдала галочку, дома, откуда-то, у меня был такой ключ, и схема не выдала галочку. Я стер полностью ключ, ситуация повторилась, как на работе -- появилась галочка.
карма: 22

1
Голосовали:Konst
Ответов: 16884
Рейтинг: 1239
#32: 2008-11-10 23:28:39 ЛС | профиль | цитата
У меня все мои программы, где используется реестр, работают с этим ключом. У тебя он от AdmSQLite

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26151
Рейтинг: 2127
#33: 2008-11-10 23:38:00 ЛС | профиль | цитата
Tad писал(а):
У меня все мои программы, где используется реестр, работают с этим ключом

Дальше идет нецензурный сленг на местном диалекте...
карма: 22

1
Голосовали:Konst
Ответов: 16884
Рейтинг: 1239
#34: 2008-11-10 23:53:15 ЛС | профиль | цитата
nesco писал(а):
Дальше идет нецензурный сленг на местном диалекте...
и ты считаешь правильным что NULL включает CheckBox ?

Add(Button,10372601,210,168)
{
Left=10
Top=45
link(onClick,6828249:doCheck,[])
}
Add(CheckBox,6828249,294,168)
{
Left=90
Top=45
Width=90
}
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26151
Рейтинг: 2127
#35: 2008-11-10 23:58:05 ЛС | профиль | цитата
Tad писал(а):
и ты считаешь правильным что NULL включает CheckBox ?

Я не возьму на себя такую ответственность, как изменение данного алгоритма, значит автор преследовал какие-то цели, создавая его (и я не знаю этих целей). Так что -- послушаем начальника транспортного цеха.
карма: 22

1
Голосовали:Konst
Ответов: 16884
Рейтинг: 1239
#36: 2008-11-11 23:26:57 ЛС | профиль | цитата
Наверное долго ждать прийдется (вспомнился ParentColor)
------------ Дoбавленo:

Сутки
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 952
Рейтинг: 4
#37: 2008-11-14 22:27:43 ЛС | профиль | цитата
Я вижу тут разгорелись нешуточные споры.
Так вот спешу сообщить.
На разных компах эти схемы срабатывают по разному.
Т.е. на одних не идет схема Тода но идет схема неско.
А на других машинах все иначе, от чего зависит - разобратся не могу.
А самое интересное - дома не сработала ниодна из ваших схем.
Проверил все схемы выложенные на предыдущих страничках темы у себя на компе дома результат - 0.
НИОДНА не работает
карма: 0

0
Разработчик
Ответов: 26151
Рейтинг: 2127
#38: 2008-11-14 22:31:42 ЛС | профиль | цитата
user_asm, да возьми и переименуй ты имя ключа да и проверь. А не работает -- поди Виста у тебя или доступ к реестру запрещен.
user_asm писал(а):
А самое интересное - дома не сработала ниодна из ваших схем

Если с реестром все нормально, должна работать моя последняя схема. У Tada схема правильная, но не учитвает отсутствие ключа
карма: 22

0
Ответов: 1328
Рейтинг: 69
#39: 2008-11-14 23:06:57 ЛС | профиль | цитата
user_asm, у меня тоже работает, ищи причину у себя на компе
карма: 2

0
Ответов: 952
Рейтинг: 4
#40: 2008-11-18 23:29:30 ЛС | профиль | цитата
Все решилось удалением ключа.
НО возник еще вопрос.
Получается что если один и тот же параметр реестра регулирует разрешение (при значении 0 -640*480, 1 - 800*600, 2 - 1024*768, 3-1280*1024) то изменить его
манипуляциями с Вашими схемами на эти параметры что-то не получается.
Т.е. на форме несколько чеков с различным разрешением экрана запускаемой проги, выставляя птицу кидаем в реестр нужный нам параметр ключа (1, 2, 3) НО в то же время нужно что-бы после запуска формы птица автоматом выставлялась в те чеки на форме которые соответствуют параметру ключа.
Вроде все просто но что-то не выходит
карма: 0

0
Разработчик
Ответов: 26151
Рейтинг: 2127
#41: 2008-11-18 23:48:04 ЛС | профиль | цитата
И в чем проблема



Add(MainForm,10933606,294,119)
{
Width=159
Height=144
link(onCreate,117125:doRead,[])
}
Add(Registry,117125,357,133)
{
HKey=1
Key="softwarehiasm_prog"
Value="Flag"
DataType=0
NotEmpty=1
link(onRead,10351037:doEvent,[])
}
Add(ChanelToIndex,5924563,539,133)
{
Count=4
link(onIndex,117125:doWrite,[(586,139)(586,114)(345,114)(345,146)])
}
Add(RadioButton,3305930,483,133)
{
Left=15
Top=10
Width=95
TabOrder=-1
Selected=0
Caption="640x480"
link(onSelect,5924563:doWork1,[])
}
Add(RadioButton,991167,483,168)
{
Left=15
Top=30
Width=95
TabOrder=-1
Caption="800x600"
link(onSelect,5924563:doWork2,[(527,174)(527,146)])
}
Add(RadioButton,2320702,483,203)
{
Left=15
Top=50
Width=95
TabOrder=-1
Caption="1024x768"
link(onSelect,5924563:doWork3,[(527,209)(527,153)])
}
Add(RadioButton,6953786,483,238)
{
Left=15
Top=70
Width=95
TabOrder=-1
Caption="1280x1024"
link(onSelect,5924563:doWork4,[(527,244)(527,160)])
}
Add(IndexToChanel,10351037,413,133)
{
Count=4
link(onEvent1,3305930:doSelect,[])
link(onEvent2,991167:doSelect,[(464,146)(464,174)])
link(onEvent3,2320702:doSelect,[(464,153)(464,209)])
link(onEvent4,6953786:doSelect,[(464,160)(464,244)])
}

карма: 22

0
Ответов: 952
Рейтинг: 4
#42: 2008-11-19 11:32:03 ЛС | профиль | цитата
nesco
Большое тебе спасибо.
Еще один моментик. Т.к. мне нужно корректировать несколько ключей в реестре я сделал следующее:
code_10700.txt
Так вот. Осталась проблема. Выбрать я могу только одну из этих опций. Каким параметром отрегулировать что-бы точку можно было поставить в нескольких группах.
Уже справился сам С помощью Групп бокса. Хотя может есть еще какие-то варианты?
карма: 0

0
файлы: 1code_10700.txt [2.2KB] [198]
Разработчик
Ответов: 26151
Рейтинг: 2127
#43: 2008-11-19 11:51:46 ЛС | профиль | цитата
user_asm, применить группу элементов



Add(Hub,6694649,112,182)
{
link(onEvent1,14682105:doWork1,[(170,188)(170,160)])
link(onEvent2,10264395:doWork1,[(170,195)(170,202)])
}
Add(ChildGroupBox,14682105,196,154)
{
}
BEGIN_SDK
Add(EditMulti,2410259,21,21)
{
WorkCount=1
Width=419
Height=270
link(doWork1,117125:doRead,[(81,27)(81,90)])
}
Add(GroupBox,6288598,35,105)
{
Left=5
Top=10
Width=115
Height=105
Caption=""
}
Add(Registry,117125,140,84)
{
HKey=1
Key="SOFTWAREWebzenMuConfig2"
Value="Flag"
DataType=0
NotEmpty=1
link(onRead,10351037:doEvent,[])
}
Add(ChanelToIndex,5924563,322,84)
{
Count=4
link(onIndex,117125:doWrite,[(369,90)(369,65)(128,65)(128,97)])
}
Add(RadioButton,3305930,266,84)
{
Left=15
Top=15
Width=95
TabOrder=-1
Selected=0
Caption="640x480"
link(onSelect,5924563:doWork1,[])
}
Add(RadioButton,991167,266,119)
{
Left=15
Top=35
Width=95
TabOrder=-1
Caption="800x600"
link(onSelect,5924563:doWork2,[(310,125)(310,97)])
}
Add(RadioButton,2320702,266,154)
{
Left=15
Top=55
Width=95
TabOrder=-1
Caption="1024x768"
link(onSelect,5924563:doWork3,[(310,160)(310,104)])
}
Add(RadioButton,6953786,266,189)
{
Left=15
Top=75
Width=95
TabOrder=-1
Caption="1280x1024"
link(onSelect,5924563:doWork4,[(310,195)(310,111)])
}
Add(IndexToChanel,10351037,196,84)
{
Count=4
link(onEvent1,3305930:doSelect,[])
link(onEvent2,991167:doSelect,[(247,97)(247,125)])
link(onEvent3,2320702:doSelect,[(247,104)(247,160)])
link(onEvent4,6953786:doSelect,[(247,111)(247,195)])
}
END_SDK
Add(ChildGroupBox,10264395,196,196)
{
}
BEGIN_SDK
Add(EditMulti,2410259,21,21)
{
WorkCount=1
Width=419
Height=270
link(doWork1,8266383:doRead,[(67,27)(67,97)])
}
Add(GroupBox,6288598,35,105)
{
Left=125
Top=10
Width=115
Height=105
Caption=""
}
Add(Registry,8266383,112,91)
{
HKey=1
Key="SOFTWAREWebzenMuConfig2"
Value="ColorDepth"
DataType=0
NotEmpty=1
link(onRead,8109468:doEvent,[])
}
Add(ChanelToIndex,13186961,294,91)
{
Count=4
link(onIndex,8266383:doWrite,[(341,97)(341,72)(100,72)(100,104)])
}
Add(RadioButton,5239857,238,91)
{
Left=10
Top=15
Width=95
TabOrder=-1
Selected=0
Caption="16 bits"
link(onSelect,13186961:doWork1,[])
}
Add(RadioButton,16160049,238,126)
{
Left=10
Top=35
Width=95
TabOrder=-1
Caption="24 bits"
link(onSelect,13186961:doWork2,[(282,132)(282,104)])
}
Add(RadioButton,2753449,238,161)
{
Left=10
Top=55
Width=95
TabOrder=-1
Caption="32 bits"
link(onSelect,13186961:doWork3,[(282,167)(282,111)])
}
Add(IndexToChanel,8109468,168,91)
{
Count=4
link(onEvent1,5239857:doSelect,[])
link(onEvent2,16160049:doSelect,[(219,104)(219,132)])
link(onEvent3,2753449:doSelect,[(219,111)(219,167)])
}
END_SDK

карма: 22

0
Ответов: 952
Рейтинг: 4
#44: 2008-11-19 12:31:16 ЛС | профиль | цитата
Я это и сделал
Большое еще раз человеческое спасибо что не оставили чайника в беде

ммммм еще вопросик. как сделать проверку определенного ключа при запуске на существование? И если он НЕ существует, создать его с произвольным параметром, допустим "user", а если существует выдать в поток его значение.
карма: 0

0
Ответов: 1161
Рейтинг: 160
#45: 2008-11-19 14:57:21 ЛС | профиль | цитата
так штоль?
code_10701.txt
страненько, если ключ равен пустой строке или NULL, то выходит runtime error
карма: 0

0
файлы: 1code_10701.txt [1.4KB] [168]
Сообщение
...
Прикрепленные файлы
(файлы не залиты)