Вверх ↑
Этот топик читают: Гость
Ответов: 94
Рейтинг: -1
#1: 2009-09-04 23:41:47 ЛС | профиль | цитата
Как сделать что бы если вписанный текст меньше текста в программе, текст надписи становился 1, а если больше то 2?
карма: 1

0
Ответов: 485
Рейтинг: 86
#2: 2009-09-04 23:55:51 ЛС | профиль | цитата
DarkHUNTER, Вопрос непонятен, попробуй перефразировать И поподробнее...
карма: 0

0
Ответов: 1304
Рейтинг: 405
#3: 2009-09-05 00:03:23 ЛС | профиль | цитата
DarkHUNTER, про это


Add(MainForm,2953706,21,77)
{
Width=336
Height=168
Position=1
link(onCreate,10685729:doEvent1,[])
}
Add(Edit,7180323,168,35)
{
Left=45
Top=30
Width=170
Text="йцуке"
link(onChange,5262870:doWork1,[(212,41)(212,79)(95,79)])
}
Add(Edit,2960448,112,112)
{
Left=45
Top=65
Width=170
Text=""
link(onChange,15778145:doWork1,[(152,118)(152,150)(95,150)])
}
Add(Length,4199497,168,91)
{
link(Str,7180323:Text,[])
}
Add(Length,9049717,112,161)
{
link(onLength,12787189:doCompare,[])
link(Str,2960448:Text,[])
}
Add(If_else,12787189,161,161)
{
Type=1
link(onTrue,16540680:doData,[(209,167)(209,146)])
link(onFalse,16385414:doData,[(209,174)(209,188)])
link(Op2,4199497:Result,[])
}
Add(DoData,16540680,224,140)
{
Data=Integer(1)
link(onEventData,9943720:doWork2,[])
}
Add(DoData,16385414,224,182)
{
Data=Integer(2)
link(onEventData,9943720:doWork3,[(270,188)])
}
Add(Label,654063,287,140)
{
Left=235
Top=50
Width=45
Font=[MS Sans Serif,8,1,255,1]
Caption=""
AutoSize=1
}
Add(HubEx,9943720,266,133)
{
link(onEvent,654063:doText,[])
}
Add(Hub,10685729,63,91)
{
link(onEvent1,5262870:doWork2,[])
link(onEvent2,15778145:doWork2,[(84,104)(84,160)])
}
Add(HubEx,15778145,91,147)
{
Angle=1
link(onEvent,9049717:doLength,[(95,167)])
}
Add(HubEx,5262870,91,84)
{
link(onEvent,4199497:doLength,[])
}

карма: 3

0
Ответов: 94
Рейтинг: -1
#4: 2009-09-05 00:05:57 ЛС | профиль | цитата
У меня есть текстовое поле и надпись, надпись равна 20, а в текстовое поле можно вводить любое число. Так же есть компонент условие, он установлен на "<" . Мне надо что бы если введенное число было меньше 20 то другая надпись была равна 1, а если больше то 2.
карма: 1

0
Разработчик
Ответов: 26170
Рейтинг: 2127
#5: 2009-09-05 00:13:02 ЛС | профиль | цитата
DarkHUNTER, так, что ли


Add(MainForm,2953706,63,91)
{
link(onCreate,11973343:doData,[])
}
Add(Edit,6062990,161,105)
{
Left=25
Top=10
Width=85
Text=""
DataType=2
link(onChange,7353377:doCalc,[])
}
Add(Label,2083342,259,105)
{
Left=140
Top=10
Caption=""
AutoSize=1
}
Add(MathParse,7353377,210,105)
{
MathStr="(%1 < 20) + (%1 >= 20) * 2 "
link(onResult,2083342:doText,[])
}
Add(DoData,11973343,112,105)
{
Data=Integer(20)
link(onEventData,6062990:doText,[])
}

карма: 22

1
Голосовали:DarkHUNTER
Ответов: 94
Рейтинг: -1
#6: 2009-09-05 00:13:23 ЛС | профиль | цитата
MAV писал(а):


Да вот что то похожее , но что бы срабатывало при клике надо.
------------ Дoбавленo в 00.15:
nesco, Да вот, именно так, спасибо
карма: 1

0
Разработчик
Ответов: 26170
Рейтинг: 2127
#7: 2009-09-05 00:15:33 ЛС | профиль | цитата
DarkHUNTER писал(а):
но что бы срабатывало при клике надо

На чем
------------ Дoбавленo в 00.19:
Вот, на чем еще можно кликать


Add(MainForm,2953706,189,308)
{
}
Add(Edit,6062990,245,203)
{
Left=110
Top=10
Width=85
Text="20"
DataType=2
Point(onMouseDown)
link(onMouseDown,7353377:doCalc,[(289,223)(289,244)(233,244)(233,265)])
}
Add(Label,2083342,294,259)
{
Left=225
Top=10
Caption=""
AutoSize=1
}
Add(MathParse,7353377,245,259)
{
DataCount=1
MathStr="(%1 < 20) + (%1 >= 20) * 2 "
link(onResult,2083342:doText,[])
link(X1,6062990:Text,[])
}
Add(Label,8398846,294,357)
{
Left=225
Top=40
Caption=""
AutoSize=1
}
Add(Edit,10032893,245,308)
{
Left=110
Top=35
Width=85
Text="20"
DataType=2
Point(onMouseDown)
}
Add(MathParse,7153289,245,357)
{
DataCount=1
MathStr="(%1 < 20) + (%1 >= 20) * 2 "
link(onResult,8398846:doText,[])
link(X1,10032893:Text,[])
}
Add(Button,12761900,189,357)
{
Left=45
Top=35
Caption="Click"
link(onClick,7153289:doCalc,[])
}

карма: 22

0
Ответов: 1304
Рейтинг: 405
#8: 2009-09-05 00:19:46 ЛС | профиль | цитата
В конкурсе телепатии победил nesco .

карма: 3

1
Голосовали:DarkHUNTER
Ответов: 94
Рейтинг: -1
#9: 2009-09-05 00:29:43 ЛС | профиль | цитата
Дааа.... тут я новенький, объяснить на словах что я пытаюсь из вас вытащить не так уж и легко
------------ Дoбавленo в 01.30:
А возможно ли сделать что бы вместо 1 и 2 были слова?
карма: 1

0
Ответов: 16884
Рейтинг: 1239
#10: 2009-09-05 11:07:52 ЛС | профиль | цитата
Давайте запутаем начинающего еще больше.
DarkHUNTER писал(а):
А возможно ли сделать что бы вместо 1 и 2 были слова?

и для любых чисел, а не только для 20

Add(MainForm,2953706,126,56)
{
Width=286
Height=139
Caption="Сравнение чисел"
}
Add(Edit,9744720,210,56)
{
Left=20
Top=20
Text=""
Alignment=1
DataType=1
}
Add(Button,3322241,189,140)
{
Left=20
Top=65
Width=70
Caption="Сравнить"
link(onClick,7353377:doCalc,[])
}
Add(Label,7435961,336,168)
{
Left=75
Top=25
Width=105
Caption=""
AutoSize=1
Alignment=2
link(Text,584263:String,[])
}
Add(MathParse,7353377,245,140)
{
MathStr="(%1 < %2) + (%1 > %2) * 2 + (%1=%2)*3"
link(onResult,7942601:doEvent1,[])
link(X1,9744720:Text,[(251,110)(216,110)])
link(X2,12630374:Text,[])
}
Add(StrList,584263,315,98)
{
Strings=#0:|10:меньше чем|10:больше чем|5:равно|
Point(doGetString)
Point(String)
}
Add(Hub,7942601,287,140)
{
link(onEvent1,584263:doGetString,[])
link(onEvent2,7435961:doText,[(319,153)(319,174)])
}
Add(Edit,12630374,252,56)
{
Left=185
Top=20
Text="20"
Alignment=1
DataType=1
}


карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26170
Рейтинг: 2127
#11: 2009-09-05 11:32:32 ЛС | профиль | цитата
Tad писал(а):
Давайте запутаем начинающего еще больше

А это к чему

Tad писал(а):
и для любых чисел, а не только для 20

А что, мои примеры только для 20 были
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#12: 2009-09-05 11:38:54 ЛС | профиль | цитата
DarkHUNTER писал(а):
Дааа.... тут я новенький, объяснить на словах что я пытаюсь из вас вытащить не так уж и легко
Да и понять тебя тоже не легко:
DarkHUNTER в первом сообщении писал(а):
Как сделать что бы если вписанный текст меньше текста в программе, текст надписи становился 1, а если больше то 2?
т.е. речь вел про текст, а в конце оказалось что думал про числа.

------------ Дoбавленo в 11.45:
nesco писал(а):
Tad писал(а)Давайте запутаем начинающего еще больше
А это к чему
К тому, что, то что он просил, прекрасно решается с If_Else.
Хотя может ты и прав - чтобы научить человека плавать - лучше сразу его бросить на глубокое.
Правда один поплыл, а второй начинает бояться даже воды в стакане.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26170
Рейтинг: 2127
#13: 2009-09-05 11:52:50 ЛС | профиль | цитата
Tad писал(а):
К тому, что, то что он просил, прекрасно решается с If_Else

Я пишу примеры не только для того, кто просит, а для всех, кому это может пригодиться. Поставь в свой пример If_else и посмотри, на сколько компонентов увеличиться твой пример
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#14: 2009-09-05 11:59:18 ЛС | профиль | цитата
nesco, не заводись. Ничего лично против тебя и твоих примеров не имею.

------------ Дoбавленo в 12.07:
nesco писал(а):
Поставь в свой пример If_else и посмотри, на сколько компонентов увеличиться твой пример

Поставил. И что ?

Add(MainForm,2953706,98,91)
{
Width=260
Height=126
}
Add(Edit,9744720,154,91)
{
Left=20
Top=20
Text=""
Alignment=1
DataType=1
}
Add(Button,3322241,133,147)
{
Left=20
Top=65
Width=70
Caption="Сравнить"
link(onClick,13064670:doCompare,[])
}
Add(Label,7435961,287,140)
{
Left=75
Top=25
Width=105
Caption=""
AutoSize=1
Alignment=2
}
Add(Edit,12630374,196,91)
{
Left=185
Top=20
Text="20"
Alignment=1
DataType=1
}
Add(If_else,13064670,189,147)
{
Type=3
link(onTrue,4780071:doWork2,[])
link(onFalse,4780071:doWork3,[])
link(Op1,9744720:Text,[(195,139)(160,139)])
link(Op2,12630374:Text,[])
}
Add(ChanelToIndex,4780071,238,140)
{
Count=3
link(onIndex,7435961:doText,[])
}

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26170
Рейтинг: 2127
#15: 2009-09-05 12:09:00 ЛС | профиль | цитата
Tad писал(а):
не заводись

Забьем на это, для ясности Мне просто хочется научить народ использовать по-максимуму возможности HiAsm'a.
карма: 22

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