Вверх ↑
Этот топик читают: Гость
Ответов: 3
Рейтинг: 0
#1: 2010-02-07 08:29:33 ЛС | профиль | цитата
люди добрые поможите кто чем может и желательно подохочевие я тока начал пытаца залесть в эту штуку под названием програмирование ) а ситуация в следующем нуна сделать пароль но не простой а со своей клавиатурой 0-9 и Enter "ok" и все бы не чиго все понятно вроде но вот при нажатии на одну клавишу дапустим с датой 1 в текстовом поле вылезает 1 нажимаю на 2 и тут блин 1 стирается и появляется 2 "клавиши виртуальные естественно " что делать как быть ???
карма: 0

0
Ответов: 5446
Рейтинг: 323
#2: 2010-02-07 09:02:59 ЛС | профиль | цитата
mirilka, компонент StrCat тебе в помощь
карма: 1

0
Гость
Ответов: 17029
Рейтинг: 0
#3: 2010-02-07 13:12:27 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-04 06:29:13
карма: 0

0
Ответов: 3
Рейтинг: 0
#4: 2010-02-07 13:16:07 ЛС | профиль | цитата
сори выше я просто не авторизировался
карма: 0

0
Ответов: 899
Рейтинг: 43
#5: 2010-02-07 13:34:39 ЛС | профиль | цитата
mirilka, а так не вертел?

code_2391.txt
карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
файлы: 1code_2391.txt [2.5KB] [136]
Ответов: 199
Рейтинг: 44
#6: 2010-02-07 13:47:18 ЛС | профиль | цитата
unalex писал(а):
mirilka, а так не вертел?


дополню:



Add(MainForm,13435633,308,252)
{
Width=384
Height=208
}
Add(Button,3424484,189,84)
{
Left=10
Top=10
Width=35
Height=35
Caption="1"
Data=Integer(1)
link(onClick,16063329:doWork2,[])
}
Add(Button,9284272,189,119)
{
Left=50
Top=10
Width=35
Height=35
Caption="2"
Data=Integer(2)
link(onClick,14935704:doWork2,[])
}
Add(Button,16469260,189,154)
{
Left=90
Top=10
Width=35
Height=35
Caption="3"
Data=Integer(3)
link(onClick,4990440:doWork2,[])
}
Add(Button,10477516,189,189)
{
Left=10
Top=50
Width=35
Height=35
Caption="4"
Data=Integer(4)
link(onClick,10625484:doWork2,[])
}
Add(Button,954451,189,224)
{
Left=50
Top=50
Width=35
Height=35
Caption="5"
Data=Integer(5)
link(onClick,11313035:doWork2,[])
}
Add(Button,1847497,189,259)
{
Left=90
Top=50
Width=35
Height=35
Caption="6"
Data=Integer(6)
link(onClick,937023:doWork2,[])
}
Add(Button,1476668,189,294)
{
Left=10
Top=90
Width=35
Height=35
Caption="7"
Data=Integer(7)
link(onClick,6652922:doWork2,[])
}
Add(Button,1038126,189,329)
{
Left=50
Top=90
Width=35
Height=35
Caption="8"
Data=Integer(8)
link(onClick,3850445:doWork2,[])
}
Add(Button,3879532,189,364)
{
Left=90
Top=90
Width=35
Height=35
Caption="9"
Data=Integer(9)
link(onClick,3850445:doWork3,[(249,370)])
}
Add(Button,3677494,294,189)
{
Left=10
Top=130
Width=115
Height=35
Caption="Enter"
link(onClick,14679833:doEvent1,[])
}
Add(Edit,5353485,392,84)
{
Left=160
Top=10
Width=210
Height=25
Font=[Courier New,12,1,0,204]
Text=""
DataType=1
}
Add(ListBox,2363057,392,189)
{
Left=160
Top=40
Width=210
Height=125
link(Str,5353485:Text,[])
}
Add(StrCat,8503010,322,84)
{
Point(doClear)
link(onStrCat,5353485:doText,[])
link(Str1,8503010:Result,[(328,72)(316,72)(316,128)(328,128)])
}
Add(Hub,14679833,343,189)
{
OutCount=3
link(onEvent1,2363057:doAdd,[])
link(onEvent2,5353485:doText2,[(375,202)(375,97)])
link(onEvent3,8503010:doClear,[(369,209)(369,153)(310,153)(310,97)])
}
Add(HubEx,16063329,245,84)
{
link(onEvent,8503010:doStrCat,[])
}
Add(HubEx,3850445,245,329)
{
Angle=3
link(onEvent,6652922:doWork3,[])
}
Add(HubEx,6652922,245,294)
{
Angle=3
link(onEvent,937023:doWork3,[])
}
Add(HubEx,937023,245,259)
{
Angle=3
link(onEvent,11313035:doWork3,[])
}
Add(HubEx,11313035,245,224)
{
Angle=3
link(onEvent,10625484:doWork3,[])
}
Add(HubEx,10625484,245,189)
{
Angle=3
link(onEvent,4990440:doWork3,[])
}
Add(HubEx,4990440,245,154)
{
Angle=3
link(onEvent,14935704:doWork3,[])
}
Add(HubEx,14935704,245,119)
{
Angle=3
link(onEvent,16063329:doWork3,[])
}

карма: 0

0
Ответов: 899
Рейтинг: 43
#7: 2010-02-07 16:12:37 ЛС | профиль | цитата
vovs, правильное замечание(только точку с хабом соединить забыл)
карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 135
Рейтинг: 2
#8: 2010-02-07 16:25:13 ЛС | профиль | цитата
unalex писал(а):
vovs, правильное замечание(только точку с хабом соединить забыл)

А чем хотел дополнить? я различий в схемах не нашел ( кроме точки на хабе)
карма: 0

0
Ответов: 899
Рейтинг: 43
#9: 2010-02-07 17:19:15 ЛС | профиль | цитата
Димарик, в StrCat появилась точка doClear для стирания содержимого
после нажатия Enter надо стирать все что накопилось в StrCat
в схеме предложенной vovs, надо эту точку прицепить к третьей точке хаба

[size=-2]------ Добавлено в 17:19
уже исправлено
карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 199
Рейтинг: 44
#10: 2010-02-07 17:19:47 ЛС | профиль | цитата
перезалил
карма: 0

0
Разработчик
Ответов: 4698
Рейтинг: 426
#11: 2010-02-07 17:59:26 ЛС | профиль | цитата
На кой там вообще нужен doClear?
code_16807.txt
карма: 10
0
файлы: 1code_16807.txt [2.4KB] [113]
Гость
Ответов: 17029
Рейтинг: 0
#12: 2010-02-07 18:31:36 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2017-03-04 06:29:13
карма: 0

0
Ответов: 899
Рейтинг: 43
#13: 2010-02-07 19:38:06 ЛС | профиль | цитата
Assasin, а точку то надо было отключить
карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
13
Сообщение
...
Прикрепленные файлы
(файлы не залиты)