Вставка текста

Форумы Помощь по пакетуВставка текста ← Ctrl1Ctrl →

Этот топик читают: Гость

Ответов: 230

Рейтинг: 1

#1: 2015-03-30 23:08:34 ЛС | профиль | цитата

Какие еще есть способы вставки текста? через компонент ClipboardHook не работает.

Add(ClipboardHook,3689890,420,217)
{
}

------------ Дoбавленo в 23.08:
через эмуляцию клавиши(Ctrl+V) тоже не работает.

карма: 1

Ответов: 1926

Рейтинг: 172

#2: 2015-03-30 23:09:48 ЛС | профиль | цитата

Не в WebBrowser ли пытаетесь вставить?

карма: 9

Учебник по HiAsm | Видеоуроки | Мои программы

Ответов: 230

Рейтинг: 1

#3: 2015-03-30 23:10:37 ЛС | профиль | цитата

3042, неа,в другую программу

карма: 1

Ответов: 2271

Рейтинг: 677

#4: 2015-03-30 23:54:36 ЛС | профиль | цитата

lll0, попробуйте: SendMessage. Примеры в справке смотрите и WM_SETTEXT пробуйте.

карма: 11

Ответов: 1926

Рейтинг: 172

#5: 2015-03-31 00:00:11 ЛС | профиль | цитата

sla8a, там указатель нужно передавать на область памяти, есть ли в hiasm такие компоненты? Я знаю только MemoryStream, но такой пример работает хреново (попробуйте удалять напечатанное):

code_35416.txt
------------ Дoбавленo в 00.00:
Также нельзя указывать мышью на само поле - Runtime Error.

карма: 9

Учебник по HiAsm | Видеоуроки | Мои программы

файлы: 1

code_35416.txt [625B] [206]

Ответов: 230

Рейтинг: 1

#6: 2015-03-31 00:09:34 ЛС | профиль | цитата

sla8a, с этим компонентом тоже не получается.

карма: 1

Ответов: 2271

Рейтинг: 677

#7: 2015-03-31 00:15:09 ЛС | профиль | цитата

3042, ваша схема с вашим условием тестирования это рекурсия. Объяснять?
lll0, вот это попробуйте:
code_35418.txt Смотрите аккуратнее, схема "тыкает" текст постоянно.

карма: 11

файлы: 1

code_35418.txt [1.6KB] [281]

Ответов: 230

Рейтинг: 1

#8: 2015-03-31 00:19:33 ЛС | профиль | цитата

sla8a, тоже не получается,не находит окно.

карма: 1

Ответов: 2271

Рейтинг: 677

#9: 2015-03-31 00:21:42 ЛС | профиль | цитата

lll0, а как понять "не находит окно"?

Все что приходит в голову, так то что окно нарисовано.

карма: 11

Ответов: 230

Рейтинг: 1

#10: 2015-03-31 00:37:13 ЛС | профиль | цитата

sla8a, если навести мышку на окно,то идентификатор не меняется
code_35419.txt
------------ Дoбавленo в 00.35:
может еще не получается из-за того,что это окно развернуто во весь экран.Кстати,все-таки получилось,только переименовалось окно.
------------ Дoбавленo в 00.37:
нашел способ как вставить текст.Только пропускает некоторые символы

Add(MainForm,2953706,21,105)
{
 Width=310
 Height=353
}
Add(Button,9505712,133,154)
{
 Left=220
 Top=285
 link(onClick,12564741:doTimer,[])
}
Add(Edit,78212,294,91)
{
 Left=5
 Top=10
 Width=205
 Text="привет"
}
Add(ListBox,5757498,518,105)
{
 Left=5
 Top=35
 Width=205
 Height=275
 DataType=1
 Point(doSelect)
 Point(onSelect)
}
Add(Str_Enum,14849358,385,105)
{
 Delimiter="@"
 link(onEnum,5757498:doAdd,[])
 link(onEndEnum,8955575:doEnum,[(464,118)(464,230)])
}
Add(MultiReplace,3079191,294,154)
{
 ReplaceList="й=81@#
ц=87@#
у=69@#
к=82@#
е=84@#
н=89@#
г=85@#
ш=73@#
щ=79@#
з=80@#
х=219@#
ъ=221@#
ф=65@#
ы=83@#
в=68@#
а=70@#
п=71@#
р=72@#
о=74@#
л=75@#
д=76@#
ж=186@#
э=222@#
я=90@#
ч=88@#
с=67@#
м=86@#
и=66@#
т=78@#
ь=77@#
б=188@#
ю=190@#

"
 EndSymbol="#"
 link(onResult,14849358:doEnum,[(338,160)(338,111)])
 link(Text,78212:Text,[])
}
Add(KeyEvent,6508438,784,210)
{
 link(Code,15318570:GetData,[])
}
Add(Hub,5990281,728,210)
{
 link(onEvent1,15318570:doData,[(766,216)(766,160)])
 link(onEvent2,6508438:doPress,[(766,223)(766,216)])
}
Add(EventFromData,15318570,791,154)
{
}
Add(Timer,12564741,203,154)
{
 Interval=3000
 Enable=1
 AutoStop=1
 link(onTimer,3079191:doMultiReplace,[])
}
Add(ArrayEnum,8955575,511,224)
{
 link(onItem,5990281:doEvent1,[(635,230)(635,216)])
 link(Array,5757498:Array,[(517,190)(538,190)])
}

карма: 1

файлы: 1 code_35419.txt [342B] [134]

Ответов: 1926

Рейтинг: 172

#11: 2015-03-31 00:52:03 ЛС | профиль | цитата

sla8a писал(а):

3042, ваша схема с вашим условием тестирования это рекурсия. Объяснять?

Да, объяснять! Рекурсия - вызов процедуры из неё самой. Где у меня такое?

Вот, немного модифицированная ваша схема:
code_35420.txt

Тоже при уменьшении числа символов выдаёт хрень.
------------ Дoбавленo в 00.52:
Пардон, если вы про мышь над полем, то да - рекурсия.

карма: 9

Учебник по HiAsm | Видеоуроки | Мои программы

файлы: 1

code_35420.txt [1.8KB] [277]

Ответов: 2271

Рейтинг: 677

#12: 2015-03-31 00:54:26 ЛС | профиль | цитата

3042 писал(а):

вы про мышь над полем, то да - рекурсия.

Да, это и вызывает Runtime Error.

карма: 11

Ответов: 1343

Рейтинг: 31

#13: 2015-03-31 12:02:01 ЛС | профиль | цитата

можно попробовать запись в память процесса, при этом 100% способ работает..., если конечно это не игрушка с внешней защитой

карма: 2

Ответов: 230

Рейтинг: 1

#14: 2015-03-31 22:34:13 ЛС | профиль | цитата

Rysik, а если игрушка ?

------------ Дoбавленo в 20.29:
+ почему моя схема некорректно работает?
------------ Дoбавленo в 22.34:
не понимаю,почему пропускает букву "в"

Add(MainForm,11995434,56,224)
{
 Width=296
 Height=385
}
Add(Button,9505712,133,273)
{
 Left=220
 Top=320
 link(onClick,2648317:doEvent1,[])
}
Add(Edit,78212,329,210)
{
 Left=5
 Top=10
 Width=205
 Text="привет"
}
Add(ListBox,5757498,553,224)
{
 Left=5
 Top=35
 Width=205
 Height=275
 DataType=1
 Point(doSelect)
 Point(onSelect)
}
Add(Str_Enum,14849358,420,224)
{
 Delimiter="@"
 link(onEnum,5757498:doAdd,[])
 link(onEndEnum,8955575:doEnum,[(499,237)(499,307)])
}
Add(MultiReplace,3079191,329,273)
{
 ReplaceList="й=81@#
ц=87@#
у=69@#
к=82@#
е=84@#
н=89@#
г=85@#
ш=73@#
щ=79@#
з=80@#
х=219@#
ъ=221@#
ф=65@#
ы=83@#
в=68@#
а=70@#
п=71@#
р=72@#
о=74@#
л=75@#
д=76@#
ж=186@#
э=222@#
я=90@#
ч=88@#
с=67@#
м=86@#
и=66@#
т=78@#
ь=77@#
б=188@#
ю=190@#

"
 EndSymbol="#"
 link(onResult,14849358:doEnum,[(373,279)(373,230)])
 link(Text,78212:Text,[])
}
Add(KeyEvent,6508438,707,301)
{
 link(Code,15318570:GetData,[])
}
Add(Hub,5990281,651,301)
{
 link(onEvent1,15318570:doData,[(689,307)(689,251)])
 link(onEvent2,6508438:doPress,[(689,314)(689,307)])
}
Add(EventFromData,15318570,714,245)
{
}
Add(Timer,12564741,266,273)
{
 Interval=500
 Enable=1
 AutoStop=1
 link(onTimer,3079191:doMultiReplace,[])
}
Add(ArrayEnum,8955575,567,301)
{
 link(onItem,5990281:doEvent1,[])
 link(Array,5757498:Array,[])
}
Add(Edit,3028317,252,329)
{
 Left=5
 Top=320
 Width=205
 Text=""
 Point(doSetFocus)
}
Add(Hub,2648317,189,273)
{
 link(onEvent1,12564741:doTimer,[])
 link(onEvent2,3028317:doSetFocus,[(238,286)(238,349)])
}

карма: 1

Форумы Помощь по пакетуВставка текста ← Ctrl1Ctrl →


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