Вверх ↑
Этот топик читают: Гость
Ответов: 10
Рейтинг: 0
#1: 2006-07-26 14:37:47 ЛС | профиль | цитата
Привет!
Короче такой вопрос! Как сделать так чтобы было так : на форме есть текстовое поле и больше ничего!
Надо сделать я так понимая с помощью "Timer" слежение за состоянием мыши! тоесть если курсор находиться в неподвижном состоянии или просто им водят то в тексовом поле надо написать свободно! если чел нажал и держит правую или левую кнопку мыши то в поле надо написать нажата правая/левая кнопка (в зависимости от того какую нажмем такую и писать) если пользователь отпустил то написать отпущена! и затем снова написать свободно до тех пор пока не нажмут!
--
P/S Делаю интересную программку и это необходимо сделать! как сделаю выложу ее тут!!! помогите!
карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 689
Рейтинг: 20
#2: 2006-07-26 15:09:11 ЛС | профиль | цитата
Вот так например пойдет?
code_139
Работает только если пользователь не додумался перенести курсор мыши в непосредсвенно в поле. Но я думаю это уже и самому можно дописать...
карма: 0

0
файлы: 1code_139.txt [1.9KB] [698]
Ответов: 9906
Рейтинг: 351
#3: 2006-07-26 16:54:07 ЛС | профиль | цитата
code_140
карма: 9

0
файлы: 1code_140.txt [1.2KB] [648]
Ответов: 10
Рейтинг: 0
#4: 2006-07-26 18:09:47 ЛС | профиль | цитата
Спасибо галков!!! То самое!!! Щас пойду доделовать как доделаю выложу...

[size=-2]------ Добавлено в 18:08
Вынужден снова обратиться к вам! Что то неполучилось прикрутить данную фичу к моему проекту! Поэтому преждевременно выкладываю его код. Помогите подправить! Короче суть таккафя : после нажатия на кнопку запись прога записывает все двидения мыши (это я сделал) а осталось сделать тока чтобы если мы кликали во время записи куданить то это тоже записывалось бы и потом воспроизводилось!!! Проект я думаю интересный! Помогите доделать!!!

Add(MainForm,10429901,-27,105)
{
Left=20
Top=105
Width=485
Height=167
Caption="Rec Mouse"
BorderStyle=3
}
Add(MouseEvent,9234697,85,147)
{
}
Add(ArrayEnum,7169277,64,329)
{
link(onItem,1100755:doSleepMks,[(104,335)(104,335)])
link(Array,10772189:Array,[(70,282)(238,282)])
}
Add(Button,3762270,-27,189)
{
Top=30
Width=110
Height=35
Caption="Çàïèñü."
link(onClick,4448202:doTimer,[])
}
Add(Timer,4448202,36,189)
{
Interval=100
Enable=1
link(onTimer,15951146:doString,[])
}
Add(FormatStr,15951146,85,189)
{
Mask="%1,%2"
link(onFString,7166464:doEvent1,[(125,195)(125,230)])
link(Str1,9234697:MouseX,[])
link(Str2,9234697:MouseY,[])
}
Add(StrList,10772189,218,189)
{
}
Add(Memory,14387155,400,315)
{
}
Add(Button,15703742,-27,238)
{
Top=100
Width=110
Height=35
Caption="Ñòîï."
link(onClick,14987940:doEvent1,[(20,244)(20,265)])
}
Add(Button,11604884,-34,329)
{
Left=110
Top=65
Width=110
Height=35
Caption="Ïëýé."
link(onClick,5360568:doEvent1,[])
}
Add(Hub,5360568,15,329)
{
link(onEvent1,7169277:doEnum,[])
}
Add(Hub,943151,162,329)
{
OutCount=4
link(onEvent1,2928513:doValue,[(290,335)(290,286)])
link(onEvent2,5780800:doSplit,[(272,342)(272,342)])
link(onEvent3,12283223:doPosition,[(307,349)(307,398)])
link(onEvent4,4227584:doRead,[(204,356)(204,380)(89,380)(89,405)])
}
Add(MouseEvent,12283223,365,378)
{
Point(doPosition)
Point(doMouseDown)
Point(doMouseUp)
link(Button,10732757:Value,[(371,342)(350,342)])
link(X,7258187:Value,[(378,363)(364,363)])
link(Y,14387155:Value,[(385,363)(406,363)])
}
Add(StrPart,5780800,295,336)
{
Char=","
link(onSplit,14387155:doValue,[(363,342)(363,321)])
link(onPart,7258187:doValue,[(342,349)(342,321)])
link(Str,2247916:Var1,[(301,331)])
}
Add(Memory,2928513,295,280)
{
}
Add(Memory,7258187,358,315)
{
}
Add(Sleep,1100755,113,329)
{
Delay=100000
link(onSleep,943151:doEvent1,[(153,335)(153,335)])
}
Add(DoData,37931,351,91)
{
Data=String(noclick|2)
link(onEventData,12335995:doEvent4,[(393,97)(393,142)(152,142)(152,188)])
}
Add(Hub,7166464,134,224)
{
OutCount=3
link(onEvent1,10772189:doAdd,[(192,230)(192,195)])
link(onEvent2,8398739:doText,[(209,237)(209,244)])
link(onEvent3,11530655:doEvent1,[(178,244)(178,137)(117,137)(117,55)])
}
Add(LedNumber,8398739,253,238)
{
Width=479
Height=29
Align=2
FonHover=0
SegHover=65280
Point(doText)
}
Add(Button,5844365,-27,280)
{
Top=65
Width=110
Height=35
Caption="Ïàóçà."
link(onClick,16588826:doWork3,[(26,286)])
}
Add(Hub,14987940,36,259)
{
OutCount=3
link(onEvent1,16588826:doWork2,[(78,265)(78,250)(12,250)(12,237)])
link(onEvent2,10772189:doClear,[(160,272)(160,202)])
link(onEvent3,1123783:doClear,[(185,279)(185,174)])
}
Add(HubEx,16588826,22,224)
{
link(onEvent,4448202:doStop,[(33,237)(33,202)])
}
Add(Keyboard,5470852,190,49)
{
Key=1
link(onReadKey,9840715:doData,[])
}
Add(Keyboard,1150568,190,84)
{
Key=2
link(onReadKey,15813419:doData,[])
}
Add(Hub,11530655,127,49)
{
link(onEvent1,5470852:doReadKey,[])
link(onEvent2,1150568:doReadKey,[(174,62)(174,90)])
}
Add(IndexToChanel,5304455,281,49)
{
link(onEvent1,14093142:doData,[])
link(onEvent2,7732823:doData,[(328,62)(328,34)])
}
Add(IndexToChanel,6849840,281,84)
{
link(onEvent1,2270371:doData,[])
link(onEvent2,37931:doData,[])
}
Add(ChangeMon,9840715,246,49)
{
Data=Integer(-1)
link(onData,5304455:doEvent,[])
}
Add(ChangeMon,15813419,246,84)
{
Data=Integer(-1)
link(onData,6849840:doEvent,[])
}
Add(DoData,14093142,344,0)
{
Data=String(click|1)
link(onEventData,12335995:doEvent1,[(386,6)(386,121)(152,121)(152,167)])
}
Add(DoData,2270371,344,63)
{
Data=String(click|2)
link(onEventData,12335995:doEvent2,[(386,69)(386,138)(152,138)(152,174)])
}
Add(Hub,12335995,162,161)
{
InCount=4
OutCount=1
link(onEvent1,1123783:doAdd,[])
}
Add(Case,8746835,309,448)
{
Value=String(click)
link(onTrue,12283223:doClick,[(353,461)(353,384)])
}
Add(StrPart,8037057,225,441)
{
Char="|"
link(onSplit,10732757:doValue,[(262,447)(262,279)])
link(onPart,8746835:doCase,[])
link(Str,8168068:Value,[])
}
Add(GetDataEx,2247916,295,322)
{
link(Data,2928513:Value,[(308,319)(301,319)])
}
Add(Memory,10732757,344,273)
{
}
Add(StrList,1123783,302,161)
{
}
Add(Memory,8168068,225,399)
{
link(onData,8037057:doSplit,[(267,405)(267,436)(215,436)(215,447)])
}
Add(DoData,7732823,344,28)
{
Data=String(noclick|1)
link(onEventData,12335995:doEvent3,[(386,34)(386,110)(152,110)(152,181)])
}
Add(ArrayRW,4227584,99,399)
{
link(onRead,8168068:doValue,[])
link(Array,1123783:Array,[(105,303)(322,303)])
link(Index,7169277:Index,[(112,380)(77,380)])
}
Add(Button,8310360,8,469)
{
Left=220
Top=65
Width=260
Height=35
}

[size=-2]------ Добавлено в 18:09
блин , как у вас сделать на форуме чтобы код был в виде отдельной ссылки как у вас ?!
карма: 0
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 2060
Рейтинг: 28
#5: 2006-07-26 18:47:11 ЛС | профиль | цитата
блин , как у вас сделать на форуме чтобы код был в виде отдельной ссылки как у вас ?!

Это делается вроде автоматом, если код больше 500 байт, то он будет представлен в виде ссылки.
карма: 1

0
Ответов: 2060
Рейтинг: 28
#6: 2006-07-26 19:06:32 ЛС | профиль | цитата
Alex_sir, У меня нет желания разбиратся в твоём коде, но могу предложить тебе свою схему. Я то же делал такую программу месяцав 4 назад. Работает так:
Нажымаем кнопку старт. Производим действия какие ни будь мышью.
Нажымаем кнопку стоп.
Нажимаем кноку повторить, что бы повторить записанные действия.
Программа разсчитана на 200 секунд записи.
code_141
карма: 1

0
файлы: 1code_141.txt [9.2KB] [706]
Ответов: 9906
Рейтинг: 351
#7: 2006-07-26 19:30:20 ЛС | профиль | цитата
Чего-то мне кажется, что ему - тоже
карма: 9

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