HiAsm
HiAsm
Вверх ↑
ФорумыПомощь по пакетуПоиск obj_EDIT на другой форме ← Ctrl1Ctrl →
Этот топик читают: Гость
Ответов: 14
Рейтинг: 2
#1: 2010-03-12 13:00:33 ЛС | профиль | цитата
Помогите со схемкой. Надо прочитать данные из окон ввода сторонней программы. А прочитать могу только из одного. Как со всех остальны незнаю.

Add(MainForm,2953706,49,77)
{
 Width=549
 Height=563
 SavePosName="1"
 link(onCreate,12228563:doEnum,[])
}
Add(WinEnum,12228563,98,91)
{
 VisibleOnly=1
 link(onFindWindow,13543948:doString,[(135,97)(135,139)])
}
Add(StringTable,11877764,203,91)
{
 Left=5
 Top=35
 Width=240
 Height=490
 Columns=#8:Окно=150|2:ID|
 link(onClick,1396723:doSplit,[(242,97)(242,146)])
}
Add(FormatStr,13543948,140,133)
{
 Mask="%1;%2"
 link(onFString,11877764:doAdd,[(188,139)(188,97)])
 link(Str2,12228563:Handle,[(153,127)(104,127)])
}
Add(FindWindow,7535054,259,476)
{
 ClassName="obj_Form"
 Point(ChildHandle)
 link(onFind,12042524:doText,[])
 link(ParentHandle,14366572:Var2,[])
 link(ClassName,10764504:Text,[])
}
Add(WinTools,4016477,168,238)
{
 Point(doCaption)
 Point(doEnable)
 Point(doAlphaBlendValue)
 Point(isVisible)
 Point(isEnabled)
 link(Handle,14366572:Var1,[(174,226)(207,226)(207,243)])
}
Add(Edit,3828241,252,189)
{
 Left=280
 Top=55
 Width=100
 Text=""
 link(Str,1396723:Left,[])
}
Add(StrPart,1396723,252,140)
{
 Char=";"
 Point(Left)
 Point(Right)
 link(onSplit,16357259:doEvent1,[(296,146)(296,182)(213,182)(213,216)])
 link(Str,11877764:Select,[(258,134)(216,134)])
}
Add(GetDataEx,14366572,259,238)
{
 link(Data,1396723:Right,[])
}
Add(Edit,12042524,301,476)
{
 Left=435
 Top=205
 Width=75
 Text=""
}
Add(Button,12290351,133,483)
{
 Left=270
 Top=205
 Caption="OK"
 link(onClick,7535054:doFindChild,[])
}
Add(Edit,10764504,266,427)
{
 Left=340
 Top=205
 Width=55
 Text="obj_EDIT"
}
Add(ChildPanel,4559377,105,252)
{
 link(onEvent1,4016477:doVisible,[(145,258)(145,244)])
 link(onEvent2,4016477:doActive,[(153,265)(153,258)])
 link(onEvent3,4016477:doCaption,[])
 link(onEvent4,4016477:doAlphaBlendValue,[(152,279)(152,286)])
}
BEGIN_SDK
  Add(EditMulti,15209404,21,21)
  {
   EventCount=4
   Width=475
   Height=389
  }
  Add(Panel,1870001,28,175)
  {
   Left=260
   Top=85
   Width=252
   Height=71
  }
  Add(ScrollBar,12058104,175,133)
  {
   Left=15
   Top=10
   Width=90
   Max=255
   Min=50
   Position=255
   link(onPosition,12330451:doEvent1,[])
  }
  Add(Hub,12330451,224,133)
  {
   link(onEvent1,15209404:onEvent4,[(367,139)(367,48)])
  }
  Add(Button,7427976,77,105)
  {
   Left=170
   Top=40
   Width=70
   Caption="Аективное"
   link(onClick,15209404:onEvent2,[(303,111)(303,34)])
  }
  Add(Edit,15261842,126,119)
  {
   Left=165
   Top=10
   Width=75
   Text=""
   link(onChange,15209404:onEvent3,[(327,125)(327,41)])
  }
  Add(Button,5471658,77,35)
  {
   Left=10
   Top=40
   Width=70
   Caption="Скрыть"
   link(onClick,15533356:doWork1,[(149,41)(149,76)])
  }
  Add(ChanelToIndex,15533356,196,70)
  {
   link(onIndex,15209404:onEvent1,[(362,76)(362,27)])
  }
  Add(Button,10643097,77,70)
  {
   Left=90
   Top=40
   Width=65
   Caption="Показать"
   link(onClick,15533356:doWork2,[(145,76)(145,83)])
  }
END_SDK
Add(Edit,11326419,336,236)
{
 Left=405
 Top=55
 Width=105
 Text=""
 link(Str,14366572:Var3,[(342,227)(311,227)(311,243)])
}
Add(Label,9505553,315,28)
{
 Left=385
 Top=55
 Width=15
 Height=17
 Caption="ID"
}
Add(Hub,16357259,224,210)
{
 link(onEvent1,3828241:doText,[(245,216)(245,195)])
 link(onEvent2,11326419:doText,[(246,223)(246,235)(325,235)(325,242)])
}
Add(Label,15253311,273,28)
{
 Left=265
 Top=30
 Width=159
 Height=20
 Font=[MS Sans Serif,10,1,0,1]
 Caption="Главное окно формы"
}
Add(Label,121372,231,28)
{
 Left=270
 Top=175
 Width=77
 Height=20
 Font=[MS Sans Serif,10,1,0,1]
 Caption="Дочерние"
}
Add(Label,6461904,355,28)
{
 Left=415
 Top=210
 Width=15
 Height=17
 Caption="ID"
}
Add(WinTools,412000,301,532)
{
 Point(doSendMessage)
 link(Handle,12042524:Text,[])
}
Add(ChildPanel,14219973,126,581)
{
 link(onEvent1,412000:doVisible,[(265,587)(265,538)])
 link(Data1,412000:CaptionText,[(132,569)(280,569)(280,589)(307,589)])
}
BEGIN_SDK
  Add(EditMulti,2715224,14,28)
  {
   EventCount=1
   DataCount=1
   Width=461
   Height=382
  }
  Add(Panel,1300297,168,35)
  {
   Left=260
   Top=245
   Width=254
   Height=69
  }
  Add(Edit,5256144,261,284)
  {
   Left=115
   Top=10
   Width=130
   Text=""
   link(Str,2715224:Data1,[(267,156)(20,156)])
  }
  Add(Button,8823857,93,284)
  {
   Left=10
   Top=10
   Caption="OK"
   link(onClick,5256144:doText,[])
  }
  Add(Button,5471658,107,179)
  {
   Left=10
   Top=40
   Width=70
   Caption="Скрыть"
   link(onClick,15533356:doWork1,[(164,185)(164,195)])
  }
  Add(Button,10643097,107,214)
  {
   Left=90
   Top=40
   Width=65
   Caption="Показать"
   link(onClick,15533356:doWork2,[(164,220)(164,202)])
  }
  Add(Label,2105023,212,53)
  {
   Left=70
   Top=15
   Width=43
   Height=17
   Caption="Содерж"
  }
  Add(ChanelToIndex,15533356,189,189)
  {
   link(onIndex,2715224:onEvent1,[(348,195)(348,34)])
  }
END_SDK
Add(ChildForm,14714800,595,70)
{
}
BEGIN_SDK
  Add(EditMulti,1686447,21,21)
  {
  }
  Add(MainForm,839764,35,105)
  {
   Left=35
   Top=105
   Caption="Мишень"
   SavePosName="1"
  }
  Add(Edit,1064262,140,70)
  {
   Left=10
   Top=15
   Name="dd"
   Text="Первое"
  }
  Add(Button,3814064,140,147)
  {
   Left=65
   Top=70
  }
  Add(Edit,12635604,224,70)
  {
   Left=125
   Top=15
   Text="Второе"
  }
END_SDK
карма: 0

0
Ответов: 305
Рейтинг: 4
#2: 2010-03-26 18:04:14 ЛС | профиль | цитата
Вот так???
code_17537.txt
карма: 0

0
файлы: 1code_17537.txt [5.5KB] [99]
Ответов: 4641
Рейтинг: 334
#3: 2010-03-26 18:13:30 ЛС | профиль | цитата
mmmmm писал(а):
Вот так???

mmmmm, ну неужели нельзя схемы аккуратнее рисовать? или ты когда с форума копируешь их вообще не сморишь?
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 305
Рейтинг: 4
#4: 2010-03-26 18:33:22 ЛС | профиль | цитата
[offtop]Я там вообще ничего не трогал, я просто добавил точки и всё[/offtop]
Вот без лишнего:
code_17538.txt
карма: 0

0
файлы: 1code_17538.txt [575B] [141]
Ответов: 14
Рейтинг: 2
#5: 2010-03-28 20:29:34 ЛС | профиль | цитата
Большое спасибо за желание помоч но задача стояла найти в сторонней программе все окна ввода и прочитать из них данные.
Надеюсь ее победить

карма: 0

0
Ответов: 970
Рейтинг: 270
#6: 2010-03-28 20:51:00 ЛС | профиль | цитата 


Add(MainForm,958255,231,315)
{
 Left=20
 Top=105
 Width=364
 Height=138
 Caption="WM_GETTEXT"
}
Add(SendMessage,15421399,392,392)
{
 Message=13
 link(onSend,13414976:doGet,[])
 link(Handle,15564417:Handle,[])
 link(LParam,14189995:Memory,[(412,376)(468,376)])
}
Add(Timer,8404764,231,378)
{
 Interval=300
 link(onTimer,5834539:doData,[])
}
Add(MemoryStream,14189995,448,329)
{
 Point(Memory)
 Point(doSize)
}
Add(DataToFile,13414976,448,385)
{
 Type=6
 link(onGet,5175552:doText,[])
 link(Stream,14189995:Stream,[])
}
Add(Hub,8233292,336,378)
{
 OutCount=3
 link(onEvent1,14189995:doClear,[(378,384)(378,342)])
 link(onEvent2,14189995:doSize,[(384,391)(384,349)])
 link(onEvent3,15421399:doSendMessage,[])
}
Add(MouseEvent,15564417,378,301)
{
 Point(Handle)
}
Add(DoData,5834539,287,378)
{
 Data=Integer(100000)
 link(onEventData,8233292:doEvent1,[])
}
Add(Memo,5175552,504,364)
{
 Width=356
 Height=104
 Align=5
 ScrollBars=3
}
карма: 0

1
Голосовали:Konst
Гость
Ответов: 17029
Рейтинг: 0
#7: 2010-03-29 10:33:21 правка | ЛС | профиль | цитата


Редактировалось 1 раз(а), последний 2025-01-17 15:34:11
карма: 0

0
7
ФорумыПомощь по пакетуПоиск obj_EDIT на другой форме ← Ctrl1Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2025
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика