哪位高手朋友会C++,帮助把这段程序转换成DELPHI语言? ( 积分: 200 )

  • 主题发起人 主题发起人 sqsq69696
  • 开始时间 开始时间
S

sqsq69696

Unregistered / Unconfirmed
GUEST, unregistred user!
 本程序的思路是开一个数组,其下标表示1到m个数,数组元素的值为1表示其下标
代表的数被选中,为0则没选中。
首先初始化,将数组前n个元素置1,表示第一个组合为前n个数。
然后从左到右扫描数组元素值的“10”组合,找到第一个“10”组合后将其变为
“01”组合,同时将其左边的所有“1”全部移动到数组的最左端。
当第一个“1”移动到数组的m-n的位置,即n个“1”全部移动到最右端时,就得
到了最后一个组合。
例如求5中选3的组合:
1 1 1 0 0 //1,2,3
1 1 0 1 0 //1,2,4
1 0 1 1 0 //1,3,4
0 1 1 1 0 //2,3,4
1 1 0 0 1 //1,2,5
1 0 1 0 1 //1,3,5
0 1 1 0 1 //2,3,5
1 0 0 1 1 //1,4,5
0 1 0 1 1 //2,4,5
0 0 1 1 1 //3,4,5

程序如下:

#include "stdio.h&quot

#include "time.h&quot


unsigned char number[100]
//最多求100个数的组合。
unsigned int m,n;// 2<=m<=100,n<m

char tmpbuf[128]

time_t ltime

struct tm *today


void printtime(void) //打印当前时间的函数
{
time(<ime)

today = localtime(<ime )

strftime(tmpbuf,128,&quot;%Y-%m-%d %H:%M:%S&quot;,today)

printf(&quot;%s/n&quot;,tmpbuf)

}

void inition() //初始化
{
unsigned int i

for(i=0;i<n;i++)
number=1

}

void output() //输出组合结果
{
unsigned int i

for(i=0;i<m;i++)
if(number)
printf(&quot;%02d &quot;,i+1)

printf(&quot;/n&quot;)

}

void main()
{
unsigned long count
//计数组合个数
unsigned int i,j,k,l

bool findfirst,end,swap

end=false

printf(&quot;please input m:&quot;)

scanf(&quot;%d&quot;,&amp;m)
//输入m
printf(&quot;please input n:&quot;)

scanf(&quot;%d&quot;,&amp;n)
//输入n
printtime()
//打印开始时间
inition()
//初始化
//output()
//屏蔽掉结果输出以节约时间
count=1

j=m

while(!end)
{
findfirst=false

swap=false
//标志复位
for(i=0;i<j;i++)
{
if(!findfirst &amp;&amp
number)
{
k=i
//k记录下扫描到的第一个数
findfirst=true
//设置标志
}
if(number &amp;&amp
!number[i+1]) //从左到右扫描第一个“10”组合
{
number=0

number[i+1]=1

swap=true
//设置交换标志
for(l=0;l<i-k;l++)
number[l]=number[k+l]

for(l=i-k;l<i;l++)
number[l]=0
//交换后将之前的“1”全部移动到最左端
if(k==i &amp;&amp
i+1==m-n) //如果第一个“1”已经移动到了m-n的位置,说明
这是最后一个组合了。
end=true

}
if(swap) //交换一次后就不用继续找“10”组合了
break

}
//output()
//屏蔽掉结果输出以节约时间
count++
//组合数计数器递增1
}
printtime()
//打印结束时间
printf(&quot;total number of combination is: %d/n&quot;,count)
//打印总的组合数

getchar()

}
 
 本程序的思路是开一个数组,其下标表示1到m个数,数组元素的值为1表示其下标
代表的数被选中,为0则没选中。
首先初始化,将数组前n个元素置1,表示第一个组合为前n个数。
然后从左到右扫描数组元素值的“10”组合,找到第一个“10”组合后将其变为
“01”组合,同时将其左边的所有“1”全部移动到数组的最左端。
当第一个“1”移动到数组的m-n的位置,即n个“1”全部移动到最右端时,就得
到了最后一个组合。
例如求5中选3的组合:
1 1 1 0 0 //1,2,3
1 1 0 1 0 //1,2,4
1 0 1 1 0 //1,3,4
0 1 1 1 0 //2,3,4
1 1 0 0 1 //1,2,5
1 0 1 0 1 //1,3,5
0 1 1 0 1 //2,3,5
1 0 0 1 1 //1,4,5
0 1 0 1 1 //2,4,5
0 0 1 1 1 //3,4,5

程序如下:

#include &quot;stdio.h&quot

#include &quot;time.h&quot


unsigned char number[100]
//最多求100个数的组合。
unsigned int m,n;// 2<=m<=100,n<m

char tmpbuf[128]

time_t ltime

struct tm *today


void printtime(void) //打印当前时间的函数
{
time(<ime)

today = localtime(<ime )

strftime(tmpbuf,128,&quot;%Y-%m-%d %H:%M:%S&quot;,today)

printf(&quot;%s/n&quot;,tmpbuf)

}

void inition() //初始化
{
unsigned int i

for(i=0;i<n;i++)
number=1

}

void output() //输出组合结果
{
unsigned int i

for(i=0;i<m;i++)
if(number)
printf(&quot;%02d &quot;,i+1)

printf(&quot;/n&quot;)

}

void main()
{
unsigned long count
//计数组合个数
unsigned int i,j,k,l

bool findfirst,end,swap

end=false

printf(&quot;please input m:&quot;)

scanf(&quot;%d&quot;,&amp;m)
//输入m
printf(&quot;please input n:&quot;)

scanf(&quot;%d&quot;,&amp;n)
//输入n
printtime()
//打印开始时间
inition()
//初始化
//output()
//屏蔽掉结果输出以节约时间
count=1

j=m

while(!end)
{
findfirst=false

swap=false
//标志复位
for(i=0;i<j;i++)
{
if(!findfirst &amp;&amp
number)
{
k=i
//k记录下扫描到的第一个数
findfirst=true
//设置标志
}
if(number &amp;&amp
!number[i+1]) //从左到右扫描第一个“10”组合
{
number=0

number[i+1]=1

swap=true
//设置交换标志
for(l=0;l<i-k;l++)
number[l]=number[k+l]

for(l=i-k;l<i;l++)
number[l]=0
//交换后将之前的“1”全部移动到最左端
if(k==i &amp;&amp
i+1==m-n) //如果第一个“1”已经移动到了m-n的位置,说明
这是最后一个组合了。
end=true

}
if(swap) //交换一次后就不用继续找“10”组合了
break

}
//output()
//屏蔽掉结果输出以节约时间
count++
//组合数计数器递增1
}
printtime()
//打印结束时间
printf(&quot;total number of combination is: %d/n&quot;,count)
//打印总的组合数

getchar()

}
 
脱壳之后用OLLYDBG分析一下他的算法不就知道了!
 
这个软件没有加壳,用DEDE。EXE反汇编解释后,显示的全部是汇编语言,我不会汇编方语言。哪位高手老师会汇编语言,帮助给翻译或分析一下,最好能改写成PASCAL语言。多谢了!!
 
0053E33C 55 push ebp
0053E33D 8BEC mov ebp, esp
0053E33F B9EE000000 mov ecx, $000000EE
0053E344 6A00 push $00
0053E346 6A00 push $00
0053E348 49 dec ecx
0053E349 75F9 jnz 0053E344
0053E34B 51 push ecx
0053E34C 53 push ebx
0053E34D 56 push esi
0053E34E 57 push edi
0053E34F 8955F8 mov [ebp-$08], edx
0053E352 8945FC mov [ebp-$04], eax
0053E355 BE047F5800 mov esi, $00587F04
0053E35A 33C0 xor eax, eax
0053E35C 55 push ebp
0053E35D 6803425400 push $00544203

***** TRY
|
0053E362 64FF30 push dword ptr fs:[eax]
0053E365 648920 mov fs:[eax], esp
0053E368 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.P26 : TPanel
|
0053E36B 8B8054030000 mov eax, [eax+$0354]
0053E371 33D2 xor edx, edx

* Reference to: controls.TControl.SetVisible(TControl;Boolean);
|
0053E373 E8FC79EFFF call 00435D74
0053E378 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.P27 : TPanel
|
0053E37B 8B8008040000 mov eax, [eax+$0408]
0053E381 33D2 xor edx, edx

* Reference to: controls.TControl.SetVisible(TControl;Boolean);
|
0053E383 E8EC79EFFF call 00435D74
0053E388 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.P28 : TPanel
|
0053E38B 8B80D4040000 mov eax, [eax+$04D4]
0053E391 33D2 xor edx, edx

* Reference to: controls.TControl.SetVisible(TControl;Boolean);
|
0053E393 E8DC79EFFF call 00435D74
0053E398 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.P29 : TPanel
|
0053E39B 8B80E0050000 mov eax, [eax+$05E0]
0053E3A1 33D2 xor edx, edx

* Reference to: controls.TControl.SetVisible(TControl;Boolean);
|
0053E3A3 E8CC79EFFF call 00435D74
0053E3A8 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.P30 : TPanel
|
0053E3AB 8B8018080000 mov eax, [eax+$0818]
0053E3B1 33D2 xor edx, edx

* Reference to: controls.TControl.SetVisible(TControl;Boolean);
|
0053E3B3 E8BC79EFFF call 00435D74
0053E3B8 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
0053E3BB 8B80F4020000 mov eax, [eax+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
0053E3C1 8B8044020000 mov eax, [eax+$0244]
0053E3C7 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.TS8 : TTabSheet
|
0053E3CA 3B8224030000 cmp eax, [edx+$0324]
0053E3D0 0F84135C0000 jz 00543FE9
0053E3D6 33C0 xor eax, eax
0053E3D8 8945F0 mov [ebp-$10], eax
0053E3DB 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Btest : TButton
|
0053E3DE 8B982C090000 mov ebx, [eax+$092C]
0053E3E4 8B55F8 mov edx, [ebp-$08]

* Reference to field TButton.OFFS_010C
|
0053E3E7 8B830C010000 mov eax, [ebx+$010C]

* Possible reference to virtual method TButton.OFFS_0108
|
0053E3ED FF9308010000 call dword ptr [ebx+$0108]
0053E3F3 803D0872580066 cmp byte ptr [$00587208], $66
0053E3FA 0F84E95B0000 jz 00543FE9
0053E400 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.C4 : TCheckBox
|
0053E403 8B80B0070000 mov eax, [eax+$07B0]
0053E409 8B10 mov edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
0053E40B FF92B4000000 call dword ptr [edx+$00B4]
0053E411 84C0 test al, al
0053E413 7426 jz 0053E43B
0053E415 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.M41 : TMultiBaseEdit
|
0053E418 8B80B4070000 mov eax, [eax+$07B4]

* Reference to : TMultiBaseEdit._PROC_0052EC50()
|
0053E41E E82D08FFFF call 0052EC50

* Reference to GlobalVar_0058719C
|
0053E423 A39C715800 mov dword ptr [$0058719C], eax
0053E428 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.M42 : TMultiBaseEdit
|
0053E42B 8B80B8070000 mov eax, [eax+$07B8]

* Reference to : TMultiBaseEdit._PROC_0052EC50()
|
0053E431 E81A08FFFF call 0052EC50

* Reference to GlobalVar_005871A0
|
0053E436 A3A0715800 mov dword ptr [$005871A0], eax
0053E43B 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.C5 : TCheckBox
|
0053E43E 8B8000070000 mov eax, [eax+$0700]
0053E444 8B10 mov edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
0053E446 FF92B4000000 call dword ptr [edx+$00B4]
0053E44C 84C0 test al, al
0053E44E 7448 jz 0053E498
0053E450 8D95D4FDFFFF lea edx, [ebp+$FFFFFDD4]
0053E456 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.C51 : TComboBox
|
0053E459 8B8004070000 mov eax, [eax+$0704]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0053E45F E8F879EFFF call 00435E5C
0053E464 8B85D4FDFFFF mov eax, [ebp+$FFFFFDD4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053E46A E895B9ECFF call 00409E04

* Reference to GlobalVar_005871A4
|
0053E46F A3A4715800 mov dword ptr [$005871A4], eax
0053E474 8D95D0FDFFFF lea edx, [ebp+$FFFFFDD0]
0053E47A 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.C52 : TComboBox
|
0053E47D 8B800C090000 mov eax, [eax+$090C]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0053E483 E8D479EFFF call 00435E5C
0053E488 8B85D0FDFFFF mov eax, [ebp+$FFFFFDD0]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053E48E E871B9ECFF call 00409E04

* Reference to GlobalVar_005871A8
|
0053E493 A3A8715800 mov dword ptr [$005871A8], eax
0053E498 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.C6 : TCheckBox
|
0053E49B 8B8038070000 mov eax, [eax+$0738]
0053E4A1 8B10 mov edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
0053E4A3 FF92B4000000 call dword ptr [edx+$00B4]
0053E4A9 84C0 test al, al
0053E4AB 7424 jz 0053E4D1
0053E4AD 8D95CCFDFFFF lea edx, [ebp+$FFFFFDCC]
0053E4B3 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.C62 : TComboBox
|
0053E4B6 8B803C070000 mov eax, [eax+$073C]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0053E4BC E89B79EFFF call 00435E5C
0053E4C1 8B85CCFDFFFF mov eax, [ebp+$FFFFFDCC]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053E4C7 E838B9ECFF call 00409E04

* Reference to GlobalVar_005871AC
|
0053E4CC A3AC715800 mov dword ptr [$005871AC], eax
0053E4D1 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.C8 : TCheckBox
|
0053E4D4 8B8024090000 mov eax, [eax+$0924]
0053E4DA 8B10 mov edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
0053E4DC FF92B4000000 call dword ptr [edx+$00B4]
0053E4E2 84C0 test al, al
0053E4E4 0F844B010000 jz 0053E635
0053E4EA C745F401000000 mov dword ptr [ebp-$0C], $00000001
0053E4F1 C745F001000000 mov dword ptr [ebp-$10], $00000001

* Reference to Tfrdata instance
|
0053E4F8 A1BC525800 mov eax, dword ptr [$005852BC]
0053E4FD 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbseg : TTable
|
0053E4FF 8B80A8010000 mov eax, [eax+$01A8]

* Reference to: db.TDataSet.Refresh(TDataSet);
|
0053E505 E8F681F5FF call 00496700

* Reference to Tfrdata instance
|
0053E50A A1BC525800 mov eax, dword ptr [$005852BC]
0053E50F 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbseg : TTable
|
0053E511 8B80A8010000 mov eax, [eax+$01A8]
0053E517 8B10 mov edx, [eax]

* Reference to method TTable.GetRecordCount()
|
0053E519 FF924C010000 call dword ptr [edx+$014C]

* Reference to GlobalVar_005871B0
|
0053E51F A3B0715800 mov dword ptr [$005871B0], eax

* Reference to Tfrdata instance
|
0053E524 A1BC525800 mov eax, dword ptr [$005852BC]
0053E529 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbseg : TTable
|
0053E52B 8B80A8010000 mov eax, [eax+$01A8]

* Reference to: db.TDataSet.First(TDataSet);
| or: db.TDataSet.Last(TDataSet);
|
0053E531 E8CA7EF5FF call 00496400
0053E536 E9E0000000 jmp 0053E61B

* Reference to Tfrdata instance
|
0053E53B A1BC525800 mov eax, dword ptr [$005852BC]
0053E540 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbseg : TTable
|
0053E542 8B80A8010000 mov eax, [eax+$01A8]

* Possible String Reference to: 'seg'
|
0053E548 BA1C425400 mov edx, $0054421C

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053E54D E8526CF5FF call 004951A4
0053E552 8D55DC lea edx, [ebp-$24]
0053E555 8B08 mov ecx, [eax]

* Reference to method TTable.PSGetUpdateException(Exception,EUpdateError)
|
0053E557 FF5158 call dword ptr [ecx+$58]
0053E55A 8D85C8FDFFFF lea eax, [ebp+$FFFFFDC8]
0053E560 50 push eax
0053E561 B902000000 mov ecx, $00000002
0053E566 BA01000000 mov edx, $00000001
0053E56B 8B45DC mov eax, [ebp-$24]

* Reference to: system.@LStrCopy;
|
0053E56E E8995EECFF call 0040440C
0053E573 8B85C8FDFFFF mov eax, [ebp+$FFFFFDC8]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053E579 E886B8ECFF call 00409E04
0053E57E 8B55F4 mov edx, [ebp-$0C]
0053E581 89049520745800 mov [$587420+edx*4], eax
0053E588 8D85C4FDFFFF lea eax, [ebp+$FFFFFDC4]
0053E58E 50 push eax
0053E58F B902000000 mov ecx, $00000002
0053E594 BA04000000 mov edx, $00000004
0053E599 8B45DC mov eax, [ebp-$24]

* Reference to: system.@LStrCopy;
|
0053E59C E86B5EECFF call 0040440C
0053E5A1 8B85C4FDFFFF mov eax, [ebp+$FFFFFDC4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053E5A7 E858B8ECFF call 00409E04
0053E5AC 8B55F4 mov edx, [ebp-$0C]
0053E5AF 89049524745800 mov [$587424+edx*4], eax

* Reference to Tfrdata instance
|
0053E5B6 A1BC525800 mov eax, dword ptr [$005852BC]
0053E5BB 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbseg : TTable
|
0053E5BD 8B80A8010000 mov eax, [eax+$01A8]

* Possible String Reference to: 'MinV'
|
0053E5C3 BA28425400 mov edx, $00544228

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053E5C8 E8D76BF5FF call 004951A4
0053E5CD 8B10 mov edx, [eax]

* Reference to method TTable.PSGetIndexDefs(TIndexOptions)
|
0053E5CF FF5254 call dword ptr [edx+$54]
0053E5D2 8B55F0 mov edx, [ebp-$10]
0053E5D5 89049540775800 mov [$587740+edx*4], eax

* Reference to Tfrdata instance
|
0053E5DC A1BC525800 mov eax, dword ptr [$005852BC]
0053E5E1 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbseg : TTable
|
0053E5E3 8B80A8010000 mov eax, [eax+$01A8]

* Possible String Reference to: 'MaxV'
|
0053E5E9 BA38425400 mov edx, $00544238

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053E5EE E8B16BF5FF call 004951A4
0053E5F3 8B10 mov edx, [eax]

* Reference to method TTable.PSGetIndexDefs(TIndexOptions)
|
0053E5F5 FF5254 call dword ptr [edx+$54]
0053E5F8 8B55F0 mov edx, [ebp-$10]
0053E5FB 890495D0785800 mov [$5878D0+edx*4], eax
0053E602 8345F402 add dword ptr [ebp-$0C], +$02
0053E606 FF45F0 inc dword ptr [ebp-$10]

* Reference to Tfrdata instance
|
0053E609 A1BC525800 mov eax, dword ptr [$005852BC]
0053E60E 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbseg : TTable
|
0053E610 8B80A8010000 mov eax, [eax+$01A8]

* Reference to: db.TDataSet.Next(TDataSet);
|
0053E616 E8B180F5FF call 004966CC

* Reference to Tfrdata instance
|
0053E61B A1BC525800 mov eax, dword ptr [$005852BC]
0053E620 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbseg : TTable
|
0053E622 8B80A8010000 mov eax, [eax+$01A8]

* Reference to field TTable.Eof : Boolean
|
0053E628 80B89100000000 cmp byte ptr [eax+$0091], $00
0053E62F 0F8406FFFFFF jz 0053E53B
0053E635 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.CT6 : TCheckBox
|
0053E638 8B80D4070000 mov eax, [eax+$07D4]
0053E63E 8B10 mov edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
0053E640 FF92B4000000 call dword ptr [edx+$00B4]
0053E646 84C0 test al, al
0053E648 0F8493000000 jz 0053E6E1
0053E64E C745F401000000 mov dword ptr [ebp-$0C], $00000001

* Reference to Tfrdata instance
|
0053E655 A1BC525800 mov eax, dword ptr [$005852BC]
0053E65A 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbArithC : TTable
|
0053E65C 8B8054010000 mov eax, [eax+$0154]

* Reference to: db.TDataSet.First(TDataSet);
| or: db.TDataSet.Last(TDataSet);
|
0053E662 E8997DF5FF call 00496400
0053E667 EB62 jmp 0053E6CB

* Reference to Tfrdata instance
|
0053E669 A1BC525800 mov eax, dword ptr [$005852BC]
0053E66E 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbArithC : TTable
|
0053E670 8B8054010000 mov eax, [eax+$0154]

* Possible String Reference to: 'MinV'
|
0053E676 BA28425400 mov edx, $00544228

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053E67B E8246BF5FF call 004951A4
0053E680 8B10 mov edx, [eax]

* Reference to method TTable.PSGetIndexDefs(TIndexOptions)
|
0053E682 FF5254 call dword ptr [edx+$54]
0053E685 8B55F4 mov edx, [ebp-$0C]
0053E688 89049568835800 mov [$588368+edx*4], eax

* Reference to Tfrdata instance
|
0053E68F A1BC525800 mov eax, dword ptr [$005852BC]
0053E694 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbArithC : TTable
|
0053E696 8B8054010000 mov eax, [eax+$0154]

* Possible String Reference to: 'MaxV'
|
0053E69C BA38425400 mov edx, $00544238

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053E6A1 E8FE6AF5FF call 004951A4
0053E6A6 8B10 mov edx, [eax]

* Reference to method TTable.PSGetIndexDefs(TIndexOptions)
|
0053E6A8 FF5254 call dword ptr [edx+$54]
0053E6AB 8B55F4 mov edx, [ebp-$0C]
0053E6AE 8904956C835800 mov [$58836C+edx*4], eax
0053E6B5 8345F402 add dword ptr [ebp-$0C], +$02

* Reference to Tfrdata instance
|
0053E6B9 A1BC525800 mov eax, dword ptr [$005852BC]
0053E6BE 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbArithC : TTable
|
0053E6C0 8B8054010000 mov eax, [eax+$0154]

* Reference to: db.TDataSet.Next(TDataSet);
|
0053E6C6 E80180F5FF call 004966CC

* Reference to Tfrdata instance
|
0053E6CB A1BC525800 mov eax, dword ptr [$005852BC]
0053E6D0 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbArithC : TTable
|
0053E6D2 8B8054010000 mov eax, [eax+$0154]

* Reference to field TTable.Eof : Boolean
|
0053E6D8 80B89100000000 cmp byte ptr [eax+$0091], $00
0053E6DF 7488 jz 0053E669
0053E6E1 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.CT4 : TCheckBox
|
0053E6E4 8B80D0070000 mov eax, [eax+$07D0]
0053E6EA 8B10 mov edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
0053E6EC FF92B4000000 call dword ptr [edx+$00B4]
0053E6F2 84C0 test al, al
0053E6F4 0F841E020000 jz 0053E918

* Reference to Tfrdata instance
|
0053E6FA A1BC525800 mov eax, dword ptr [$005852BC]
0053E6FF 8B00 mov eax, [eax]

* Reference to control Tfrdata.tboutst : TTable
|
0053E701 8B805C010000 mov eax, [eax+$015C]

* Reference to: db.TDataSet.Refresh(TDataSet);
|
0053E707 E8F47FF5FF call 00496700

* Reference to Tfrdata instance
|
0053E70C A1BC525800 mov eax, dword ptr [$005852BC]
0053E711 8B00 mov eax, [eax]

* Reference to control Tfrdata.tboutst : TTable
|
0053E713 8B805C010000 mov eax, [eax+$015C]
0053E719 8B10 mov edx, [eax]

* Reference to method TTable.GetRecordCount()
|
0053E71B FF924C010000 call dword ptr [edx+$014C]
0053E721 85C0 test eax, eax
0053E723 7E34 jle 0053E759
0053E725 8945CC mov [ebp-$34], eax
0053E728 C745B084835800 mov dword ptr [ebp-$50], $00588384
0053E72F C745E401000000 mov dword ptr [ebp-$1C], $00000001
0053E736 8B45B0 mov eax, [ebp-$50]
0053E739 8945AC mov [ebp-$54], eax

* Reference to frdata
|
0053E73C 8B45AC mov eax, [ebp-$54]
0053E73F 33D2 xor edx, edx
0053E741 8910 mov [eax], edx
0053E743 FF45E4 inc dword ptr [ebp-$1C]
0053E746 8345AC04 add dword ptr [ebp-$54], +$04
0053E74A 837DE408 cmp dword ptr [ebp-$1C], +$08
0053E74E 75EC jnz 0053E73C
0053E750 8345B01C add dword ptr [ebp-$50], +$1C
0053E754 FF4DCC dec dword ptr [ebp-$34]
0053E757 75D6 jnz 0053E72F
0053E759 C745F401000000 mov dword ptr [ebp-$0C], $00000001

* Reference to Tfrdata instance
|
0053E760 A1BC525800 mov eax, dword ptr [$005852BC]
0053E765 8B00 mov eax, [eax]

* Reference to control Tfrdata.tboutst : TTable
|
0053E767 8B805C010000 mov eax, [eax+$015C]

* Reference to: db.TDataSet.First(TDataSet);
| or: db.TDataSet.Last(TDataSet);
|
0053E76D E88E7CF5FF call 00496400
0053E772 E962010000 jmp 0053E8D9
0053E777 C745E401000000 mov dword ptr [ebp-$1C], $00000001
0053E77E C745E001000000 mov dword ptr [ebp-$20], $00000001

* Reference to Tfrdata instance
|
0053E785 A1BC525800 mov eax, dword ptr [$005852BC]
0053E78A 8B00 mov eax, [eax]

* Reference to control Tfrdata.tboutst : TTable
|
0053E78C 8B805C010000 mov eax, [eax+$015C]

* Possible String Reference to: 'Outst'
|
0053E792 BA48425400 mov edx, $00544248

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053E797 E8086AF5FF call 004951A4
0053E79C 8D95C0FDFFFF lea edx, [ebp+$FFFFFDC0]
0053E7A2 8B08 mov ecx, [eax]

* Reference to method TTable.PSGetUpdateException(Exception,EUpdateError)
|
0053E7A4 FF5158 call dword ptr [ecx+$58]
0053E7A7 8B95C0FDFFFF mov edx, [ebp+$FFFFFDC0]
0053E7AD B8F8715800 mov eax, $005871F8

* Reference to: system.@LStrAsg;
|
0053E7B2 E82158ECFF call 00403FD8
0053E7B7 A1F8715800 mov eax, dword ptr [$005871F8]

* Reference to: system.@LStrLen:Integer;
| or: system.@DynArrayLength;
| or: system.DynArraySize(Pointer):Integer;
|
0053E7BC E8435AECFF call 00404204
0053E7C1 83F805 cmp eax, +$05
0053E7C4 0F8DE7000000 jnl 0053E8B1

* Reference to Tfrdata instance
|
0053E7CA A1BC525800 mov eax, dword ptr [$005852BC]
0053E7CF 8B00 mov eax, [eax]

* Reference to control Tfrdata.tboutst : TTable
|
0053E7D1 8B805C010000 mov eax, [eax+$015C]

* Reference to: db.TDataSet.Next(TDataSet);
|
0053E7D7 E8F07EF5FF call 004966CC
0053E7DC E9F8000000 jmp 0053E8D9
0053E7E1 33C0 xor eax, eax
0053E7E3 55 push ebp

* Possible String Reference to: '槁N?hXBT'
|
0053E7E4 681DE85300 push $0053E81D

***** TRY
|
0053E7E9 64FF30 push dword ptr fs:[eax]
0053E7EC 648920 mov fs:[eax], esp
0053E7EF 8D85BCFDFFFF lea eax, [ebp+$FFFFFDBC]
0053E7F5 50 push eax
0053E7F6 B902000000 mov ecx, $00000002
0053E7FB 8B55E4 mov edx, [ebp-$1C]
0053E7FE A1F8715800 mov eax, dword ptr [$005871F8]

* Reference to: system.@LStrCopy;
|
0053E803 E8045CECFF call 0040440C
0053E808 8B85BCFDFFFF mov eax, [ebp+$FFFFFDBC]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053E80E E8F1B5ECFF call 00409E04
0053E813 33C0 xor eax, eax
0053E815 5A pop edx
0053E816 59 pop ecx
0053E817 59 pop ecx
0053E818 648910 mov fs:[eax], edx
0053E81B EB51 jmp 0053E86E

* Reference to: system.@HandleAnyException;
|
0053E81D E9C24EECFF jmp 004036E4

* Possible String Reference to: '必不同时出现号码条件设定有误:第'
|
0053E822 6858425400 push $00544258
0053E827 8D95B4FDFFFF lea edx, [ebp+$FFFFFDB4]
0053E82D 8B45F4 mov eax, [ebp-$0C]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0053E830 E89FB5ECFF call 00409DD4
0053E835 FFB5B4FDFFFF push dword ptr [ebp+$FFFFFDB4]

* Possible String Reference to: '组'
|
0053E83B 6880425400 push $00544280
0053E840 8D85B8FDFFFF lea eax, [ebp+$FFFFFDB8]
0053E846 BA03000000 mov edx, $00000003

* Reference to: system.@LStrCatN;
|
0053E84B E8745AECFF call 004042C4
0053E850 8B85B8FDFFFF mov eax, [ebp+$FFFFFDB8]
0053E856 33C9 xor ecx, ecx
0053E858 33D2 xor edx, edx

* Reference to: Unit_004BD734.Proc_004BD86C
|
0053E85A E80DF0F7FF call 004BD86C

* Reference to: system.@DoneExcept;
|
0053E85F E8DC51ECFF call 00403A40
0053E864 E980570000 jmp 00543FE9

* Reference to: system.@DoneExcept;
|
0053E869 E8D251ECFF call 00403A40

****** END
|
0053E86E 8D85B0FDFFFF lea eax, [ebp+$FFFFFDB0]
0053E874 50 push eax
0053E875 B902000000 mov ecx, $00000002
0053E87A 8B55E4 mov edx, [ebp-$1C]
0053E87D A1F8715800 mov eax, dword ptr [$005871F8]

* Reference to: system.@LStrCopy;
|
0053E882 E8855BECFF call 0040440C
0053E887 8B85B0FDFFFF mov eax, [ebp+$FFFFFDB0]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053E88D E872B5ECFF call 00409E04
0053E892 8B55F4 mov edx, [ebp-$0C]
0053E895 8BCA mov ecx, edx
0053E897 C1E203 shl edx, $03
0053E89A 2BD1 sub edx, ecx
0053E89C 8D149584835800 lea edx, [$588384+edx*4]
0053E8A3 8B4DE0 mov ecx, [ebp-$20]
0053E8A6 89448AE0 mov [edx+ecx*4-$20], eax
0053E8AA 8345E403 add dword ptr [ebp-$1C], +$03
0053E8AE FF45E0 inc dword ptr [ebp-$20]
0053E8B1 A1F8715800 mov eax, dword ptr [$005871F8]

* Reference to: system.@LStrLen:Integer;
| or: system.@DynArrayLength;
| or: system.DynArraySize(Pointer):Integer;
|
0053E8B6 E84959ECFF call 00404204
0053E8BB 3B45E4 cmp eax, [ebp-$1C]
0053E8BE 0F8F1DFFFFFF jnle 0053E7E1
0053E8C4 FF45F4 inc dword ptr [ebp-$0C]

* Reference to Tfrdata instance
|
0053E8C7 A1BC525800 mov eax, dword ptr [$005852BC]
0053E8CC 8B00 mov eax, [eax]

* Reference to control Tfrdata.tboutst : TTable
|
0053E8CE 8B805C010000 mov eax, [eax+$015C]

* Reference to: db.TDataSet.Next(TDataSet);
|
0053E8D4 E8F37DF5FF call 004966CC

* Reference to Tfrdata instance
|
0053E8D9 A1BC525800 mov eax, dword ptr [$005852BC]
0053E8DE 8B00 mov eax, [eax]

* Reference to control Tfrdata.tboutst : TTable
|
0053E8E0 8B805C010000 mov eax, [eax+$015C]

* Reference to field TTable.Eof : Boolean
|
0053E8E6 80B89100000000 cmp byte ptr [eax+$0091], $00
0053E8ED 0F8484FEFFFF jz 0053E777
0053E8F3 8B45F4 mov eax, [ebp-$0C]
0053E8F6 48 dec eax

* Reference to GlobalVar_00587194
|
0053E8F7 A394715800 mov dword ptr [$00587194], eax
0053E8FC 833D9471580001 cmp dword ptr [$00587194], +$01
0053E903 7D13 jnl 0053E918
0053E905 33C9 xor ecx, ecx
0053E907 33D2 xor edx, edx

* Possible String Reference to: '你已选择了必不同时出现号码过滤条件?
| ??瓒ㄓ形?
|
0053E909 B88C425400 mov eax, $0054428C

* Reference to: Unit_004BD734.Proc_004BD86C
|
0053E90E E859EFF7FF call 004BD86C
0053E913 E9D1560000 jmp 00543FE9

* Reference to Tfrdata instance
|
0053E918 A1BC525800 mov eax, dword ptr [$005852BC]
0053E91D 8B00 mov eax, [eax]

* Reference to control Tfrdata.tboutst : TTable
|
0053E91F 8B805C010000 mov eax, [eax+$015C]

* Reference to: db.TDataSet.First(TDataSet);
| or: db.TDataSet.Last(TDataSet);
|
0053E925 E8D67AF5FF call 00496400
0053E92A 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.CT3 : TCheckBox
|
0053E92D 8B80CC070000 mov eax, [eax+$07CC]
0053E933 8B10 mov edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
0053E935 FF92B4000000 call dword ptr [edx+$00B4]
0053E93B 84C0 test al, al
0053E93D 0F840C020000 jz 0053EB4F

* Reference to Tfrdata instance
|
0053E943 A1BC525800 mov eax, dword ptr [$005852BC]
0053E948 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbmcnum : TDataSource
|
0053E94A 8B8064010000 mov eax, [eax+$0164]
0053E950 8B10 mov edx, [eax]

* Possible reference to virtual method TDataSource.OFFS_014C
|
0053E952 FF924C010000 call dword ptr [edx+$014C]
0053E958 85C0 test eax, eax
0053E95A 7E34 jle 0053E990
0053E95C 8945CC mov [ebp-$34], eax
0053E95F C745B064995800 mov dword ptr [ebp-$50], $00589964
0053E966 C745E401000000 mov dword ptr [ebp-$1C], $00000001
0053E96D 8B45B0 mov eax, [ebp-$50]
0053E970 8945A8 mov [ebp-$58], eax

* Reference to frdata
|
0053E973 8B45A8 mov eax, [ebp-$58]
0053E976 33D2 xor edx, edx
0053E978 8910 mov [eax], edx
0053E97A FF45E4 inc dword ptr [ebp-$1C]
0053E97D 8345A804 add dword ptr [ebp-$58], +$04
0053E981 837DE408 cmp dword ptr [ebp-$1C], +$08
0053E985 75EC jnz 0053E973
0053E987 8345B01C add dword ptr [ebp-$50], +$1C
0053E98B FF4DCC dec dword ptr [ebp-$34]
0053E98E 75D6 jnz 0053E966
0053E990 C745F401000000 mov dword ptr [ebp-$0C], $00000001

* Reference to Tfrdata instance
|
0053E997 A1BC525800 mov eax, dword ptr [$005852BC]
0053E99C 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbmcnum : TDataSource
|
0053E99E 8B8064010000 mov eax, [eax+$0164]

* Reference to: db.TDataSet.First(TDataSet);
| or: db.TDataSet.Last(TDataSet);
|
0053E9A4 E8577AF5FF call 00496400
0053E9A9 E962010000 jmp 0053EB10
0053E9AE C745E401000000 mov dword ptr [ebp-$1C], $00000001
0053E9B5 C745E001000000 mov dword ptr [ebp-$20], $00000001

* Reference to Tfrdata instance
|
0053E9BC A1BC525800 mov eax, dword ptr [$005852BC]
0053E9C1 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbmcnum : TDataSource
|
0053E9C3 8B8064010000 mov eax, [eax+$0164]

* Possible String Reference to: 'mcnum'
|
0053E9C9 BAC4425400 mov edx, $005442C4

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053E9CE E8D167F5FF call 004951A4
0053E9D3 8D95ACFDFFFF lea edx, [ebp+$FFFFFDAC]
0053E9D9 8B08 mov ecx, [eax]

* Possible reference to virtual method TDataSource.OFFS_58
|
0053E9DB FF5158 call dword ptr [ecx+$58]
0053E9DE 8B95ACFDFFFF mov edx, [ebp+$FFFFFDAC]
0053E9E4 B8F8715800 mov eax, $005871F8

* Reference to: system.@LStrAsg;
|
0053E9E9 E8EA55ECFF call 00403FD8
0053E9EE A1F8715800 mov eax, dword ptr [$005871F8]

* Reference to: system.@LStrLen:Integer;
| or: system.@DynArrayLength;
| or: system.DynArraySize(Pointer):Integer;
|
0053E9F3 E80C58ECFF call 00404204
0053E9F8 83F802 cmp eax, +$02
0053E9FB 0F8DE7000000 jnl 0053EAE8

* Reference to Tfrdata instance
|
0053EA01 A1BC525800 mov eax, dword ptr [$005852BC]
0053EA06 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbmcnum : TDataSource
|
0053EA08 8B8064010000 mov eax, [eax+$0164]

* Reference to: db.TDataSet.Next(TDataSet);
|
0053EA0E E8B97CF5FF call 004966CC
0053EA13 E9F8000000 jmp 0053EB10
0053EA18 33C0 xor eax, eax
0053EA1A 55 push ebp

* Possible String Reference to: '閶L?h訠T'
|
0053EA1B 6854EA5300 push $0053EA54

***** TRY
|
0053EA20 64FF30 push dword ptr fs:[eax]
0053EA23 648920 mov fs:[eax], esp
0053EA26 8D85A8FDFFFF lea eax, [ebp+$FFFFFDA8]
0053EA2C 50 push eax
0053EA2D B902000000 mov ecx, $00000002
0053EA32 8B55E4 mov edx, [ebp-$1C]
0053EA35 A1F8715800 mov eax, dword ptr [$005871F8]

* Reference to: system.@LStrCopy;
|
0053EA3A E8CD59ECFF call 0040440C
0053EA3F 8B85A8FDFFFF mov eax, [ebp+$FFFFFDA8]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053EA45 E8BAB3ECFF call 00409E04
0053EA4A 33C0 xor eax, eax
0053EA4C 5A pop edx
0053EA4D 59 pop ecx
0053EA4E 59 pop ecx
0053EA4F 648910 mov fs:[eax], edx
0053EA52 EB51 jmp 0053EAA5

* Reference to: system.@HandleAnyException;
|
0053EA54 E98B4CECFF jmp 004036E4

* Possible String Reference to: '必选号码条件设定有误:第'
|
0053EA59 68D4425400 push $005442D4
0053EA5E 8D95A0FDFFFF lea edx, [ebp+$FFFFFDA0]
0053EA64 8B45F4 mov eax, [ebp-$0C]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0053EA67 E868B3ECFF call 00409DD4
0053EA6C FFB5A0FDFFFF push dword ptr [ebp+$FFFFFDA0]

* Possible String Reference to: '组'
|
0053EA72 6880425400 push $00544280
0053EA77 8D85A4FDFFFF lea eax, [ebp+$FFFFFDA4]
0053EA7D BA03000000 mov edx, $00000003

* Reference to: system.@LStrCatN;
|
0053EA82 E83D58ECFF call 004042C4
0053EA87 8B85A4FDFFFF mov eax, [ebp+$FFFFFDA4]
0053EA8D 33C9 xor ecx, ecx
0053EA8F 33D2 xor edx, edx

* Reference to: Unit_004BD734.Proc_004BD86C
|
0053EA91 E8D6EDF7FF call 004BD86C

* Reference to: system.@DoneExcept;
|
0053EA96 E8A54FECFF call 00403A40
0053EA9B E949550000 jmp 00543FE9

* Reference to: system.@DoneExcept;
|
0053EAA0 E89B4FECFF call 00403A40

****** END
|
0053EAA5 8D859CFDFFFF lea eax, [ebp+$FFFFFD9C]
0053EAAB 50 push eax
0053EAAC B902000000 mov ecx, $00000002
0053EAB1 8B55E4 mov edx, [ebp-$1C]
0053EAB4 A1F8715800 mov eax, dword ptr [$005871F8]

* Reference to: system.@LStrCopy;
|
0053EAB9 E84E59ECFF call 0040440C
0053EABE 8B859CFDFFFF mov eax, [ebp+$FFFFFD9C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053EAC4 E83BB3ECFF call 00409E04
0053EAC9 8B55F4 mov edx, [ebp-$0C]
0053EACC 8BCA mov ecx, edx
0053EACE C1E203 shl edx, $03
0053EAD1 2BD1 sub edx, ecx
0053EAD3 8D149564995800 lea edx, [$589964+edx*4]
0053EADA 8B4DE0 mov ecx, [ebp-$20]
0053EADD 89448AE0 mov [edx+ecx*4-$20], eax
0053EAE1 8345E403 add dword ptr [ebp-$1C], +$03
0053EAE5 FF45E0 inc dword ptr [ebp-$20]
0053EAE8 A1F8715800 mov eax, dword ptr [$005871F8]

* Reference to: system.@LStrLen:Integer;
| or: system.@DynArrayLength;
| or: system.DynArraySize(Pointer):Integer;
|
0053EAED E81257ECFF call 00404204
0053EAF2 3B45E4 cmp eax, [ebp-$1C]
0053EAF5 0F8F1DFFFFFF jnle 0053EA18
0053EAFB FF45F4 inc dword ptr [ebp-$0C]

* Reference to Tfrdata instance
|
0053EAFE A1BC525800 mov eax, dword ptr [$005852BC]
0053EB03 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbmcnum : TDataSource
|
0053EB05 8B8064010000 mov eax, [eax+$0164]

* Reference to: db.TDataSet.Next(TDataSet);
|
0053EB0B E8BC7BF5FF call 004966CC

* Reference to Tfrdata instance
|
0053EB10 A1BC525800 mov eax, dword ptr [$005852BC]
0053EB15 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbmcnum : TDataSource
|
0053EB17 8B8064010000 mov eax, [eax+$0164]

* Reference to field TDataSource.OFFS_0091
|
0053EB1D 80B89100000000 cmp byte ptr [eax+$0091], $00
0053EB24 0F8484FEFFFF jz 0053E9AE
0053EB2A 8B45F4 mov eax, [ebp-$0C]
0053EB2D 48 dec eax

* Reference to GlobalVar_00587198
|
0053EB2E A398715800 mov dword ptr [$00587198], eax
0053EB33 833D9871580001 cmp dword ptr [$00587198], +$01
0053EB3A 7D13 jnl 0053EB4F
0053EB3C 33C9 xor ecx, ecx
0053EB3E 33D2 xor edx, edx

* Possible String Reference to: '你已选择了必选号码过滤条件,但设定?
| 形?
|
0053EB40 B8F4425400 mov eax, $005442F4

* Reference to: Unit_004BD734.Proc_004BD86C
|
0053EB45 E822EDF7FF call 004BD86C
0053EB4A E99A540000 jmp 00543FE9

* Reference to Tfrdata instance
|
0053EB4F A1BC525800 mov eax, dword ptr [$005852BC]
0053EB54 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbmcnum : TDataSource
|
0053EB56 8B8064010000 mov eax, [eax+$0164]

* Reference to: db.TDataSet.First(TDataSet);
| or: db.TDataSet.Last(TDataSet);
|
0053EB5C E89F78F5FF call 00496400
0053EB61 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.CH31 : TCheckBox
|
0053EB64 8B8004090000 mov eax, [eax+$0904]
0053EB6A 8B10 mov edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
0053EB6C FF92B4000000 call dword ptr [edx+$00B4]
0053EB72 84C0 test al, al
0053EB74 0F84D7020000 jz 0053EE51

* Reference to Tfrdata instance
|
0053EB7A A1BC525800 mov eax, dword ptr [$005852BC]
0053EB7F 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbwzset : TDataSource
|
0053EB81 8B80B8010000 mov eax, [eax+$01B8]

* Reference to: db.TDataSet.Refresh(TDataSet);
|
0053EB87 E8747BF5FF call 00496700

* Reference to Tfrdata instance
|
0053EB8C A1BC525800 mov eax, dword ptr [$005852BC]
0053EB91 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbwzset : TDataSource
|
0053EB93 8B80B8010000 mov eax, [eax+$01B8]

* Reference to: db.TDataSet.First(TDataSet);
| or: db.TDataSet.Last(TDataSet);
|
0053EB99 E86278F5FF call 00496400
0053EB9E C705B471580001000000 mov dword ptr [$005871B4], $00000001
0053EBA8 E98A020000 jmp 0053EE37

* Reference to Tfrdata instance
|
0053EBAD A1BC525800 mov eax, dword ptr [$005852BC]
0053EBB2 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbwzset : TDataSource
|
0053EBB4 8B80B8010000 mov eax, [eax+$01B8]

* Possible String Reference to: 'Numgroup'
|
0053EBBA BA24435400 mov edx, $00544324

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053EBBF E8E065F5FF call 004951A4
0053EBC4 8D9590FDFFFF lea edx, [ebp+$FFFFFD90]
0053EBCA 8B08 mov ecx, [eax]

* Possible reference to virtual method TDataSource.OFFS_58
|
0053EBCC FF5158 call dword ptr [ecx+$58]
0053EBCF 8B8590FDFFFF mov eax, [ebp+$FFFFFD90]
0053EBD5 8D9594FDFFFF lea edx, [ebp+$FFFFFD94]

* Reference to: Unit_00408BD4.Proc_00409B70
|
0053EBDB E890AFECFF call 00409B70
0053EBE0 8B8594FDFFFF mov eax, [ebp+$FFFFFD94]
0053EBE6 8D9598FDFFFF lea edx, [ebp+$FFFFFD98]

* Reference to: Unit_00408BD4.Proc_00409B3C
|
0053EBEC E84BAFECFF call 00409B3C
0053EBF1 8B8598FDFFFF mov eax, [ebp+$FFFFFD98]

* Reference to: system.@LStrLen:Integer;
| or: system.@DynArrayLength;
| or: system.DynArraySize(Pointer):Integer;
|
0053EBF7 E80856ECFF call 00404204
0053EBFC 48 dec eax
0053EBFD 7E76 jle 0053EC75

* Reference to Tfrdata instance
|
0053EBFF A1BC525800 mov eax, dword ptr [$005852BC]
0053EC04 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbwzset : TDataSource
|
0053EC06 8B80B8010000 mov eax, [eax+$01B8]

* Possible String Reference to: 'Numgroup'
|
0053EC0C BA24435400 mov edx, $00544324

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053EC11 E88E65F5FF call 004951A4
0053EC16 8D9584FDFFFF lea edx, [ebp+$FFFFFD84]
0053EC1C 8B08 mov ecx, [eax]

* Possible reference to virtual method TDataSource.OFFS_58
|
0053EC1E FF5158 call dword ptr [ecx+$58]
0053EC21 8B8584FDFFFF mov eax, [ebp+$FFFFFD84]
0053EC27 8D9588FDFFFF lea edx, [ebp+$FFFFFD88]

* Reference to: Unit_00408BD4.Proc_00409B70
|
0053EC2D E83EAFECFF call 00409B70
0053EC32 8B8588FDFFFF mov eax, [ebp+$FFFFFD88]
0053EC38 8D958CFDFFFF lea edx, [ebp+$FFFFFD8C]

* Reference to: Unit_00408BD4.Proc_00409B3C
|
0053EC3E E8F9AEECFF call 00409B3C
0053EC43 8B958CFDFFFF mov edx, [ebp+$FFFFFD8C]
0053EC49 A1B4715800 mov eax, dword ptr [$005871B4]
0053EC4E 8D04C5D4AF5800 lea eax, [$58AFD4+eax*8]

* Reference to: system.@LStrAsg;
|
0053EC55 E87E53ECFF call 00403FD8
0053EC5A A1B4715800 mov eax, dword ptr [$005871B4]
0053EC5F 8D04C5D8AF5800 lea eax, [$58AFD8+eax*8]
0053EC66 BA38435400 mov edx, $00544338

* Reference to: system.@LStrAsg;
|
0053EC6B E86853ECFF call 00403FD8
0053EC70 E9AA010000 jmp 0053EE1F

* Reference to Tfrdata instance
|
0053EC75 A1BC525800 mov eax, dword ptr [$005852BC]
0053EC7A 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbwzset : TDataSource
|
0053EC7C 8B80B8010000 mov eax, [eax+$01B8]

* Possible String Reference to: 'jo'
|
0053EC82 BA44435400 mov edx, $00544344

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053EC87 E81865F5FF call 004951A4
0053EC8C 8D9580FDFFFF lea edx, [ebp+$FFFFFD80]
0053EC92 8B08 mov ecx, [eax]

* Possible reference to virtual method TDataSource.OFFS_58
|
0053EC94 FF5158 call dword ptr [ecx+$58]
0053EC97 8B8580FDFFFF mov eax, [ebp+$FFFFFD80]

* Possible String Reference to: '奇'
|
0053EC9D BA50435400 mov edx, $00544350

* Reference to: system.@LStrCmp;
|
0053ECA2 E86D56ECFF call 00404314
0053ECA7 750E jnz 0053ECB7
0053ECA9 A1B4715800 mov eax, dword ptr [$005871B4]
0053ECAE 33D2 xor edx, edx
0053ECB0 891485A0AF5800 mov [$58AFA0+eax*4], edx

* Reference to Tfrdata instance
|
0053ECB7 A1BC525800 mov eax, dword ptr [$005852BC]
0053ECBC 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbwzset : TDataSource
|
0053ECBE 8B80B8010000 mov eax, [eax+$01B8]

* Possible String Reference to: 'jo'
|
0053ECC4 BA44435400 mov edx, $00544344

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053ECC9 E8D664F5FF call 004951A4
0053ECCE 8D957CFDFFFF lea edx, [ebp+$FFFFFD7C]
0053ECD4 8B08 mov ecx, [eax]

* Possible reference to virtual method TDataSource.OFFS_58
|
0053ECD6 FF5158 call dword ptr [ecx+$58]
0053ECD9 8B857CFDFFFF mov eax, [ebp+$FFFFFD7C]

* Possible String Reference to: '偶'
|
0053ECDF BA5C435400 mov edx, $0054435C

* Reference to: system.@LStrCmp;
|
0053ECE4 E82B56ECFF call 00404314
0053ECE9 7510 jnz 0053ECFB
0053ECEB A1B4715800 mov eax, dword ptr [$005871B4]
0053ECF0 C70485A0AF580001000000 mov dword ptr [$58AFA0+eax*4], $00000001

* Reference to Tfrdata instance
|
0053ECFB A1BC525800 mov eax, dword ptr [$005852BC]
0053ED00 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbwzset : TDataSource
|
0053ED02 8B80B8010000 mov eax, [eax+$01B8]

* Possible String Reference to: 'jo'
|
0053ED08 BA44435400 mov edx, $00544344

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053ED0D E89264F5FF call 004951A4
0053ED12 8D9578FDFFFF lea edx, [ebp+$FFFFFD78]
0053ED18 8B08 mov ecx, [eax]

* Possible reference to virtual method TDataSource.OFFS_58
|
0053ED1A FF5158 call dword ptr [ecx+$58]
0053ED1D 8B8578FDFFFF mov eax, [ebp+$FFFFFD78]

* Possible String Reference to: '不确定'
|
0053ED23 BA68435400 mov edx, $00544368

* Reference to: system.@LStrCmp;
|
0053ED28 E8E755ECFF call 00404314
0053ED2D 7510 jnz 0053ED3F
0053ED2F A1B4715800 mov eax, dword ptr [$005871B4]
0053ED34 C70485A0AF580002000000 mov dword ptr [$58AFA0+eax*4], $00000002

* Reference to Tfrdata instance
|
0053ED3F A1BC525800 mov eax, dword ptr [$005852BC]
0053ED44 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbwzset : TDataSource
|
0053ED46 8B80B8010000 mov eax, [eax+$01B8]

* Possible String Reference to: 'gd'
|
0053ED4C BA78435400 mov edx, $00544378

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053ED51 E84E64F5FF call 004951A4
0053ED56 8D9574FDFFFF lea edx, [ebp+$FFFFFD74]
0053ED5C 8B08 mov ecx, [eax]

* Possible reference to virtual method TDataSource.OFFS_58
|
0053ED5E FF5158 call dword ptr [ecx+$58]
0053ED61 8B8574FDFFFF mov eax, [ebp+$FFFFFD74]

* Possible String Reference to: '高'
|
0053ED67 BA84435400 mov edx, $00544384

* Reference to: system.@LStrCmp;
|
0053ED6C E8A355ECFF call 00404314
0053ED71 750E jnz 0053ED81
0053ED73 A1B4715800 mov eax, dword ptr [$005871B4]
0053ED78 33D2 xor edx, edx
0053ED7A 891485BCAF5800 mov [$58AFBC+eax*4], edx

* Reference to Tfrdata instance
|
0053ED81 A1BC525800 mov eax, dword ptr [$005852BC]
0053ED86 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbwzset : TDataSource
|
0053ED88 8B80B8010000 mov eax, [eax+$01B8]

* Possible String Reference to: 'gd'
|
0053ED8E BA78435400 mov edx, $00544378

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053ED93 E80C64F5FF call 004951A4
0053ED98 8D9570FDFFFF lea edx, [ebp+$FFFFFD70]
0053ED9E 8B08 mov ecx, [eax]

* Possible reference to virtual method TDataSource.OFFS_58
|
0053EDA0 FF5158 call dword ptr [ecx+$58]
0053EDA3 8B8570FDFFFF mov eax, [ebp+$FFFFFD70]

* Possible String Reference to: '低'
|
0053EDA9 BA90435400 mov edx, $00544390

* Reference to: system.@LStrCmp;
|
0053EDAE E86155ECFF call 00404314
0053EDB3 7510 jnz 0053EDC5
0053EDB5 A1B4715800 mov eax, dword ptr [$005871B4]
0053EDBA C70485BCAF580001000000 mov dword ptr [$58AFBC+eax*4], $00000001

* Reference to Tfrdata instance
|
0053EDC5 A1BC525800 mov eax, dword ptr [$005852BC]
0053EDCA 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbwzset : TDataSource
|
0053EDCC 8B80B8010000 mov eax, [eax+$01B8]

* Possible String Reference to: 'gd'
|
0053EDD2 BA78435400 mov edx, $00544378

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053EDD7 E8C863F5FF call 004951A4
0053EDDC 8D956CFDFFFF lea edx, [ebp+$FFFFFD6C]
0053EDE2 8B08 mov ecx, [eax]

* Possible reference to virtual method TDataSource.OFFS_58
|
0053EDE4 FF5158 call dword ptr [ecx+$58]
0053EDE7 8B856CFDFFFF mov eax, [ebp+$FFFFFD6C]

* Possible String Reference to: '不确定'
|
0053EDED BA68435400 mov edx, $00544368

* Reference to: system.@LStrCmp;
|
0053EDF2 E81D55ECFF call 00404314
0053EDF7 7510 jnz 0053EE09
0053EDF9 A1B4715800 mov eax, dword ptr [$005871B4]
0053EDFE C70485BCAF580002000000 mov dword ptr [$58AFBC+eax*4], $00000002
0053EE09 A1B4715800 mov eax, dword ptr [$005871B4]
0053EE0E 8D04C5D8AF5800 lea eax, [$58AFD8+eax*8]
0053EE15 BA9C435400 mov edx, $0054439C

* Reference to: system.@LStrAsg;
|
0053EE1A E8B951ECFF call 00403FD8

* Reference to Tfrdata instance
|
0053EE1F A1BC525800 mov eax, dword ptr [$005852BC]
0053EE24 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbwzset : TDataSource
|
0053EE26 8B80B8010000 mov eax, [eax+$01B8]

* Reference to: db.TDataSet.Next(TDataSet);
|
0053EE2C E89B78F5FF call 004966CC
0053EE31 FF05B4715800 inc dword ptr [$005871B4]

* Reference to Tfrdata instance
|
0053EE37 A1BC525800 mov eax, dword ptr [$005852BC]
0053EE3C 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbwzset : TDataSource
|
0053EE3E 8B80B8010000 mov eax, [eax+$01B8]

* Reference to field TDataSource.OFFS_0091
|
0053EE44 80B89100000000 cmp byte ptr [eax+$0091], $00
0053EE4B 0F845CFDFFFF jz 0053EBAD
0053EE51 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.CH32 : TCheckBox
|
0053EE54 8B8008090000 mov eax, [eax+$0908]
0053EE5A 8B10 mov edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
0053EE5C FF92B4000000 call dword ptr [edx+$00B4]
0053EE62 84C0 test al, al
0053EE64 0F84B5000000 jz 0053EF1F

* Reference to Tfrdata instance
|
0053EE6A A1BC525800 mov eax, dword ptr [$005852BC]
0053EE6F 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbspset : TDataSource
|
0053EE71 8B80C0010000 mov eax, [eax+$01C0]

* Reference to: db.TDataSet.Refresh(TDataSet);
|
0053EE77 E88478F5FF call 00496700

* Reference to Tfrdata instance
|
0053EE7C A1BC525800 mov eax, dword ptr [$005852BC]
0053EE81 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbspset : TDataSource
|
0053EE83 8B80C0010000 mov eax, [eax+$01C0]

* Reference to: db.TDataSet.First(TDataSet);
| or: db.TDataSet.Last(TDataSet);
|
0053EE89 E87275F5FF call 00496400
0053EE8E C705B471580001000000 mov dword ptr [$005871B4], $00000001
0053EE98 EB6B jmp 0053EF05

* Reference to Tfrdata instance
|
0053EE9A A1BC525800 mov eax, dword ptr [$005852BC]
0053EE9F 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbspset : TDataSource
|
0053EEA1 8B80C0010000 mov eax, [eax+$01C0]

* Possible String Reference to: 'Minv'
|
0053EEA7 BAA8435400 mov edx, $005443A8

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053EEAC E8F362F5FF call 004951A4
0053EEB1 8B10 mov edx, [eax]

* Possible reference to virtual method TDataSource.OFFS_54
|
0053EEB3 FF5254 call dword ptr [edx+$54]
0053EEB6 8B15B4715800 mov edx, [$005871B4]
0053EEBC 89049540AF5800 mov [$58AF40+edx*4], eax

* Reference to Tfrdata instance
|
0053EEC3 A1BC525800 mov eax, dword ptr [$005852BC]
0053EEC8 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbspset : TDataSource
|
0053EECA 8B80C0010000 mov eax, [eax+$01C0]

* Possible String Reference to: 'Maxv'
|
0053EED0 BAB8435400 mov edx, $005443B8

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053EED5 E8CA62F5FF call 004951A4
0053EEDA 8B10 mov edx, [eax]

* Possible reference to virtual method TDataSource.OFFS_54
|
0053EEDC FF5254 call dword ptr [edx+$54]
0053EEDF 8B15B4715800 mov edx, [$005871B4]
0053EEE5 89049544AF5800 mov [$58AF44+edx*4], eax

* Reference to Tfrdata instance
|
0053EEEC A1BC525800 mov eax, dword ptr [$005852BC]
0053EEF1 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbspset : TDataSource
|
0053EEF3 8B80C0010000 mov eax, [eax+$01C0]

* Reference to: db.TDataSet.Next(TDataSet);
|
0053EEF9 E8CE77F5FF call 004966CC
0053EEFE 8305B471580002 add dword ptr [$005871B4], +$02

* Reference to Tfrdata instance
|
0053EF05 A1BC525800 mov eax, dword ptr [$005852BC]
0053EF0A 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbspset : TDataSource
|
0053EF0C 8B80C0010000 mov eax, [eax+$01C0]

* Reference to field TDataSource.OFFS_0091
|
0053EF12 80B89100000000 cmp byte ptr [eax+$0091], $00
0053EF19 0F847BFFFFFF jz 0053EE9A
0053EF1F 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.ch41 : TCheckBox
|
0053EF22 8B80040A0000 mov eax, [eax+$0A04]
0053EF28 8B10 mov edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
0053EF2A FF92B4000000 call dword ptr [edx+$00B4]
0053EF30 84C0 test al, al
0053EF32 0F84A2000000 jz 0053EFDA

* Reference to Tfrdata instance
|
0053EF38 A1BC525800 mov eax, dword ptr [$005852BC]
0053EF3D 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbmcn : TTable
|
0053EF3F 8B8010010000 mov eax, [eax+$0110]

* Reference to: db.TDataSet.Refresh(TDataSet);
|
0053EF45 E8B677F5FF call 00496700

* Reference to Tfrdata instance
|
0053EF4A A1BC525800 mov eax, dword ptr [$005852BC]
0053EF4F 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbmcn : TTable
|
0053EF51 8B8010010000 mov eax, [eax+$0110]

* Reference to: db.TDataSet.First(TDataSet);
| or: db.TDataSet.Last(TDataSet);
|
0053EF57 E8A474F5FF call 00496400
0053EF5C 33C0 xor eax, eax
0053EF5E 8945F4 mov [ebp-$0C], eax
0053EF61 EB61 jmp 0053EFC4

* Reference to Tfrdata instance
|
0053EF63 A1BC525800 mov eax, dword ptr [$005852BC]
0053EF68 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbmcn : TTable
|
0053EF6A 8B8010010000 mov eax, [eax+$0110]

* Possible String Reference to: 'minv'
|
0053EF70 BAC8435400 mov edx, $005443C8

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053EF75 E82A62F5FF call 004951A4
0053EF7A 8B10 mov edx, [eax]

* Reference to method TTable.PSGetIndexDefs(TIndexOptions)
|
0053EF7C FF5254 call dword ptr [edx+$54]

* Reference to frdata
|
0053EF7F 8B55F4 mov edx, [ebp-$0C]
0053EF82 8904D584B05800 mov [$58B084+edx*8], eax

* Reference to Tfrdata instance
|
0053EF89 A1BC525800 mov eax, dword ptr [$005852BC]
0053EF8E 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbmcn : TTable
|
0053EF90 8B8010010000 mov eax, [eax+$0110]

* Possible String Reference to: 'maxv'
|
0053EF96 BAD8435400 mov edx, $005443D8

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053EF9B E80462F5FF call 004951A4
0053EFA0 8B10 mov edx, [eax]

* Reference to method TTable.PSGetIndexDefs(TIndexOptions)
|
0053EFA2 FF5254 call dword ptr [edx+$54]

* Reference to frdata
|
0053EFA5 8B55F4 mov edx, [ebp-$0C]
0053EFA8 8904D588B05800 mov [$58B088+edx*8], eax

* Reference to Tfrdata instance
|
0053EFAF A1BC525800 mov eax, dword ptr [$005852BC]
0053EFB4 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbmcn : TTable
|
0053EFB6 8B8010010000 mov eax, [eax+$0110]

* Reference to: db.TDataSet.Next(TDataSet);
|
0053EFBC E80B77F5FF call 004966CC
0053EFC1 FF45F4 inc dword ptr [ebp-$0C]

* Reference to Tfrdata instance
|
0053EFC4 A1BC525800 mov eax, dword ptr [$005852BC]
0053EFC9 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbmcn : TTable
|
0053EFCB 8B8010010000 mov eax, [eax+$0110]

* Reference to field TTable.Eof : Boolean
|
0053EFD1 80B89100000000 cmp byte ptr [eax+$0091], $00
0053EFD8 7489 jz 0053EF63
0053EFDA 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Ch42 : TCheckBox
|
0053EFDD 8B80100A0000 mov eax, [eax+$0A10]
0053EFE3 8B10 mov edx, [eax]

* Reference to method TCheckBox.GetChecked()
|
0053EFE5 FF92B4000000 call dword ptr [edx+$00B4]
0053EFEB 84C0 test al, al
0053EFED 0F8403010000 jz 0053F0F6

* Reference to Tfrdata instance
|
0053EFF3 A1BC525800 mov eax, dword ptr [$005852BC]
0053EFF8 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbcustomn : TTable
|
0053EFFA 8B80A0010000 mov eax, [eax+$01A0]

* Reference to: db.TDataSet.Refresh(TDataSet);
|
0053F000 E8FB76F5FF call 00496700

* Reference to Tfrdata instance
|
0053F005 A1BC525800 mov eax, dword ptr [$005852BC]
0053F00A 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbcustomn : TTable
|
0053F00C 8B80A0010000 mov eax, [eax+$01A0]

* Reference to: db.TDataSet.First(TDataSet);
| or: db.TDataSet.Last(TDataSet);
|
0053F012 E8E973F5FF call 00496400
0053F017 C745F401000000 mov dword ptr [ebp-$0C], $00000001
0053F01E E998000000 jmp 0053F0BB

* Reference to Tfrdata instance
|
0053F023 A1BC525800 mov eax, dword ptr [$005852BC]
0053F028 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbcustomn : TTable
|
0053F02A 8B80A0010000 mov eax, [eax+$01A0]

* Possible String Reference to: 'mcn'
|
0053F030 BAE8435400 mov edx, $005443E8

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053F035 E86A61F5FF call 004951A4
0053F03A 8D9568FDFFFF lea edx, [ebp+$FFFFFD68]
0053F040 8B08 mov ecx, [eax]

* Reference to method TTable.PSGetUpdateException(Exception,EUpdateError)
|
0053F042 FF5158 call dword ptr [ecx+$58]
0053F045 8B9568FDFFFF mov edx, [ebp+$FFFFFD68]

* Reference to frdata
|
0053F04B 8B45F4 mov eax, [ebp-$0C]
0053F04E 8D0485D4B05800 lea eax, [$58B0D4+eax*4]

* Reference to: system.@LStrAsg;
|
0053F055 E87E4FECFF call 00403FD8

* Reference to Tfrdata instance
|
0053F05A A1BC525800 mov eax, dword ptr [$005852BC]
0053F05F 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbcustomn : TTable
|
0053F061 8B80A0010000 mov eax, [eax+$01A0]

* Possible String Reference to: 'minv'
|
0053F067 BAC8435400 mov edx, $005443C8

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053F06C E83361F5FF call 004951A4
0053F071 8B10 mov edx, [eax]

* Reference to method TTable.PSGetIndexDefs(TIndexOptions)
|
0053F073 FF5254 call dword ptr [edx+$54]

* Reference to frdata
|
0053F076 8B55F4 mov edx, [ebp-$0C]
0053F079 8904D5F0B35800 mov [$58B3F0+edx*8], eax

* Reference to Tfrdata instance
|
0053F080 A1BC525800 mov eax, dword ptr [$005852BC]
0053F085 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbcustomn : TTable
|
0053F087 8B80A0010000 mov eax, [eax+$01A0]

* Possible String Reference to: 'maxv'
|
0053F08D BAD8435400 mov edx, $005443D8

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053F092 E80D61F5FF call 004951A4
0053F097 8B10 mov edx, [eax]

* Reference to method TTable.PSGetIndexDefs(TIndexOptions)
|
0053F099 FF5254 call dword ptr [edx+$54]

* Reference to frdata
|
0053F09C 8B55F4 mov edx, [ebp-$0C]
0053F09F 8904D5F4B35800 mov [$58B3F4+edx*8], eax

* Reference to Tfrdata instance
|
0053F0A6 A1BC525800 mov eax, dword ptr [$005852BC]
0053F0AB 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbcustomn : TTable
|
0053F0AD 8B80A0010000 mov eax, [eax+$01A0]

* Reference to: db.TDataSet.Next(TDataSet);
|
0053F0B3 E81476F5FF call 004966CC
0053F0B8 FF45F4 inc dword ptr [ebp-$0C]

* Reference to Tfrdata instance
|
0053F0BB A1BC525800 mov eax, dword ptr [$005852BC]
0053F0C0 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbcustomn : TTable
|
0053F0C2 8B80A0010000 mov eax, [eax+$01A0]

* Reference to field TTable.Eof : Boolean
|
0053F0C8 80B89100000000 cmp byte ptr [eax+$0091], $00
0053F0CF 0F844EFFFFFF jz 0053F023

* Reference to Tfrdata instance
|
0053F0D5 A1BC525800 mov eax, dword ptr [$005852BC]
0053F0DA 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbcustomn : TTable
|
0053F0DC 8B80A0010000 mov eax, [eax+$01A0]
0053F0E2 8B10 mov edx, [eax]

* Reference to method TTable.GetRecordCount()
|
0053F0E4 FF924C010000 call dword ptr [edx+$014C]
0053F0EA 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.DBGrid7 : TDBGrid
|
0053F0ED 8B92140A0000 mov edx, [edx+$0A14]

* Reference to field TDBGrid.Tag : Longint
|
0053F0F3 89420C mov [edx+$0C], eax
0053F0F6 BA15000000 mov edx, $00000015
0053F0FB B854BA5800 mov eax, $0058BA54

* Reference to: system.@RewritFile;
|
0053F100 E8B37EECFF call 00406FB8

* Reference to: System.Proc_004028A8
|
0053F105 E89E37ECFF call 004028A8
0053F10A 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.TS1 : TTabSheet
|
0053F10D 8B80F8020000 mov eax, [eax+$02F8]
0053F113 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
0053F116 8B92F4020000 mov edx, [edx+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
0053F11C 3B8244020000 cmp eax, [edx+$0244]
0053F122 7438 jz 0053F15C
0053F124 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
0053F127 8B80F4020000 mov eax, [eax+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
0053F12D 8B8044020000 mov eax, [eax+$0244]
0053F133 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.TS3 : TTabSheet
|
0053F136 3B8200030000 cmp eax, [edx+$0300]
0053F13C 741E jz 0053F15C
0053F13E 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
0053F141 8B80F4020000 mov eax, [eax+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
0053F147 8B8044020000 mov eax, [eax+$0244]
0053F14D 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.TS4 : TTabSheet
|
0053F150 3B82240A0000 cmp eax, [edx+$0A24]
0053F156 0F85A80B0000 jnz 0053FD04
0053F15C 33C0 xor eax, eax
0053F15E 8945EC mov [ebp-$14], eax
0053F161 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.TS1 : TTabSheet
|
0053F164 8B80F8020000 mov eax, [eax+$02F8]
0053F16A 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
0053F16D 8B92F4020000 mov edx, [edx+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
0053F173 3B8244020000 cmp eax, [edx+$0244]
0053F179 756A jnz 0053F1E5
0053F17B 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.LbN : TLabel
|
0053F17E 8B80F0030000 mov eax, [eax+$03F0]

* Reference to field TLabel.Tag : Longint
|
0053F184 8B400C mov eax, [eax+$0C]
0053F187 8945EC mov [ebp-$14], eax
0053F18A 837DEC07 cmp dword ptr [ebp-$14], +$07
0053F18E 7D13 jnl 0053F1A3
0053F190 33C9 xor ecx, ecx
0053F192 33D2 xor edx, edx

* Possible String Reference to: '未输够7个号码'
|
0053F194 B8F4435400 mov eax, $005443F4

* Reference to: Unit_004BD734.Proc_004BD86C
|
0053F199 E8CEE6F7FF call 004BD86C
0053F19E E9464E0000 jmp 00543FE9
0053F1A3 C745F001000000 mov dword ptr [ebp-$10], $00000001
0053F1AA A178715800 mov eax, dword ptr [$00587178]
0053F1AF 85C0 test eax, eax
0053F1B1 7E32 jle 0053F1E5
0053F1B3 8945CC mov [ebp-$34], eax
0053F1B6 C745B0647A5800 mov dword ptr [ebp-$50], $00587A64
0053F1BD 8B45B0 mov eax, [ebp-$50]
0053F1C0 833800 cmp dword ptr [eax], +$00
0053F1C3 7417 jz 0053F1DC
0053F1C5 8B45F0 mov eax, [ebp-$10]
0053F1C8 8D048508725800 lea eax, [$587208+eax*4]
0053F1CF 8B55B0 mov edx, [ebp-$50]
0053F1D2 8B12 mov edx, [edx]

* Reference to: system.@LStrAsg;
|
0053F1D4 E8FF4DECFF call 00403FD8
0053F1D9 FF45F0 inc dword ptr [ebp-$10]
0053F1DC 8345B004 add dword ptr [ebp-$50], +$04
0053F1E0 FF4DCC dec dword ptr [ebp-$34]
0053F1E3 75D8 jnz 0053F1BD
0053F1E5 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
0053F1E8 8B80F4020000 mov eax, [eax+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
0053F1EE 8B8044020000 mov eax, [eax+$0244]
0053F1F4 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.TS3 : TTabSheet
|
0053F1F7 3B8200030000 cmp eax, [edx+$0300]
0053F1FD 0F8507010000 jnz 0053F30A
0053F203 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Lbd : TLabel
|
0053F206 8B80C0040000 mov eax, [eax+$04C0]

* Reference to field TLabel.Tag : Longint
|
0053F20C 8B400C mov eax, [eax+$0C]
0053F20F 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.Lbt : TLabel
|
0053F212 8B92C4040000 mov edx, [edx+$04C4]
0053F218 03420C add eax, [edx+$0C]
0053F21B 8945EC mov [ebp-$14], eax
0053F21E 33C0 xor eax, eax

* Reference to GlobalVar_005871D8
|
0053F220 A3D8715800 mov dword ptr [$005871D8], eax
0053F225 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Lbd : TLabel
|
0053F228 8B80C0040000 mov eax, [eax+$04C0]

* Reference to field TLabel.Tag : Longint
|
0053F22E 83780C01 cmp dword ptr [eax+$0C], +$01
0053F232 7D13 jnl 0053F247
0053F234 33C9 xor ecx, ecx
0053F236 33D2 xor edx, edx

* Possible String Reference to: '胆码个数必须是1-6个'
|
0053F238 B80C445400 mov eax, $0054440C

* Reference to: Unit_004BD734.Proc_004BD86C
|
0053F23D E82AE6F7FF call 004BD86C
0053F242 E9A24D0000 jmp 00543FE9
0053F247 837DEC07 cmp dword ptr [ebp-$14], +$07
0053F24B 7D13 jnl 0053F260
0053F24D 33C9 xor ecx, ecx
0053F24F 33D2 xor edx, edx

* Possible String Reference to: '胆码个数+拖码个数必须大于7个'
|
0053F251 B828445400 mov eax, $00544428

* Reference to: Unit_004BD734.Proc_004BD86C
|
0053F256 E811E6F7FF call 004BD86C
0053F25B E9894D0000 jmp 00543FE9
0053F260 C745F006000000 mov dword ptr [ebp-$10], $00000006
0053F267 8975B0 mov [ebp-$50], esi
0053F26A 8B45B0 mov eax, [ebp-$50]
0053F26D 33D2 xor edx, edx
0053F26F 8910 mov [eax], edx
0053F271 8345B004 add dword ptr [ebp-$50], +$04
0053F275 FF4DF0 dec dword ptr [ebp-$10]
0053F278 75F0 jnz 0053F26A
0053F27A C745F001000000 mov dword ptr [ebp-$10], $00000001
0053F281 C705B471580001000000 mov dword ptr [$005871B4], $00000001
0053F28B A178715800 mov eax, dword ptr [$00587178]
0053F290 85C0 test eax, eax
0053F292 7E76 jle 0053F30A
0053F294 8945CC mov [ebp-$34], eax
0053F297 C745B08C7B5800 mov dword ptr [ebp-$50], $00587B8C
0053F29E C745A8207C5800 mov dword ptr [ebp-$58], $00587C20
0053F2A5 8B45B0 mov eax, [ebp-$50]
0053F2A8 833800 cmp dword ptr [eax], +$00
0053F2AB 7431 jz 0053F2DE
0053F2AD 8B45F0 mov eax, [ebp-$10]
0053F2B0 8D048508725800 lea eax, [$587208+eax*4]
0053F2B7 8B55B0 mov edx, [ebp-$50]
0053F2BA 8B12 mov edx, [edx]

* Reference to: system.@LStrAsg;
|
0053F2BC E8174DECFF call 00403FD8
0053F2C1 8B45B0 mov eax, [ebp-$50]
0053F2C4 8B00 mov eax, [eax]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053F2C6 E839ABECFF call 00409E04
0053F2CB 8B15B4715800 mov edx, [$005871B4]
0053F2D1 894496FC mov [esi+edx*4-$04], eax
0053F2D5 FF45F0 inc dword ptr [ebp-$10]
0053F2D8 FF05B4715800 inc dword ptr [$005871B4]

* Reference to frdata
|
0053F2DE 8B45A8 mov eax, [ebp-$58]
0053F2E1 833800 cmp dword ptr [eax], +$00
0053F2E4 7417 jz 0053F2FD
0053F2E6 8B45F0 mov eax, [ebp-$10]
0053F2E9 8D048508725800 lea eax, [$587208+eax*4]

* Reference to frdata
|
0053F2F0 8B55A8 mov edx, [ebp-$58]
0053F2F3 8B12 mov edx, [edx]

* Reference to: system.@LStrAsg;
|
0053F2F5 E8DE4CECFF call 00403FD8
0053F2FA FF45F0 inc dword ptr [ebp-$10]
0053F2FD 8345A804 add dword ptr [ebp-$58], +$04
0053F301 8345B004 add dword ptr [ebp-$50], +$04
0053F305 FF4DCC dec dword ptr [ebp-$34]
0053F308 759B jnz 0053F2A5
0053F30A 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
0053F30D 8B80F4020000 mov eax, [eax+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
0053F313 8B8044020000 mov eax, [eax+$0244]
0053F319 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.TS4 : TTabSheet
|
0053F31C 3B82240A0000 cmp eax, [edx+$0A24]
0053F322 0F852D020000 jnz 0053F555

* Reference to Tfrdata instance
|
0053F328 A1BC525800 mov eax, dword ptr [$005852BC]
0053F32D 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbmantissa : TTable
|
0053F32F 8B80C8010000 mov eax, [eax+$01C8]

* Reference to: db.TDataSet.Refresh(TDataSet);
|
0053F335 E8C673F5FF call 00496700

* Reference to Tfrdata instance
|
0053F33A A1BC525800 mov eax, dword ptr [$005852BC]
0053F33F 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbmantissa : TTable
|
0053F341 8B80C8010000 mov eax, [eax+$01C8]
0053F347 8B10 mov edx, [eax]

* Reference to method TTable.GetRecordCount()
|
0053F349 FF924C010000 call dword ptr [edx+$014C]

* Reference to GlobalVar_005871B4
|
0053F34F A3B4715800 mov dword ptr [$005871B4], eax
0053F354 833DB471580001 cmp dword ptr [$005871B4], +$01
0053F35B 0F8C884C0000 jl 00543FE9
0053F361 A178715800 mov eax, dword ptr [$00587178]
0053F366 85C0 test eax, eax
0053F368 7E1A jle 0053F384
0053F36A 8945CC mov [ebp-$34], eax
0053F36D C745A860805800 mov dword ptr [ebp-$58], $00588060

* Reference to frdata
|
0053F374 8B45A8 mov eax, [ebp-$58]
0053F377 33D2 xor edx, edx
0053F379 8910 mov [eax], edx
0053F37B 8345A804 add dword ptr [ebp-$58], +$04
0053F37F FF4DCC dec dword ptr [ebp-$34]
0053F382 75F0 jnz 0053F374
0053F384 33C0 xor eax, eax

* Reference to GlobalVar_005871BC
|
0053F386 A3BC715800 mov dword ptr [$005871BC], eax
0053F38B 33C0 xor eax, eax

* Reference to GlobalVar_005871D8
|
0053F38D A3D8715800 mov dword ptr [$005871D8], eax
0053F392 33C0 xor eax, eax
0053F394 8945F4 mov [ebp-$0C], eax
0053F397 C745A81C815800 mov dword ptr [ebp-$58], $0058811C
0053F39E C745B05C805800 mov dword ptr [ebp-$50], $0058805C
0053F3A5 8D9564FDFFFF lea edx, [ebp+$FFFFFD64]
0053F3AB 8B45F4 mov eax, [ebp-$0C]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0053F3AE E821AAECFF call 00409DD4
0053F3B3 8B8D64FDFFFF mov ecx, [ebp+$FFFFFD64]
0053F3B9 B8F8715800 mov eax, $005871F8
0053F3BE BA50445400 mov edx, $00544450

* Reference to: system.@LStrCat3;
|
0053F3C3 E8884EECFF call 00404250

* Reference to Tfrdata instance
|
0053F3C8 A1BC525800 mov eax, dword ptr [$005852BC]
0053F3CD 8B00 mov eax, [eax]

* Reference to control Tfrdata.Tbmantissa : TTable
|
0053F3CF 8B80C8010000 mov eax, [eax+$01C8]
0053F3D5 8B15F8715800 mov edx, [$005871F8]

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0053F3DB E8C45DF5FF call 004951A4
0053F3E0 8B10 mov edx, [eax]

* Reference to method TTable.PSGetIndexDefs(TIndexOptions)
|
0053F3E2 FF5254 call dword ptr [edx+$54]

* Reference to GlobalVar_005871B8
|
0053F3E5 A3B8715800 mov dword ptr [$005871B8], eax
0053F3EA A1B8715800 mov eax, dword ptr [$005871B8]
0053F3EF 0105BC715800 add [$005871BC], eax

* Reference to frdata
|
0053F3F5 8B45A8 mov eax, [ebp-$58]
0053F3F8 8B15B8715800 mov edx, [$005871B8]
0053F3FE 8910 mov [eax], edx
0053F400 833DB871580000 cmp dword ptr [$005871B8], +$00
0053F407 7E71 jle 0053F47A
0053F409 837DF400 cmp dword ptr [ebp-$0C], +$00
0053F40D 7E08 jle 0053F417
0053F40F 8B45B0 mov eax, [ebp-$50]
0053F412 8B55F4 mov edx, [ebp-$0C]
0053F415 8910 mov [eax], edx
0053F417 8B45F4 mov eax, [ebp-$0C]
0053F41A 83C00A add eax, +$0A
0053F41D 3B0578715800 cmp eax, [$00587178]
0053F423 7F13 jnle 0053F438
0053F425 8B45F4 mov eax, [ebp-$0C]
0053F428 83C00A add eax, +$0A
0053F42B 8B55F4 mov edx, [ebp-$0C]
0053F42E 83C20A add edx, +$0A
0053F431 8904955C805800 mov [$58805C+edx*4], eax
0053F438 8B45F4 mov eax, [ebp-$0C]
0053F43B 83C014 add eax, +$14
0053F43E 3B0578715800 cmp eax, [$00587178]
0053F444 7F13 jnle 0053F459
0053F446 8B45F4 mov eax, [ebp-$0C]
0053F449 83C014 add eax, +$14
0053F44C 8B55F4 mov edx, [ebp-$0C]
0053F44F 83C214 add edx, +$14
0053F452 8904955C805800 mov [$58805C+edx*4], eax
0053F459 8B45F4 mov eax, [ebp-$0C]
0053F45C 83C01E add eax, +$1E
0053F45F 3B0578715800 cmp eax, [$00587178]
0053F465 7F13 jnle 0053F47A
0053F467 8B45F4 mov eax, [ebp-$0C]
0053F46A 83C01E add eax, +$1E
0053F46D 8B55F4 mov edx, [ebp-$0C]
0053F470 83C21E add edx, +$1E
0053F473 8904955C805800 mov [$58805C+edx*4], eax
0053F47A FF45F4 inc dword ptr [ebp-$0C]
0053F47D 8345B004 add dword ptr [ebp-$50], +$04
0053F481 8345A804 add dword ptr [ebp-$58], +$04
0053F485 837DF40A cmp dword ptr [ebp-$0C], +$0A
0053F489 0F8516FFFFFF jnz 0053F3A5
0053F48F 833DBC71580007 cmp dword ptr [$005871BC], +$07
0053F496 7413 jz 0053F4AB
0053F498 33C9 xor ecx, ecx
0053F49A 33D2 xor edx, edx

* Possible String Reference to: '尾数个数之和必须为7个'
|
0053F49C B85C445400 mov eax, $0054445C

* Reference to: Unit_004BD734.Proc_004BD86C
|
0053F4A1 E8C6E3F7FF call 004BD86C
0053F4A6 E93E4B0000 jmp 00543FE9
0053F4AB C745F40A000000 mov dword ptr [ebp-$0C], $0000000A
0053F4B2 C745B0F4805800 mov dword ptr [ebp-$50], $005880F4
0053F4B9 8B45B0 mov eax, [ebp-$50]
0053F4BC C70001000000 mov dword ptr [eax], $00000001
0053F4C2 8345B004 add dword ptr [ebp-$50], +$04
0053F4C6 FF4DF4 dec dword ptr [ebp-$0C]
0053F4C9 75EE jnz 0053F4B9
0053F4CB C745EC01000000 mov dword ptr [ebp-$14], $00000001
0053F4D2 A178715800 mov eax, dword ptr [$00587178]
0053F4D7 85C0 test eax, eax
0053F4D9 7E77 jle 0053F552
0053F4DB 8945CC mov [ebp-$34], eax
0053F4DE C745B060805800 mov dword ptr [ebp-$50], $00588060
0053F4E5 8B45B0 mov eax, [ebp-$50]
0053F4E8 833800 cmp dword ptr [eax], +$00
0053F4EB 7E5C jle 0053F549
0053F4ED 8B45B0 mov eax, [ebp-$50]
0053F4F0 83380A cmp dword ptr [eax], +$0A
0053F4F3 7D2C jnl 0053F521
0053F4F5 8D9560FDFFFF lea edx, [ebp+$FFFFFD60]
0053F4FB 8B45B0 mov eax, [ebp-$50]
0053F4FE 8B00 mov eax, [eax]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0053F500 E8CFA8ECFF call 00409DD4
0053F505 8B8D60FDFFFF mov ecx, [ebp+$FFFFFD60]
0053F50B 8B45EC mov eax, [ebp-$14]
0053F50E 8D048508725800 lea eax, [$587208+eax*4]
0053F515 BA7C445400 mov edx, $0054447C

* Reference to: system.@LStrCat3;
|
0053F51A E8314DECFF call 00404250
0053F51F EB25 jmp 0053F546
0053F521 8D955CFDFFFF lea edx, [ebp+$FFFFFD5C]
0053F527 8B45B0 mov eax, [ebp-$50]
0053F52A 8B00 mov eax, [eax]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0053F52C E8A3A8ECFF call 00409DD4
0053F531 8B955CFDFFFF mov edx, [ebp+$FFFFFD5C]
0053F537 8B45EC mov eax, [ebp-$14]
0053F53A 8D048508725800 lea eax, [$587208+eax*4]

* Reference to: system.@LStrAsg;
|
0053F541 E8924AECFF call 00403FD8
0053F546 FF45EC inc dword ptr [ebp-$14]
0053F549 8345B004 add dword ptr [ebp-$50], +$04
0053F54D FF4DCC dec dword ptr [ebp-$34]
0053F550 7593 jnz 0053F4E5
0053F552 FF4DEC dec dword ptr [ebp-$14]
0053F555 33C0 xor eax, eax
0053F557 8945D0 mov [ebp-$30], eax
0053F55A C745D40000F03F mov dword ptr [ebp-$2C], $3FF00000
0053F561 8B45EC mov eax, [ebp-$14]
0053F564 83E808 sub eax, +$08
0053F567 85C0 test eax, eax
0053F569 7C3E jl 0053F5A9
0053F56B 40 inc eax
0053F56C 8945CC mov [ebp-$34], eax
0053F56F C745F400000000 mov dword ptr [ebp-$0C], $00000000
0053F576 8B45EC mov eax, [ebp-$14]
0053F579 2B45F4 sub eax, dword ptr [ebp-$0C]
0053F57C 898558FDFFFF mov [ebp+$FFFFFD58], eax
0053F582 DB8558FDFFFF fild dword ptr [ebp+$FFFFFD58]
0053F588 DC4DD0 fmul qword ptr [ebp-$30]
0053F58B 8B45F4 mov eax, [ebp-$0C]
0053F58E 40 inc eax
0053F58F 898554FDFFFF mov [ebp+$FFFFFD54], eax
0053F595 DB8554FDFFFF fild dword ptr [ebp+$FFFFFD54]
0053F59B DEF9 fdivp st(1), st(0)
0053F59D DD5DD0 fstp qword ptr [ebp-$30]
0053F5A0 9B wait
0053F5A1 FF45F4 inc dword ptr [ebp-$0C]
0053F5A4 FF4DCC dec dword ptr [ebp-$34]
0053F5A7 75CD jnz 0053F576
0053F5A9 DD45D0 fld qword ptr [ebp-$30]

* Reference to: system.@TRUNC;
|
0053F5AC E8AF36ECFF call 00402C60
0053F5B1 8945F0 mov [ebp-$10], eax
0053F5B4 8B45F0 mov eax, [ebp-$10]
0053F5B7 8945E8 mov [ebp-$18], eax
0053F5BA 33D2 xor edx, edx
0053F5BC 8B45F0 mov eax, [ebp-$10]

* Reference to: Unit_004BD734.Proc_004BD9A4
|
0053F5BF E8E0E3F7FF call 004BD9A4
0053F5C4 33C0 xor eax, eax
0053F5C6 8945F0 mov [ebp-$10], eax
0053F5C9 8B45EC mov eax, [ebp-$14]
0053F5CC 83E806 sub eax, +$06
0053F5CF 85C0 test eax, eax
0053F5D1 0F8E03060000 jle 0053FBDA
0053F5D7 8945CC mov [ebp-$34], eax
0053F5DA C705DC71580001000000 mov dword ptr [$005871DC], $00000001
0053F5E4 A1DC715800 mov eax, dword ptr [$005871DC]
0053F5E9 40 inc eax
0053F5EA 8B55EC mov edx, [ebp-$14]
0053F5ED 83EA05 sub edx, +$05
0053F5F0 2BD0 sub edx, eax
0053F5F2 0F8CD3050000 jl 0053FBCB
0053F5F8 42 inc edx
0053F5F9 8955C8 mov [ebp-$38], edx

* Reference to GlobalVar_005871E0
|
0053F5FC A3E0715800 mov dword ptr [$005871E0], eax
0053F601 A1E0715800 mov eax, dword ptr [$005871E0]
0053F606 40 inc eax
0053F607 8B55EC mov edx, [ebp-$14]
0053F60A 83EA04 sub edx, +$04
0053F60D 2BD0 sub edx, eax
0053F60F 0F8CA7050000 jl 0053FBBC
0053F615 42 inc edx
0053F616 8955C4 mov [ebp-$3C], edx

* Reference to GlobalVar_005871E4
|
0053F619 A3E4715800 mov dword ptr [$005871E4], eax
0053F61E A1E4715800 mov eax, dword ptr [$005871E4]
0053F623 40 inc eax
0053F624 8B55EC mov edx, [ebp-$14]
0053F627 83EA03 sub edx, +$03
0053F62A 2BD0 sub edx, eax
0053F62C 0F8C7B050000 jl 0053FBAD
0053F632 42 inc edx
0053F633 8955C0 mov [ebp-$40], edx

* Reference to GlobalVar_005871E8
|
0053F636 A3E8715800 mov dword ptr [$005871E8], eax
0053F63B A1E8715800 mov eax, dword ptr [$005871E8]
0053F640 40 inc eax
0053F641 8B55EC mov edx, [ebp-$14]
0053F644 83EA02 sub edx, +$02
0053F647 2BD0 sub edx, eax
0053F649 0F8C4F050000 jl 0053FB9E
0053F64F 42 inc edx
0053F650 8955BC mov [ebp-$44], edx

* Reference to GlobalVar_005871EC
|
0053F653 A3EC715800 mov dword ptr [$005871EC], eax
0053F658 A1EC715800 mov eax, dword ptr [$005871EC]
0053F65D 40 inc eax
0053F65E 8B55EC mov edx, [ebp-$14]
0053F661 4A dec edx
0053F662 2BD0 sub edx, eax
0053F664 0F8C25050000 jl 0053FB8F
0053F66A 42 inc edx
0053F66B 8955B8 mov [ebp-$48], edx

* Reference to GlobalVar_005871F0
|
0053F66E A3F0715800 mov dword ptr [$005871F0], eax
0053F673 A1F0715800 mov eax, dword ptr [$005871F0]
0053F678 40 inc eax
0053F679 8B55EC mov edx, [ebp-$14]
0053F67C 2BD0 sub edx, eax
0053F67E 0F8CFC040000 jl 0053FB80
0053F684 42 inc edx
0053F685 8955B4 mov [ebp-$4C], edx

* Reference to GlobalVar_005871F4
|
0053F688 A3F4715800 mov dword ptr [$005871F4], eax
0053F68D 803D0A72580074 cmp byte ptr [$0058720A], $74
0053F694 0F85E4000000 jnz 0053F77E
0053F69A 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
0053F69D 8B80F4020000 mov eax, [eax+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
0053F6A3 8B8044020000 mov eax, [eax+$0244]
0053F6A9 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.TS1 : TTabSheet
|
0053F6AC 3B82F8020000 cmp eax, [edx+$02F8]
0053F6B2 0F85C6000000 jnz 0053F77E
0053F6B8 A1DC715800 mov eax, dword ptr [$005871DC]
0053F6BD FF348508725800 push dword ptr [$587208+eax*4]
0053F6C4 6888445400 push $00544488
0053F6C9 A1E0715800 mov eax, dword ptr [$005871E0]
0053F6CE FF348508725800 push dword ptr [$587208+eax*4]
0053F6D5 6888445400 push $00544488
0053F6DA A1E4715800 mov eax, dword ptr [$005871E4]
0053F6DF FF348508725800 push dword ptr [$587208+eax*4]
0053F6E6 6888445400 push $00544488
0053F6EB A1E8715800 mov eax, dword ptr [$005871E8]
0053F6F0 FF348508725800 push dword ptr [$587208+eax*4]
0053F6F7 6888445400 push $00544488
0053F6FC A1EC715800 mov eax, dword ptr [$005871EC]
0053F701 FF348508725800 push dword ptr [$587208+eax*4]
0053F708 6888445400 push $00544488
0053F70D A1F0715800 mov eax, dword ptr [$005871F0]
0053F712 FF348508725800 push dword ptr [$587208+eax*4]
0053F719 6888445400 push $00544488
0053F71E A1F4715800 mov eax, dword ptr [$005871F4]
0053F723 FF348508725800 push dword ptr [$587208+eax*4]
0053F72A 8D8550FCFFFF lea eax, [ebp+$FFFFFC50]
0053F730 BA0D000000 mov edx, $0000000D

* Reference to: system.@LStrCatN;
|
0053F735 E88A4BECFF call 004042C4
0053F73A 8B9550FCFFFF mov edx, [ebp+$FFFFFC50]
0053F740 8D8554FCFFFF lea eax, [ebp+$FFFFFC54]
0053F746 B9FF000000 mov ecx, $000000FF

* Reference to: system.@LStrToString;
|
0053F74B E8904AECFF call 004041E0
0053F750 8D9554FCFFFF lea edx, [ebp+$FFFFFC54]
0053F756 B83CBA5800 mov eax, $0058BA3C
0053F75B B114 mov cl, $14

* Reference to: system.@PStrNCpy;
|
0053F75D E88235ECFF call 00402CE4
0053F762 BA3CBA5800 mov edx, $0058BA3C
0053F767 B854BA5800 mov eax, $0058BA54

* Reference to: system.@WriteRec;
|
0053F76C E8BB78ECFF call 0040702C

* Reference to: System.Proc_004028A8
|
0053F771 E83231ECFF call 004028A8
0053F776 FF45F0 inc dword ptr [ebp-$10]
0053F779 E9EA030000 jmp 0053FB68
0053F77E A1DC715800 mov eax, dword ptr [$005871DC]
0053F783 8B048508725800 mov eax, [$587208+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053F78A E875A6ECFF call 00409E04

* Reference to GlobalVar_005872A0
|
0053F78F A3A0725800 mov dword ptr [$005872A0], eax
0053F794 A1E0715800 mov eax, dword ptr [$005871E0]
0053F799 8B048508725800 mov eax, [$587208+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053F7A0 E85FA6ECFF call 00409E04

* Reference to GlobalVar_005872A4
|
0053F7A5 A3A4725800 mov dword ptr [$005872A4], eax
0053F7AA A1E4715800 mov eax, dword ptr [$005871E4]
0053F7AF 8B048508725800 mov eax, [$587208+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053F7B6 E849A6ECFF call 00409E04

* Reference to GlobalVar_005872A8
|
0053F7BB A3A8725800 mov dword ptr [$005872A8], eax
0053F7C0 A1E8715800 mov eax, dword ptr [$005871E8]
0053F7C5 8B048508725800 mov eax, [$587208+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053F7CC E833A6ECFF call 00409E04

* Reference to GlobalVar_005872AC
|
0053F7D1 A3AC725800 mov dword ptr [$005872AC], eax
0053F7D6 A1EC715800 mov eax, dword ptr [$005871EC]
0053F7DB 8B048508725800 mov eax, [$587208+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053F7E2 E81DA6ECFF call 00409E04

* Reference to GlobalVar_005872B0
|
0053F7E7 A3B0725800 mov dword ptr [$005872B0], eax
0053F7EC A1F0715800 mov eax, dword ptr [$005871F0]
0053F7F1 8B048508725800 mov eax, [$587208+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053F7F8 E807A6ECFF call 00409E04

* Reference to GlobalVar_005872B4
|
0053F7FD A3B4725800 mov dword ptr [$005872B4], eax
0053F802 A1F4715800 mov eax, dword ptr [$005871F4]
0053F807 8B048508725800 mov eax, [$587208+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053F80E E8F1A5ECFF call 00409E04

* Reference to GlobalVar_005872B8
|
0053F813 A3B8725800 mov dword ptr [$005872B8], eax
0053F818 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
0053F81B 8B80F4020000 mov eax, [eax+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
0053F821 8B8044020000 mov eax, [eax+$0244]
0053F827 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.TS1 : TTabSheet
|
0053F82A 3B82F8020000 cmp eax, [edx+$02F8]
0053F830 7518 jnz 0053F84A
0053F832 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.btfilter : TButton
|
0053F835 8B9828090000 mov ebx, [eax+$0928]
0053F83B 8B55F8 mov edx, [ebp-$08]

* Reference to field TButton.OFFS_010C
|
0053F83E 8B830C010000 mov eax, [ebx+$010C]

* Possible reference to virtual method TButton.OFFS_0108
|
0053F844 FF9308010000 call dword ptr [ebx+$0108]
0053F84A 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
0053F84D 8B80F4020000 mov eax, [eax+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
0053F853 8B8044020000 mov eax, [eax+$0244]
0053F859 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.TS3 : TTabSheet
|
0053F85C 3B8200030000 cmp eax, [edx+$0300]
0053F862 0F85E9000000 jnz 0053F951
0053F868 C6050972580066 mov byte ptr [$00587209], $66
0053F86F 33C0 xor eax, eax

* Reference to GlobalVar_005871CC
|
0053F871 A3CC715800 mov dword ptr [$005871CC], eax
0053F876 BF07000000 mov edi, $00000007
0053F87B BBA0725800 mov ebx, $005872A0
0053F880 8B16 mov edx, [esi]
0053F882 8D8530FCFFFF lea eax, [ebp+$FFFFFC30]
0053F888 B120 mov cl, $20

* Reference to: system.@SetElem;
|
0053F88A E82537ECFF call 00402FB4
0053F88F 8B4604 mov eax, [esi+$04]
0053F892 3DFF000000 cmp eax, $000000FF
0053F897 7707 jnbe 0053F8A0
0053F899 0FAB8530FCFFFF bts [ebp+$FFFFFC30], eax
0053F8A0 8B4608 mov eax, [esi+$08]
0053F8A3 3DFF000000 cmp eax, $000000FF
0053F8A8 7707 jnbe 0053F8B1
0053F8AA 0FAB8530FCFFFF bts [ebp+$FFFFFC30], eax
0053F8B1 8B460C mov eax, [esi+$0C]
0053F8B4 3DFF000000 cmp eax, $000000FF
0053F8B9 7707 jnbe 0053F8C2
0053F8BB 0FAB8530FCFFFF bts [ebp+$FFFFFC30], eax
0053F8C2 8B4610 mov eax, [esi+$10]
0053F8C5 3DFF000000 cmp eax, $000000FF
0053F8CA 7707 jnbe 0053F8D3
0053F8CC 0FAB8530FCFFFF bts [ebp+$FFFFFC30], eax
0053F8D3 8B4614 mov eax, [esi+$14]
0053F8D6 3DFF000000 cmp eax, $000000FF
0053F8DB 7707 jnbe 0053F8E4
0053F8DD 0FAB8530FCFFFF bts [ebp+$FFFFFC30], eax
0053F8E4 8B03 mov eax, [ebx]
0053F8E6 3DFF000000 cmp eax, $000000FF
0053F8EB 7707 jnbe 0053F8F4
0053F8ED 0FA38530FCFFFF bt [ebp+$FFFFFC30], eax
0053F8F4 7306 jnb 0053F8FC
0053F8F6 FF05CC715800 inc dword ptr [$005871CC]
0053F8FC 83C304 add ebx, +$04
0053F8FF 4F dec edi
0053F900 0F857AFFFFFF jnz 0053F880
0053F906 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Lbd : TLabel
|
0053F909 8B80C0040000 mov eax, [eax+$04C0]

* Reference to field TLabel.Tag : Longint
|
0053F90F 8B400C mov eax, [eax+$0C]
0053F912 3B05CC715800 cmp eax, [$005871CC]
0053F918 750D jnz 0053F927
0053F91A C6050972580074 mov byte ptr [$00587209], $74
0053F921 FF05D8715800 inc dword ptr [$005871D8]
0053F927 803D0972580074 cmp byte ptr [$00587209], $74
0053F92E 7521 jnz 0053F951
0053F930 803D0A72580066 cmp byte ptr [$0058720A], $66
0053F937 7518 jnz 0053F951
0053F939 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.btfilter : TButton
|
0053F93C 8B9828090000 mov ebx, [eax+$0928]
0053F942 8B55F8 mov edx, [ebp-$08]

* Reference to field TButton.OFFS_010C
|
0053F945 8B830C010000 mov eax, [ebx+$010C]

* Possible reference to virtual method TButton.OFFS_0108
|
0053F94B FF9308010000 call dword ptr [ebx+$0108]
0053F951 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
0053F954 8B80F4020000 mov eax, [eax+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
0053F95A 8B8044020000 mov eax, [eax+$0244]
0053F960 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.TS4 : TTabSheet
|
0053F963 3B82240A0000 cmp eax, [edx+$0A24]
0053F969 0F852B010000 jnz 0053FA9A
0053F96F C6050972580074 mov byte ptr [$00587209], $74
0053F976 C745F40A000000 mov dword ptr [ebp-$0C], $0000000A
0053F97D BBF4805800 mov ebx, $005880F4
0053F982 33C0 xor eax, eax
0053F984 8903 mov [ebx], eax
0053F986 83C304 add ebx, +$04
0053F989 FF4DF4 dec dword ptr [ebp-$0C]
0053F98C 75F4 jnz 0053F982
0053F98E C745F407000000 mov dword ptr [ebp-$0C], $00000007
0053F995 BBA0725800 mov ebx, $005872A0
0053F99A 8B3B mov edi, [ebx]
0053F99C 83FF0A cmp edi, +$0A
0053F99F 7D3B jnl 0053F9DC
0053F9A1 8D852CFCFFFF lea eax, [ebp+$FFFFFC2C]
0053F9A7 50 push eax
0053F9A8 8D9528FCFFFF lea edx, [ebp+$FFFFFC28]
0053F9AE 8BC7 mov eax, edi

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0053F9B0 E81FA4ECFF call 00409DD4
0053F9B5 8B8528FCFFFF mov eax, [ebp+$FFFFFC28]
0053F9BB B901000000 mov ecx, $00000001
0053F9C0 BA01000000 mov edx, $00000001

* Reference to: system.@LStrCopy;
|
0053F9C5 E8424AECFF call 0040440C
0053F9CA 8B852CFCFFFF mov eax, [ebp+$FFFFFC2C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053F9D0 E82FA4ECFF call 00409E04

* Reference to GlobalVar_005871B4
|
0053F9D5 A3B4715800 mov dword ptr [$005871B4], eax
0053F9DA EB39 jmp 0053FA15
0053F9DC 8D8524FCFFFF lea eax, [ebp+$FFFFFC24]
0053F9E2 50 push eax
0053F9E3 8D9520FCFFFF lea edx, [ebp+$FFFFFC20]
0053F9E9 8BC7 mov eax, edi

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0053F9EB E8E4A3ECFF call 00409DD4
0053F9F0 8B8520FCFFFF mov eax, [ebp+$FFFFFC20]
0053F9F6 B901000000 mov ecx, $00000001
0053F9FB BA02000000 mov edx, $00000002

* Reference to: system.@LStrCopy;
|
0053FA00 E8074AECFF call 0040440C
0053FA05 8B8524FCFFFF mov eax, [ebp+$FFFFFC24]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0053FA0B E8F4A3ECFF call 00409E04

* Reference to GlobalVar_005871B4
|
0053FA10 A3B4715800 mov dword ptr [$005871B4], eax
0053FA15 A1B4715800 mov eax, dword ptr [$005871B4]
0053FA1A FF0485F4805800 inc dword ptr [$5880F4+eax*4]
0053FA21 83C304 add ebx, +$04
0053FA24 FF4DF4 dec dword ptr [ebp-$0C]
0053FA27 0F856DFFFFFF jnz 0053F99A
0053FA2D 33C0 xor eax, eax
0053FA2F 8945F4 mov [ebp-$0C], eax
0053FA32 8B45F4 mov eax, [ebp-$0C]
0053FA35 8B0485F4805800 mov eax, [$5880F4+eax*4]
0053FA3C 8B55F4 mov edx, [ebp-$0C]
0053FA3F 3B04951C815800 cmp eax, [$58811C+edx*4]
0053FA46 7410 jz 0053FA58
0053FA48 C6050972580066 mov byte ptr [$00587209], $66
0053FA4F C745F40A000000 mov dword ptr [ebp-$0C], $0000000A
0053FA56 EB03 jmp 0053FA5B
0053FA58 FF45F4 inc dword ptr [ebp-$0C]
0053FA5B 837DF409 cmp dword ptr [ebp-$0C], +$09
0053FA5F 7ED1 jle 0053FA32
0053FA61 803D0972580074 cmp byte ptr [$00587209], $74
0053FA68 7506 jnz 0053FA70
0053FA6A FF05D8715800 inc dword ptr [$005871D8]
0053FA70 803D0972580074 cmp byte ptr [$00587209], $74
0053FA77 7521 jnz 0053FA9A
0053FA79 803D0A72580066 cmp byte ptr [$0058720A], $66
0053FA80 7518 jnz 0053FA9A
0053FA82 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.btfilter : TButton
|
0053FA85 8B9828090000 mov ebx, [eax+$0928]
0053FA8B 8B55F8 mov edx, [ebp-$08]

* Reference to field TButton.OFFS_010C
|
0053FA8E 8B830C010000 mov eax, [ebx+$010C]

* Possible reference to virtual method TButton.OFFS_0108
|
0053FA94 FF9308010000 call dword ptr [ebx+$0108]
0053FA9A 803D0972580074 cmp byte ptr [$00587209], $74
0053FAA1 0F85C1000000 jnz 0053FB68
0053FAA7 A1DC715800 mov eax, dword ptr [$005871DC]
0053FAAC FF348508725800 push dword ptr [$587208+eax*4]
0053FAB3 6888445400 push $00544488
0053FAB8 A1E0715800 mov eax, dword ptr [$005871E0]
0053FABD FF348508725800 push dword ptr [$587208+eax*4]
0053FAC4 6888445400 push $00544488
0053FAC9 A1E4715800 mov eax, dword ptr [$005871E4]
0053FACE FF348508725800 push dword ptr [$587208+eax*4]
0053FAD5 6888445400 push $00544488
0053FADA A1E8715800 mov eax, dword ptr [$005871E8]
0053FADF FF348508725800 push dword ptr [$587208+eax*4]
0053FAE6 6888445400 push $00544488
0053FAEB A1EC715800 mov eax, dword ptr [$005871EC]
0053FAF0 FF348508725800 push dword ptr [$587208+eax*4]
0053FAF7 6888445400 push $00544488
0053FAFC A1F0715800 mov eax, dword ptr [$005871F0]
0053FB01 FF348508725800 push dword ptr [$587208+eax*4]
0053FB08 6888445400 push $00544488
0053FB0D A1F4715800 mov eax, dword ptr [$005871F4]
0053FB12 FF348508725800 push dword ptr [$587208+eax*4]
0053FB19 8D851CFCFFFF lea eax, [ebp+$FFFFFC1C]
0053FB1F BA0D000000 mov edx, $0000000D

* Reference to: system.@LStrCatN;
|
0053FB24 E89B47ECFF call 004042C4
0053FB29 8B951CFCFFFF mov edx, [ebp+$FFFFFC1C]
0053FB2F 8D8554FCFFFF lea eax, [ebp+$FFFFFC54]
0053FB35 B9FF000000 mov ecx, $000000FF

* Reference to: system.@LStrToString;
|
0053FB3A E8A146ECFF call 004041E0
0053FB3F 8D9554FCFFFF lea edx, [ebp+$FFFFFC54]
0053FB45 B83CBA5800 mov eax, $0058BA3C
0053FB4A B114 mov cl, $14

* Reference to: system.@PStrNCpy;
|
0053FB4C E89331ECFF call 00402CE4
0053FB51 BA3CBA5800 mov edx, $0058BA3C
0053FB56 B854BA5800 mov eax, $0058BA54

* Reference to: system.@WriteRec;
|
0053FB5B E8CC74ECFF call 0040702C

* Reference to: System.Proc_004028A8
|
0053FB60 E8432DECFF call 004028A8
0053FB65 FF45F0 inc dword ptr [ebp-$10]
0053FB68 33D2 xor edx, edx
0053FB6A 33C0 xor eax, eax

* Reference to: Unit_004BD734.Proc_004BD9A4
|
0053FB6C E833DEF7FF call 004BD9A4
0053FB71 FF05F4715800 inc dword ptr [$005871F4]
0053FB77 FF4DB4 dec dword ptr [ebp-$4C]
0053FB7A 0F850DFBFFFF jnz 0053F68D
0053FB80 FF05F0715800 inc dword ptr [$005871F0]
0053FB86 FF4DB8 dec dword ptr [ebp-$48]
0053FB89 0F85E4FAFFFF jnz 0053F673
0053FB8F FF05EC715800 inc dword ptr [$005871EC]
0053FB95 FF4DBC dec dword ptr [ebp-$44]
0053FB98 0F85BAFAFFFF jnz 0053F658
0053FB9E FF05E8715800 inc dword ptr [$005871E8]
0053FBA4 FF4DC0 dec dword ptr [ebp-$40]
0053FBA7 0F858EFAFFFF jnz 0053F63B
0053FBAD FF05E4715800 inc dword ptr [$005871E4]
0053FBB3 FF4DC4 dec dword ptr [ebp-$3C]
0053FBB6 0F8562FAFFFF jnz 0053F61E
0053FBBC FF05E0715800 inc dword ptr [$005871E0]
0053FBC2 FF4DC8 dec dword ptr [ebp-$38]
0053FBC5 0F8536FAFFFF jnz 0053F601
0053FBCB FF05DC715800 inc dword ptr [$005871DC]
0053FBD1 FF4DCC dec dword ptr [ebp-$34]
0053FBD4 0F850AFAFFFF jnz 0053F5E4
0053FBDA 33D2 xor edx, edx
0053FBDC 83C8FF or eax, -$01

* Reference to: Unit_004BD734.Proc_004BD9A4
|
0053FBDF E8C0DDF7FF call 004BD9A4
0053FBE4 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
0053FBE7 8B80F4020000 mov eax, [eax+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
0053FBED 8B8044020000 mov eax, [eax+$0244]
0053FBF3 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.TS1 : TTabSheet
|
0053FBF6 3B82F8020000 cmp eax, [edx+$02F8]
0053FBFC 7569 jnz 0053FC67
0053FBFE 8D9518FCFFFF lea edx, [ebp+$FFFFFC18]
0053FC04 8B45E8 mov eax, [ebp-$18]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0053FC07 E8C8A1ECFF call 00409DD4
0053FC0C 8D8518FCFFFF lea eax, [ebp+$FFFFFC18]

* Possible String Reference to: '注'
|
0053FC12 BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
0053FC17 E8F045ECFF call 0040420C
0053FC1C 8B9518FCFFFF mov edx, [ebp+$FFFFFC18]
0053FC22 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Label8 : TLabel
|
0053FC25 8B8014030000 mov eax, [eax+$0314]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0053FC2B E85C62EFFF call 00435E8C
0053FC30 8D9514FCFFFF lea edx, [ebp+$FFFFFC14]
0053FC36 8B45E8 mov eax, [ebp-$18]
0053FC39 2B45F0 sub eax, dword ptr [ebp-$10]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0053FC3C E893A1ECFF call 00409DD4
0053FC41 8D8514FCFFFF lea eax, [ebp+$FFFFFC14]

* Possible String Reference to: '注'
|
0053FC47 BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
0053FC4C E8BB45ECFF call 0040420C
0053FC51 8B9514FCFFFF mov edx, [ebp+$FFFFFC14]
0053FC57 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Label9 : TLabel
|
0053FC5A 8B8018030000 mov eax, [eax+$0318]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0053FC60 E82762EFFF call 00435E8C
0053FC65 EB6B jmp 0053FCD2
0053FC67 8D9510FCFFFF lea edx, [ebp+$FFFFFC10]
0053FC6D A1D8715800 mov eax, dword ptr [$005871D8]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0053FC72 E85DA1ECFF call 00409DD4
0053FC77 8D8510FCFFFF lea eax, [ebp+$FFFFFC10]

* Possible String Reference to: '注'
|
0053FC7D BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
0053FC82 E88545ECFF call 0040420C
0053FC87 8B9510FCFFFF mov edx, [ebp+$FFFFFC10]
0053FC8D 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Label8 : TLabel
|
0053FC90 8B8014030000 mov eax, [eax+$0314]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0053FC96 E8F161EFFF call 00435E8C
0053FC9B 8D950CFCFFFF lea edx, [ebp+$FFFFFC0C]
0053FCA1 A1D8715800 mov eax, dword ptr [$005871D8]
0053FCA6 2B45F0 sub eax, dword ptr [ebp-$10]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0053FCA9 E826A1ECFF call 00409DD4
0053FCAE 8D850CFCFFFF lea eax, [ebp+$FFFFFC0C]

* Possible String Reference to: '注'
|
0053FCB4 BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
0053FCB9 E84E45ECFF call 0040420C
0053FCBE 8B950CFCFFFF mov edx, [ebp+$FFFFFC0C]
0053FCC4 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Label9 : TLabel
|
0053FCC7 8B8018030000 mov eax, [eax+$0318]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0053FCCD E8BA61EFFF call 00435E8C
0053FCD2 8D9508FCFFFF lea edx, [ebp+$FFFFFC08]
0053FCD8 8B45F0 mov eax, [ebp-$10]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0053FCDB E8F4A0ECFF call 00409DD4
0053FCE0 8D8508FCFFFF lea eax, [ebp+$FFFFFC08]

* Possible String Reference to: '注'
|
0053FCE6 BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
0053FCEB E81C45ECFF call 0040420C
0053FCF0 8B9508FCFFFF mov edx, [ebp+$FFFFFC08]
0053FCF6 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.sumLb : TLabel
|
0053FCF9 8B80A4060000 mov eax, [eax+$06A4]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0053FCFF E88861EFFF call 00435E8C
0053FD04 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
0053FD07 8B80F4020000 mov eax, [eax+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
0053FD0D 8B8044020000 mov eax, [eax+$0244]
0053FD13 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.TS2 : TTabSheet
|
0053FD16 3B82FC020000 cmp eax, [edx+$02FC]
0053FD1C 0F8559050000 jnz 0054027B
0053FD22 8D9504FCFFFF lea edx, [ebp+$FFFFFC04]
0053FD28 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.CB3 : TComboBox
|
0053FD2B 8B8030030000 mov eax, [eax+$0330]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0053FD31 E82661EFFF call 00435E5C
0053FD36 83BD04FCFFFF00 cmp dword ptr [ebp+$FFFFFC04], +$00
0053FD3D 7513 jnz 0053FD52
0053FD3F 33C9 xor ecx, ecx
0053FD41 33D2 xor edx, edx

* Possible String Reference to: '请选择公式'
|
0053FD43 B8A0445400 mov eax, $005444A0

* Reference to: Unit_004BD734.Proc_004BD86C
|
0053FD48 E81FDBF7FF call 004BD86C
0053FD4D E997420000 jmp 00543FE9
0053FD52 8D9500FCFFFF lea edx, [ebp+$FFFFFC00]
0053FD58 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Lbx : TLabel
|
0053FD5B 8B8094060000 mov eax, [eax+$0694]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0053FD61 E8F660EFFF call 00435E5C
0053FD66 FFB500FCFFFF push dword ptr [ebp+$FFFFFC00]
0053FD6C 68B4445400 push $005444B4
0053FD71 8D85FCFBFFFF lea eax, [ebp+$FFFFFBFC]
0053FD77 50 push eax
0053FD78 8D95F8FBFFFF lea edx, [ebp+$FFFFFBF8]
0053FD7E 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.CB3 : TComboBox
|
0053FD81 8B8030030000 mov eax, [eax+$0330]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0053FD87 E8D060EFFF call 00435E5C
0053FD8C 8B85F8FBFFFF mov eax, [ebp+$FFFFFBF8]
0053FD92 B901000000 mov ecx, $00000001
0053FD97 BA03000000 mov edx, $00000003

* Reference to: system.@LStrCopy;
|
0053FD9C E86B46ECFF call 0040440C
0053FDA1 FFB5FCFBFFFF push dword ptr [ebp+$FFFFFBFC]
0053FDA7 68B4445400 push $005444B4
0053FDAC 8D85F4FBFFFF lea eax, [ebp+$FFFFFBF4]
0053FDB2 50 push eax
0053FDB3 8D95F0FBFFFF lea edx, [ebp+$FFFFFBF0]
0053FDB9 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.CB3 : TComboBox
|
0053FDBC 8B8030030000 mov eax, [eax+$0330]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0053FDC2 E89560EFFF call 00435E5C
0053FDC7 8B85F0FBFFFF mov eax, [ebp+$FFFFFBF0]
0053FDCD B901000000 mov ecx, $00000001
0053FDD2 BA06000000 mov edx, $00000006

* Reference to: system.@LStrCopy;
|
0053FDD7 E83046ECFF call 0040440C
0053FDDC FFB5F4FBFFFF push dword ptr [ebp+$FFFFFBF4]
0053FDE2 B8F8715800 mov eax, $005871F8
0053FDE7 BA05000000 mov edx, $00000005

* Reference to: system.@LStrCatN;
|
0053FDEC E8D344ECFF call 004042C4
0053FDF1 8D95E8FBFFFF lea edx, [ebp+$FFFFFBE8]

* Reference to TApplication instance
|
0053FDF7 A1CC565800 mov eax, dword ptr [$005856CC]
0053FDFC 8B00 mov eax, [eax]

* Reference to: forms.TApplication.GetExeName(TApplication):AnsiString;
|
0053FDFE E8A951F1FF call 00454FAC
0053FE03 8B85E8FBFFFF mov eax, [ebp+$FFFFFBE8]
0053FE09 8D95ECFBFFFF lea edx, [ebp+$FFFFFBEC]

* Reference to: Unit_00408BD4.Proc_0040A240
|
0053FE0F E82CA4ECFF call 0040A240
0053FE14 FFB5ECFBFFFF push dword ptr [ebp+$FFFFFBEC]

* Possible String Reference to: 'Formula/'
|
0053FE1A 68C0445400 push $005444C0
0053FE1F FF35F8715800 push dword ptr [$005871F8]

* Possible String Reference to: '.txt'
|
0053FE25 68D4445400 push $005444D4
0053FE2A B8FC715800 mov eax, $005871FC
0053FE2F BA04000000 mov edx, $00000004

* Reference to: system.@LStrCatN;
|
0053FE34 E88B44ECFF call 004042C4
0053FE39 A1FC715800 mov eax, dword ptr [$005871FC]

* Reference to: Unit_00408BD4.Proc_0040A010
|
0053FE3E E8CDA1ECFF call 0040A010
0053FE43 84C0 test al, al
0053FE45 7513 jnz 0053FE5A
0053FE47 33C9 xor ecx, ecx
0053FE49 33D2 xor edx, edx

* Possible String Reference to: '已选号码个数超出范围'
|
0053FE4B B8E4445400 mov eax, $005444E4

* Reference to: Unit_004BD734.Proc_004BD86C
|
0053FE50 E817DAF7FF call 004BD86C
0053FE55 E98F410000 jmp 00543FE9
0053FE5A C745F001000000 mov dword ptr [ebp-$10], $00000001
0053FE61 A178715800 mov eax, dword ptr [$00587178]
0053FE66 85C0 test eax, eax
0053FE68 7E32 jle 0053FE9C
0053FE6A 8945CC mov [ebp-$34], eax
0053FE6D C745B0B47C5800 mov dword ptr [ebp-$50], $00587CB4
0053FE74 8B45B0 mov eax, [ebp-$50]
0053FE77 833800 cmp dword ptr [eax], +$00
0053FE7A 7417 jz 0053FE93
0053FE7C 8B45F0 mov eax, [ebp-$10]
0053FE7F 8D048508725800 lea eax, [$587208+eax*4]
0053FE86 8B55B0 mov edx, [ebp-$50]
0053FE89 8B12 mov edx, [edx]

* Reference to: system.@LStrAsg;
|
0053FE8B E84841ECFF call 00403FD8
0053FE90 FF45F0 inc dword ptr [ebp-$10]
0053FE93 8345B004 add dword ptr [ebp-$50], +$04
0053FE97 FF4DCC dec dword ptr [ebp-$34]
0053FE9A 75D8 jnz 0053FE74
0053FE9C 8B15FC715800 mov edx, [$005871FC]
0053FEA2 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@Assign(Text;Text;ShortString);
|
0053FEA8 E8056BECFF call 004069B2
0053FEAD 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: System.Proc_00406E8B
|
0053FEB3 E8D36FECFF call 00406E8B

* Reference to: System.Proc_004028A8
|
0053FEB8 E8EB29ECFF call 004028A8
0053FEBD 33C0 xor eax, eax
0053FEBF 8945F0 mov [ebp-$10], eax
0053FEC2 33C0 xor eax, eax
0053FEC4 8945F4 mov [ebp-$0C], eax

* Reference to TScreen instance
|
0053FEC7 A1D4595800 mov eax, dword ptr [$005859D4]
0053FECC 8B00 mov eax, [eax]
0053FECE 66BAF5FF mov dx, $FFF5

* Reference to: forms.TScreen.SetCursor(TScreen;TCursor);
|
0053FED2 E8E92EF1FF call 00452DC0
0053FED7 E9CA020000 jmp 005401A6
0053FEDC 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
0053FEE2 E8516EECFF call 00406D38

* Reference to GlobalVar_005871DC
|
0053FEE7 A3DC715800 mov dword ptr [$005871DC], eax
0053FEEC 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
0053FEF2 E8416EECFF call 00406D38

* Reference to GlobalVar_005871E0
|
0053FEF7 A3E0715800 mov dword ptr [$005871E0], eax
0053FEFC 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
0053FF02 E8316EECFF call 00406D38

* Reference to GlobalVar_005871E4
|
0053FF07 A3E4715800 mov dword ptr [$005871E4], eax
0053FF0C 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
0053FF12 E8216EECFF call 00406D38

* Reference to GlobalVar_005871E8
|
0053FF17 A3E8715800 mov dword ptr [$005871E8], eax
0053FF1C 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
0053FF22 E8116EECFF call 00406D38

* Reference to GlobalVar_005871EC
|
0053FF27 A3EC715800 mov dword ptr [$005871EC], eax
0053FF2C 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
0053FF32 E8016EECFF call 00406D38

* Reference to GlobalVar_005871F0
|
0053FF37 A3F0715800 mov dword ptr [$005871F0], eax
0053FF3C 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
0053FF42 E8F16DECFF call 00406D38

* Reference to GlobalVar_005871F4
|
0053FF47 A3F4715800 mov dword ptr [$005871F4], eax
0053FF4C 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLn;
|
0053FF52 E8D16EECFF call 00406E28

* Reference to: System.Proc_004028A8
|
0053FF57 E84C29ECFF call 004028A8
0053FF5C FF45F0 inc dword ptr [ebp-$10]
0053FF5F 803D0A72580074 cmp byte ptr [$0058720A], $74
0053FF66 0F85C0000000 jnz 0054002C
0053FF6C A1DC715800 mov eax, dword ptr [$005871DC]
0053FF71 FF348508725800 push dword ptr [$587208+eax*4]
0053FF78 6888445400 push $00544488
0053FF7D A1E0715800 mov eax, dword ptr [$005871E0]
0053FF82 FF348508725800 push dword ptr [$587208+eax*4]
0053FF89 6888445400 push $00544488
0053FF8E A1E4715800 mov eax, dword ptr [$005871E4]
0053FF93 FF348508725800 push dword ptr [$587208+eax*4]
0053FF9A 6888445400 push $00544488
0053FF9F A1E8715800 mov eax, dword ptr [$005871E8]
0053FFA4 FF348508725800 push dword ptr [$587208+eax*4]
0053FFAB 6888445400 push $00544488
0053FFB0 A1EC715800 mov eax, dword ptr [$005871EC]
0053FFB5 FF348508725800 push dword ptr [$587208+eax*4]
0053FFBC 6888445400 push $00544488
0053FFC1 A1F0715800 mov eax, dword ptr [$005871F0]
0053FFC6 FF348508725800 push dword ptr [$587208+eax*4]
0053FFCD 6888445400 push $00544488
0053FFD2 A1F4715800 mov eax, dword ptr [$005871F4]
0053FFD7 FF348508725800 push dword ptr [$587208+eax*4]
0053FFDE 8D45DC lea eax, [ebp-$24]
0053FFE1 BA0D000000 mov edx, $0000000D

* Reference to: system.@LStrCatN;
|
0053FFE6 E8D942ECFF call 004042C4
0053FFEB 8D8554FCFFFF lea eax, [ebp+$FFFFFC54]
0053FFF1 8B55DC mov edx, [ebp-$24]
0053FFF4 B9FF000000 mov ecx, $000000FF

* Reference to: system.@LStrToString;
|
0053FFF9 E8E241ECFF call 004041E0
0053FFFE 8D9554FCFFFF lea edx, [ebp+$FFFFFC54]
00540004 B83CBA5800 mov eax, $0058BA3C
00540009 B114 mov cl, $14

* Reference to: system.@PStrNCpy;
|
0054000B E8D42CECFF call 00402CE4
00540010 FF45F4 inc dword ptr [ebp-$0C]
00540013 BA3CBA5800 mov edx, $0058BA3C
00540018 B854BA5800 mov eax, $0058BA54

* Reference to: system.@WriteRec;
|
0054001D E80A70ECFF call 0040702C

* Reference to: System.Proc_004028A8
|
00540022 E88128ECFF call 004028A8
00540027 E97A010000 jmp 005401A6
0054002C A1DC715800 mov eax, dword ptr [$005871DC]
00540031 8B048508725800 mov eax, [$587208+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540038 E8C79DECFF call 00409E04

* Reference to GlobalVar_005872A0
|
0054003D A3A0725800 mov dword ptr [$005872A0], eax
00540042 A1E0715800 mov eax, dword ptr [$005871E0]
00540047 8B048508725800 mov eax, [$587208+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0054004E E8B19DECFF call 00409E04

* Reference to GlobalVar_005872A4
|
00540053 A3A4725800 mov dword ptr [$005872A4], eax
00540058 A1E4715800 mov eax, dword ptr [$005871E4]
0054005D 8B048508725800 mov eax, [$587208+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540064 E89B9DECFF call 00409E04

* Reference to GlobalVar_005872A8
|
00540069 A3A8725800 mov dword ptr [$005872A8], eax
0054006E A1E8715800 mov eax, dword ptr [$005871E8]
00540073 8B048508725800 mov eax, [$587208+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0054007A E8859DECFF call 00409E04

* Reference to GlobalVar_005872AC
|
0054007F A3AC725800 mov dword ptr [$005872AC], eax
00540084 A1EC715800 mov eax, dword ptr [$005871EC]
00540089 8B048508725800 mov eax, [$587208+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540090 E86F9DECFF call 00409E04

* Reference to GlobalVar_005872B0
|
00540095 A3B0725800 mov dword ptr [$005872B0], eax
0054009A A1F0715800 mov eax, dword ptr [$005871F0]
0054009F 8B048508725800 mov eax, [$587208+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005400A6 E8599DECFF call 00409E04

* Reference to GlobalVar_005872B4
|
005400AB A3B4725800 mov dword ptr [$005872B4], eax
005400B0 A1F4715800 mov eax, dword ptr [$005871F4]
005400B5 8B048508725800 mov eax, [$587208+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005400BC E8439DECFF call 00409E04

* Reference to GlobalVar_005872B8
|
005400C1 A3B8725800 mov dword ptr [$005872B8], eax
005400C6 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.btfilter : TButton
|
005400C9 8B9828090000 mov ebx, [eax+$0928]
005400CF 8B55F8 mov edx, [ebp-$08]

* Reference to field TButton.OFFS_010C
|
005400D2 8B830C010000 mov eax, [ebx+$010C]

* Possible reference to virtual method TButton.OFFS_0108
|
005400D8 FF9308010000 call dword ptr [ebx+$0108]
005400DE 803D0972580074 cmp byte ptr [$00587209], $74
005400E5 0F85BB000000 jnz 005401A6
005400EB A1DC715800 mov eax, dword ptr [$005871DC]
005400F0 FF348508725800 push dword ptr [$587208+eax*4]
005400F7 6888445400 push $00544488
005400FC A1E0715800 mov eax, dword ptr [$005871E0]
00540101 FF348508725800 push dword ptr [$587208+eax*4]
00540108 6888445400 push $00544488
0054010D A1E4715800 mov eax, dword ptr [$005871E4]
00540112 FF348508725800 push dword ptr [$587208+eax*4]
00540119 6888445400 push $00544488
0054011E A1E8715800 mov eax, dword ptr [$005871E8]
00540123 FF348508725800 push dword ptr [$587208+eax*4]
0054012A 6888445400 push $00544488
0054012F A1EC715800 mov eax, dword ptr [$005871EC]
00540134 FF348508725800 push dword ptr [$587208+eax*4]
0054013B 6888445400 push $00544488
00540140 A1F0715800 mov eax, dword ptr [$005871F0]
00540145 FF348508725800 push dword ptr [$587208+eax*4]
0054014C 6888445400 push $00544488
00540151 A1F4715800 mov eax, dword ptr [$005871F4]
00540156 FF348508725800 push dword ptr [$587208+eax*4]
0054015D 8D45DC lea eax, [ebp-$24]
00540160 BA0D000000 mov edx, $0000000D

* Reference to: system.@LStrCatN;
|
00540165 E85A41ECFF call 004042C4
0054016A 8D8554FCFFFF lea eax, [ebp+$FFFFFC54]
00540170 8B55DC mov edx, [ebp-$24]
00540173 B9FF000000 mov ecx, $000000FF

* Reference to: system.@LStrToString;
|
00540178 E86340ECFF call 004041E0
0054017D 8D9554FCFFFF lea edx, [ebp+$FFFFFC54]
00540183 B83CBA5800 mov eax, $0058BA3C
00540188 B114 mov cl, $14

* Reference to: system.@PStrNCpy;
|
0054018A E8552BECFF call 00402CE4
0054018F BA3CBA5800 mov edx, $0058BA3C
00540194 B854BA5800 mov eax, $0058BA54

* Reference to: system.@WriteRec;
|
00540199 E88E6EECFF call 0040702C

* Reference to: System.Proc_004028A8
|
0054019E E80527ECFF call 004028A8
005401A3 FF45F4 inc dword ptr [ebp-$0C]
005401A6 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@EofText;
|
005401AC E83369ECFF call 00406AE4

* Reference to: System.Proc_004028A8
|
005401B1 E8F226ECFF call 004028A8
005401B6 84C0 test al, al
005401B8 0F841EFDFFFF jz 0053FEDC

* Reference to TScreen instance
|
005401BE A1D4595800 mov eax, dword ptr [$005859D4]
005401C3 8B00 mov eax, [eax]
005401C5 33D2 xor edx, edx

* Reference to: forms.TScreen.SetCursor(TScreen;TCursor);
|
005401C7 E8F42BF1FF call 00452DC0
005401CC 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@Close;
|
005401D2 E87D68ECFF call 00406A54

* Reference to: System.Proc_004028A8
|
005401D7 E8CC26ECFF call 004028A8
005401DC 8D95E4FBFFFF lea edx, [ebp+$FFFFFBE4]
005401E2 8B45F0 mov eax, [ebp-$10]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
005401E5 E8EA9BECFF call 00409DD4
005401EA 8D85E4FBFFFF lea eax, [ebp+$FFFFFBE4]

* Possible String Reference to: '注'
|
005401F0 BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
005401F5 E81240ECFF call 0040420C
005401FA 8B95E4FBFFFF mov edx, [ebp+$FFFFFBE4]
00540200 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Label8 : TLabel
|
00540203 8B8014030000 mov eax, [eax+$0314]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
00540209 E87E5CEFFF call 00435E8C
0054020E 8D95E0FBFFFF lea edx, [ebp+$FFFFFBE0]
00540214 8B45F0 mov eax, [ebp-$10]
00540217 2B45F4 sub eax, dword ptr [ebp-$0C]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0054021A E8B59BECFF call 00409DD4
0054021F 8D85E0FBFFFF lea eax, [ebp+$FFFFFBE0]

* Possible String Reference to: '注'
|
00540225 BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
0054022A E8DD3FECFF call 0040420C
0054022F 8B95E0FBFFFF mov edx, [ebp+$FFFFFBE0]
00540235 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Label9 : TLabel
|
00540238 8B8018030000 mov eax, [eax+$0318]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0054023E E8495CEFFF call 00435E8C
00540243 8D95DCFBFFFF lea edx, [ebp+$FFFFFBDC]
00540249 8B45F4 mov eax, [ebp-$0C]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0054024C E8839BECFF call 00409DD4
00540251 8D85DCFBFFFF lea eax, [ebp+$FFFFFBDC]

* Possible String Reference to: '注'
|
00540257 BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
0054025C E8AB3FECFF call 0040420C
00540261 8B95DCFBFFFF mov edx, [ebp+$FFFFFBDC]
00540267 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.sumLb : TLabel
|
0054026A 8B80A4060000 mov eax, [eax+$06A4]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
00540270 E8175CEFFF call 00435E8C
00540275 8B45F4 mov eax, [ebp-$0C]
00540278 8945F0 mov [ebp-$10], eax
0054027B 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
0054027E 8B80F4020000 mov eax, [eax+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
00540284 8B8044020000 mov eax, [eax+$0244]
0054028A 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.TS10 : TTabSheet
|
0054028D 3B82F4070000 cmp eax, [edx+$07F4]
00540293 0F85590E0000 jnz 005410F2
00540299 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.RBjd1 : TRadioButton
|
0054029C 8B80C8080000 mov eax, [eax+$08C8]
005402A2 8B10 mov edx, [eax]

* Reference to method TRadioButton.GetChecked()
|
005402A4 FF92B4000000 call dword ptr [edx+$00B4]
005402AA 84C0 test al, al
005402AC 0F8405010000 jz 005403B7
005402B2 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Edjd2 : TEdit
|
005402B5 8B80DC080000 mov eax, [eax+$08DC]
005402BB 33D2 xor edx, edx

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
005402BD E8CA5BEFFF call 00435E8C
005402C2 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Edjd3 : TEdit
|
005402C5 8B80E0080000 mov eax, [eax+$08E0]
005402CB 33D2 xor edx, edx

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
005402CD E8BA5BEFFF call 00435E8C
005402D2 33C0 xor eax, eax
005402D4 55 push ebp
005402D5 6809035400 push $00540309

***** TRY
|
005402DA 64FF30 push dword ptr fs:[eax]
005402DD 648920 mov fs:[eax], esp
005402E0 8D95D8FBFFFF lea edx, [ebp+$FFFFFBD8]
005402E6 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Edjd1 : TEdit
|
005402E9 8B80C4080000 mov eax, [eax+$08C4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005402EF E8685BEFFF call 00435E5C
005402F4 8B85D8FBFFFF mov eax, [ebp+$FFFFFBD8]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005402FA E8059BECFF call 00409E04
005402FF 33C0 xor eax, eax
00540301 5A pop edx
00540302 59 pop ecx
00540303 59 pop ecx
00540304 648910 mov fs:[eax], edx
00540307 EB22 jmp 0054032B

* Reference to: system.@HandleAnyException;
|
00540309 E9D633ECFF jmp 004036E4
0054030E 33C9 xor ecx, ecx
00540310 33D2 xor edx, edx

* Possible String Reference to: '胆码输入有误'
|
00540312 B804455400 mov eax, $00544504

* Reference to: Unit_004BD734.Proc_004BD86C
|
00540317 E850D5F7FF call 004BD86C

* Reference to: system.@DoneExcept;
|
0054031C E81F37ECFF call 00403A40
00540321 E9C33C0000 jmp 00543FE9

* Reference to: system.@DoneExcept;
|
00540326 E81537ECFF call 00403A40

****** END
|
0054032B 8D95D4FBFFFF lea edx, [ebp+$FFFFFBD4]
00540331 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Edjd1 : TEdit
|
00540334 8B80C4080000 mov eax, [eax+$08C4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054033A E81D5BEFFF call 00435E5C
0054033F 8B85D4FBFFFF mov eax, [ebp+$FFFFFBD4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540345 E8BA9AECFF call 00409E04

* Reference to GlobalVar_005871DC
|
0054034A A3DC715800 mov dword ptr [$005871DC], eax
0054034F 833DDC71580001 cmp dword ptr [$005871DC], +$01
00540356 7C0D jl 00540365
00540358 A1DC715800 mov eax, dword ptr [$005871DC]
0054035D 3B0578715800 cmp eax, [$00587178]
00540363 7E13 jle 00540378
00540365 33C9 xor ecx, ecx
00540367 33D2 xor edx, edx

* Possible String Reference to: '胆码输入有误'
|
00540369 B804455400 mov eax, $00544504

* Reference to: Unit_004BD734.Proc_004BD86C
|
0054036E E8F9D4F7FF call 004BD86C
00540373 E9713C0000 jmp 00543FE9
00540378 A1DC715800 mov eax, dword ptr [$005871DC]
0054037D 833C85447D580000 cmp dword ptr [$587D44+eax*4], +$00
00540385 7430 jz 005403B7
00540387 A1DC715800 mov eax, dword ptr [$005871DC]
0054038C 8B0C85447D5800 mov ecx, [$587D44+eax*4]
00540393 8D85D0FBFFFF lea eax, [ebp+$FFFFFBD0]

* Possible String Reference to: '胆码与拖码重复:'
|
00540399 BA1C455400 mov edx, $0054451C

* Reference to: system.@LStrCat3;
|
0054039E E8AD3EECFF call 00404250
005403A3 8B85D0FBFFFF mov eax, [ebp+$FFFFFBD0]
005403A9 33C9 xor ecx, ecx
005403AB 33D2 xor edx, edx

* Reference to: Unit_004BD734.Proc_004BD86C
|
005403AD E8BAD4F7FF call 004BD86C
005403B2 E9323C0000 jmp 00543FE9
005403B7 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.RBjd2 : TRadioButton
|
005403BA 8B80CC080000 mov eax, [eax+$08CC]
005403C0 8B10 mov edx, [eax]

* Reference to method TRadioButton.GetChecked()
|
005403C2 FF92B4000000 call dword ptr [edx+$00B4]
005403C8 84C0 test al, al
005403CA 0F841E010000 jz 005404EE
005403D0 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Edjd3 : TEdit
|
005403D3 8B80E0080000 mov eax, [eax+$08E0]
005403D9 33D2 xor edx, edx

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
005403DB E8AC5AEFFF call 00435E8C
005403E0 33C0 xor eax, eax
005403E2 55 push ebp
005403E3 6836045400 push $00540436

***** TRY
|
005403E8 64FF30 push dword ptr fs:[eax]
005403EB 648920 mov fs:[eax], esp
005403EE 8D95CCFBFFFF lea edx, [ebp+$FFFFFBCC]
005403F4 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Edjd1 : TEdit
|
005403F7 8B80C4080000 mov eax, [eax+$08C4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005403FD E85A5AEFFF call 00435E5C
00540402 8B85CCFBFFFF mov eax, [ebp+$FFFFFBCC]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540408 E8F799ECFF call 00409E04
0054040D 8D95C8FBFFFF lea edx, [ebp+$FFFFFBC8]
00540413 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Edjd2 : TEdit
|
00540416 8B80DC080000 mov eax, [eax+$08DC]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054041C E83B5AEFFF call 00435E5C
00540421 8B85C8FBFFFF mov eax, [ebp+$FFFFFBC8]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540427 E8D899ECFF call 00409E04
0054042C 33C0 xor eax, eax
0054042E 5A pop edx
0054042F 59 pop ecx
00540430 59 pop ecx
00540431 648910 mov fs:[eax], edx
00540434 EB22 jmp 00540458

* Reference to: system.@HandleAnyException;
|
00540436 E9A932ECFF jmp 004036E4
0054043B 33C9 xor ecx, ecx
0054043D 33D2 xor edx, edx

* Possible String Reference to: '胆码输入有误'
|
0054043F B804455400 mov eax, $00544504

* Reference to: Unit_004BD734.Proc_004BD86C
|
00540444 E823D4F7FF call 004BD86C

* Reference to: system.@DoneExcept;
|
00540449 E8F235ECFF call 00403A40
0054044E E9963B0000 jmp 00543FE9

* Reference to: system.@DoneExcept;
|
00540453 E8E835ECFF call 00403A40

****** END
|
00540458 8D95C4FBFFFF lea edx, [ebp+$FFFFFBC4]
0054045E 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Edjd1 : TEdit
|
00540461 8B80C4080000 mov eax, [eax+$08C4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00540467 E8F059EFFF call 00435E5C
0054046C 8B85C4FBFFFF mov eax, [ebp+$FFFFFBC4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540472 E88D99ECFF call 00409E04

* Reference to GlobalVar_005871DC
|
00540477 A3DC715800 mov dword ptr [$005871DC], eax
0054047C 8D95C0FBFFFF lea edx, [ebp+$FFFFFBC0]
00540482 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Edjd2 : TEdit
|
00540485 8B80DC080000 mov eax, [eax+$08DC]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054048B E8CC59EFFF call 00435E5C
00540490 8B85C0FBFFFF mov eax, [ebp+$FFFFFBC0]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540496 E86999ECFF call 00409E04

* Reference to GlobalVar_005871E0
|
0054049B A3E0715800 mov dword ptr [$005871E0], eax
005404A0 A1DC715800 mov eax, dword ptr [$005871DC]
005404A5 833C85447D580000 cmp dword ptr [$587D44+eax*4], +$00
005404AD 750F jnz 005404BE
005404AF A1E0715800 mov eax, dword ptr [$005871E0]
005404B4 833C85447D580000 cmp dword ptr [$587D44+eax*4], +$00
005404BC 7430 jz 005404EE
005404BE A1DC715800 mov eax, dword ptr [$005871DC]
005404C3 8B0C85447D5800 mov ecx, [$587D44+eax*4]
005404CA 8D85BCFBFFFF lea eax, [ebp+$FFFFFBBC]

* Possible String Reference to: '胆码与拖码重复'
|
005404D0 BA34455400 mov edx, $00544534

* Reference to: system.@LStrCat3;
|
005404D5 E8763DECFF call 00404250
005404DA 8B85BCFBFFFF mov eax, [ebp+$FFFFFBBC]
005404E0 33C9 xor ecx, ecx
005404E2 33D2 xor edx, edx

* Reference to: Unit_004BD734.Proc_004BD86C
|
005404E4 E883D3F7FF call 004BD86C
005404E9 E9FB3A0000 jmp 00543FE9
005404EE 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.RBjd3 : TRadioButton
|
005404F1 8B80D0080000 mov eax, [eax+$08D0]
005404F7 8B10 mov edx, [eax]

* Reference to method TRadioButton.GetChecked()
|
005404F9 FF92B4000000 call dword ptr [edx+$00B4]
005404FF 84C0 test al, al
00540501 0F8460010000 jz 00540667
00540507 33C0 xor eax, eax
00540509 55 push ebp
0054050A 687C055400 push $0054057C

***** TRY
|
0054050F 64FF30 push dword ptr fs:[eax]
00540512 648920 mov fs:[eax], esp
00540515 8D95B8FBFFFF lea edx, [ebp+$FFFFFBB8]
0054051B 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Edjd1 : TEdit
|
0054051E 8B80C4080000 mov eax, [eax+$08C4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00540524 E83359EFFF call 00435E5C
00540529 8B85B8FBFFFF mov eax, [ebp+$FFFFFBB8]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0054052F E8D098ECFF call 00409E04
00540534 8D95B4FBFFFF lea edx, [ebp+$FFFFFBB4]
0054053A 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Edjd2 : TEdit
|
0054053D 8B80DC080000 mov eax, [eax+$08DC]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00540543 E81459EFFF call 00435E5C
00540548 8B85B4FBFFFF mov eax, [ebp+$FFFFFBB4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0054054E E8B198ECFF call 00409E04
00540553 8D95B0FBFFFF lea edx, [ebp+$FFFFFBB0]
00540559 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Edjd3 : TEdit
|
0054055C 8B80E0080000 mov eax, [eax+$08E0]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00540562 E8F558EFFF call 00435E5C
00540567 8B85B0FBFFFF mov eax, [ebp+$FFFFFBB0]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0054056D E89298ECFF call 00409E04
00540572 33C0 xor eax, eax
00540574 5A pop edx
00540575 59 pop ecx
00540576 59 pop ecx
00540577 648910 mov fs:[eax], edx
0054057A EB22 jmp 0054059E

* Reference to: system.@HandleAnyException;
|
0054057C E96331ECFF jmp 004036E4
00540581 33C9 xor ecx, ecx
00540583 33D2 xor edx, edx

* Possible String Reference to: '胆码输入有误'
|
00540585 B804455400 mov eax, $00544504

* Reference to: Unit_004BD734.Proc_004BD86C
|
0054058A E8DDD2F7FF call 004BD86C

* Reference to: system.@DoneExcept;
|
0054058F E8AC34ECFF call 00403A40
00540594 E9503A0000 jmp 00543FE9

* Reference to: system.@DoneExcept;
|
00540599 E8A234ECFF call 00403A40

****** END
|
0054059E 8D95ACFBFFFF lea edx, [ebp+$FFFFFBAC]
005405A4 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Edjd1 : TEdit
|
005405A7 8B80C4080000 mov eax, [eax+$08C4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005405AD E8AA58EFFF call 00435E5C
005405B2 8B85ACFBFFFF mov eax, [ebp+$FFFFFBAC]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005405B8 E84798ECFF call 00409E04

* Reference to GlobalVar_005871DC
|
005405BD A3DC715800 mov dword ptr [$005871DC], eax
005405C2 8D95A8FBFFFF lea edx, [ebp+$FFFFFBA8]
005405C8 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Edjd2 : TEdit
|
005405CB 8B80DC080000 mov eax, [eax+$08DC]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005405D1 E88658EFFF call 00435E5C
005405D6 8B85A8FBFFFF mov eax, [ebp+$FFFFFBA8]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005405DC E82398ECFF call 00409E04

* Reference to GlobalVar_005871E0
|
005405E1 A3E0715800 mov dword ptr [$005871E0], eax
005405E6 8D95A4FBFFFF lea edx, [ebp+$FFFFFBA4]
005405EC 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Edjd3 : TEdit
|
005405EF 8B80E0080000 mov eax, [eax+$08E0]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005405F5 E86258EFFF call 00435E5C
005405FA 8B85A4FBFFFF mov eax, [ebp+$FFFFFBA4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540600 E8FF97ECFF call 00409E04

* Reference to GlobalVar_005871E4
|
00540605 A3E4715800 mov dword ptr [$005871E4], eax
0054060A A1DC715800 mov eax, dword ptr [$005871DC]
0054060F 833C85447D580000 cmp dword ptr [$587D44+eax*4], +$00
00540617 751E jnz 00540637
00540619 A1E0715800 mov eax, dword ptr [$005871E0]
0054061E 833C85447D580000 cmp dword ptr [$587D44+eax*4], +$00
00540626 750F jnz 00540637
00540628 A1E4715800 mov eax, dword ptr [$005871E4]
0054062D 833C85447D580000 cmp dword ptr [$587D44+eax*4], +$00
00540635 7430 jz 00540667
00540637 A1DC715800 mov eax, dword ptr [$005871DC]
0054063C 8B0C85447D5800 mov ecx, [$587D44+eax*4]
00540643 8D85A0FBFFFF lea eax, [ebp+$FFFFFBA0]

* Possible String Reference to: '胆码与拖码重复'
|
00540649 BA34455400 mov edx, $00544534

* Reference to: system.@LStrCat3;
|
0054064E E8FD3BECFF call 00404250
00540653 8B85A0FBFFFF mov eax, [ebp+$FFFFFBA0]
00540659 33C9 xor ecx, ecx
0054065B 33D2 xor edx, edx

* Reference to: Unit_004BD734.Proc_004BD86C
|
0054065D E80AD2F7FF call 004BD86C
00540662 E982390000 jmp 00543FE9
00540667 8D959CFBFFFF lea edx, [ebp+$FFFFFB9C]
0054066D 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.CB4 : TComboBox
|
00540670 8B8014080000 mov eax, [eax+$0814]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00540676 E8E157EFFF call 00435E5C
0054067B 83BD9CFBFFFF00 cmp dword ptr [ebp+$FFFFFB9C], +$00
00540682 7513 jnz 00540697
00540684 33C9 xor ecx, ecx
00540686 33D2 xor edx, edx

* Possible String Reference to: '请选择公式'
|
00540688 B8A0445400 mov eax, $005444A0

* Reference to: Unit_004BD734.Proc_004BD86C
|
0054068D E8DAD1F7FF call 004BD86C
00540692 E952390000 jmp 00543FE9
00540697 8D8598FBFFFF lea eax, [ebp+$FFFFFB98]
0054069D 50 push eax
0054069E 8D9594FBFFFF lea edx, [ebp+$FFFFFB94]
005406A4 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.CB4 : TComboBox
|
005406A7 8B8014080000 mov eax, [eax+$0814]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005406AD E8AA57EFFF call 00435E5C
005406B2 8B8594FBFFFF mov eax, [ebp+$FFFFFB94]
005406B8 B901000000 mov ecx, $00000001
005406BD BA03000000 mov edx, $00000003

* Reference to: system.@LStrCopy;
|
005406C2 E8453DECFF call 0040440C
005406C7 8B8598FBFFFF mov eax, [ebp+$FFFFFB98]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005406CD E83297ECFF call 00409E04
005406D2 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.Lbjd : TLabel
|
005406D5 8B9208080000 mov edx, [edx+$0808]
005406DB 2B420C sub eax, dword ptr [edx+$0C]

* Reference to GlobalVar_005871B4
|
005406DE A3B4715800 mov dword ptr [$005871B4], eax
005406E3 8D8590FBFFFF lea eax, [ebp+$FFFFFB90]
005406E9 50 push eax
005406EA 8D958CFBFFFF lea edx, [ebp+$FFFFFB8C]
005406F0 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.CB4 : TComboBox
|
005406F3 8B8014080000 mov eax, [eax+$0814]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005406F9 E85E57EFFF call 00435E5C
005406FE 8B858CFBFFFF mov eax, [ebp+$FFFFFB8C]
00540704 B901000000 mov ecx, $00000001
00540709 BA06000000 mov edx, $00000006

* Reference to: system.@LStrCopy;
|
0054070E E8F93CECFF call 0040440C
00540713 8B8590FBFFFF mov eax, [ebp+$FFFFFB90]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540719 E8E696ECFF call 00409E04
0054071E 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.Lbjd : TLabel
|
00540721 8B9208080000 mov edx, [edx+$0808]
00540727 2B420C sub eax, dword ptr [edx+$0C]

* Reference to GlobalVar_005871B8
|
0054072A A3B8715800 mov dword ptr [$005871B8], eax
0054072F 8D9588FBFFFF lea edx, [ebp+$FFFFFB88]
00540735 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Lbdx : TLabel
|
00540738 8B8004080000 mov eax, [eax+$0804]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054073E E81957EFFF call 00435E5C
00540743 8B8588FBFFFF mov eax, [ebp+$FFFFFB88]

* Reference to: system.@LStrLen:Integer;
| or: system.@DynArrayLength;
| or: system.DynArraySize(Pointer):Integer;
|
00540749 E8B63AECFF call 00404204
0054074E 83F802 cmp eax, +$02
00540751 7466 jz 005407B9
00540753 687C445400 push $0054447C
00540758 8D9584FBFFFF lea edx, [ebp+$FFFFFB84]
0054075E 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Lbdx : TLabel
|
00540761 8B8004080000 mov eax, [eax+$0804]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00540767 E8F056EFFF call 00435E5C
0054076C FFB584FBFFFF push dword ptr [ebp+$FFFFFB84]
00540772 68B4445400 push $005444B4
00540777 8D9580FBFFFF lea edx, [ebp+$FFFFFB80]
0054077D A1B4715800 mov eax, dword ptr [$005871B4]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00540782 E84D96ECFF call 00409DD4
00540787 FFB580FBFFFF push dword ptr [ebp+$FFFFFB80]
0054078D 68B4445400 push $005444B4
00540792 8D957CFBFFFF lea edx, [ebp+$FFFFFB7C]
00540798 A1B8715800 mov eax, dword ptr [$005871B8]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0054079D E83296ECFF call 00409DD4
005407A2 FFB57CFBFFFF push dword ptr [ebp+$FFFFFB7C]
005407A8 B8F8715800 mov eax, $005871F8
005407AD BA06000000 mov edx, $00000006

* Reference to: system.@LStrCatN;
|
005407B2 E80D3BECFF call 004042C4
005407B7 EB5F jmp 00540818
005407B9 8D9578FBFFFF lea edx, [ebp+$FFFFFB78]
005407BF 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Lbdx : TLabel
|
005407C2 8B8004080000 mov eax, [eax+$0804]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005407C8 E88F56EFFF call 00435E5C
005407CD FFB578FBFFFF push dword ptr [ebp+$FFFFFB78]
005407D3 68B4445400 push $005444B4
005407D8 8D9574FBFFFF lea edx, [ebp+$FFFFFB74]
005407DE A1B4715800 mov eax, dword ptr [$005871B4]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
005407E3 E8EC95ECFF call 00409DD4
005407E8 FFB574FBFFFF push dword ptr [ebp+$FFFFFB74]
005407EE 68B4445400 push $005444B4
005407F3 8D9570FBFFFF lea edx, [ebp+$FFFFFB70]
005407F9 A1B8715800 mov eax, dword ptr [$005871B8]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
005407FE E8D195ECFF call 00409DD4
00540803 FFB570FBFFFF push dword ptr [ebp+$FFFFFB70]
00540809 B8F8715800 mov eax, $005871F8
0054080E BA05000000 mov edx, $00000005

* Reference to: system.@LStrCatN;
|
00540813 E8AC3AECFF call 004042C4
00540818 8D9568FBFFFF lea edx, [ebp+$FFFFFB68]

* Reference to TApplication instance
|
0054081E A1CC565800 mov eax, dword ptr [$005856CC]
00540823 8B00 mov eax, [eax]

* Reference to: forms.TApplication.GetExeName(TApplication):AnsiString;
|
00540825 E88247F1FF call 00454FAC
0054082A 8B8568FBFFFF mov eax, [ebp+$FFFFFB68]
00540830 8D956CFBFFFF lea edx, [ebp+$FFFFFB6C]

* Reference to: Unit_00408BD4.Proc_0040A240
|
00540836 E8059AECFF call 0040A240
0054083B FFB56CFBFFFF push dword ptr [ebp+$FFFFFB6C]

* Possible String Reference to: 'Formula/'
|
00540841 68C0445400 push $005444C0
00540846 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Lbjd : TLabel
|
00540849 8B8008080000 mov eax, [eax+$0808]
0054084F FF700C push dword ptr [eax+$0C]
00540852 B807000000 mov eax, $00000007
00540857 5A pop edx
00540858 2BC2 sub eax, edx
0054085A 8D9564FBFFFF lea edx, [ebp+$FFFFFB64]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00540860 E86F95ECFF call 00409DD4
00540865 FFB564FBFFFF push dword ptr [ebp+$FFFFFB64]
0054086B 684C455400 push $0054454C
00540870 FF35F8715800 push dword ptr [$005871F8]

* Possible String Reference to: '.txt'
|
00540876 68D4445400 push $005444D4
0054087B B8FC715800 mov eax, $005871FC
00540880 BA06000000 mov edx, $00000006

* Reference to: system.@LStrCatN;
|
00540885 E83A3AECFF call 004042C4
0054088A A1FC715800 mov eax, dword ptr [$005871FC]

* Reference to: Unit_00408BD4.Proc_0040A010
|
0054088F E87C97ECFF call 0040A010
00540894 84C0 test al, al
00540896 7513 jnz 005408AB
00540898 33C9 xor ecx, ecx
0054089A 33D2 xor edx, edx

* Possible String Reference to: '已选拖码个数超出范围'
|
0054089C B858455400 mov eax, $00544558

* Reference to: Unit_004BD734.Proc_004BD86C
|
005408A1 E8C6CFF7FF call 004BD86C
005408A6 E93E370000 jmp 00543FE9
005408AB 8B15FC715800 mov edx, [$005871FC]
005408B1 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@Assign(Text;Text;ShortString);
|
005408B7 E8F660ECFF call 004069B2
005408BC C745F001000000 mov dword ptr [ebp-$10], $00000001
005408C3 A178715800 mov eax, dword ptr [$00587178]
005408C8 85C0 test eax, eax
005408CA 7E32 jle 005408FE
005408CC 8945CC mov [ebp-$34], eax
005408CF C745B0487D5800 mov dword ptr [ebp-$50], $00587D48
005408D6 8B45B0 mov eax, [ebp-$50]
005408D9 833800 cmp dword ptr [eax], +$00
005408DC 7417 jz 005408F5
005408DE 8B45F0 mov eax, [ebp-$10]
005408E1 8D04856C7E5800 lea eax, [$587E6C+eax*4]
005408E8 8B55B0 mov edx, [ebp-$50]
005408EB 8B12 mov edx, [edx]

* Reference to: system.@LStrAsg;
|
005408ED E8E636ECFF call 00403FD8
005408F2 FF45F0 inc dword ptr [ebp-$10]
005408F5 8345B004 add dword ptr [ebp-$50], +$04
005408F9 FF4DCC dec dword ptr [ebp-$34]
005408FC 75D8 jnz 005408D6
005408FE 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: System.Proc_00406E8B
|
00540904 E88265ECFF call 00406E8B

* Reference to: System.Proc_004028A8
|
00540909 E89A1FECFF call 004028A8
0054090E 33C0 xor eax, eax
00540910 8945F0 mov [ebp-$10], eax
00540913 33C0 xor eax, eax
00540915 8945F4 mov [ebp-$0C], eax

* Reference to TScreen instance
|
00540918 A1D4595800 mov eax, dword ptr [$005859D4]
0054091D 8B00 mov eax, [eax]
0054091F 66BAF5FF mov dx, $FFF5

* Reference to: forms.TScreen.SetCursor(TScreen;TCursor);
|
00540923 E89824F1FF call 00452DC0
00540928 E9F0060000 jmp 0054101D
0054092D C705B471580001000000 mov dword ptr [$005871B4], $00000001
00540937 A1B4715800 mov eax, dword ptr [$005871B4]
0054093C 33D2 xor edx, edx
0054093E 891485D87D5800 mov [$587DD8+eax*4], edx
00540945 FF05B4715800 inc dword ptr [$005871B4]
0054094B 833DB471580026 cmp dword ptr [$005871B4], +$26
00540952 75E3 jnz 00540937
00540954 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Lbjd : TLabel
|
00540957 8B8008080000 mov eax, [eax+$0808]

* Reference to field TLabel.Tag : Longint
|
0054095D 83780C01 cmp dword ptr [eax+$0C], +$01
00540961 0F8584010000 jnz 00540AEB
00540967 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
0054096D E8C663ECFF call 00406D38

* Reference to GlobalVar_005871E0
|
00540972 A3E0715800 mov dword ptr [$005871E0], eax
00540977 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
0054097D E8B663ECFF call 00406D38

* Reference to GlobalVar_005871E4
|
00540982 A3E4715800 mov dword ptr [$005871E4], eax
00540987 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
0054098D E8A663ECFF call 00406D38

* Reference to GlobalVar_005871E8
|
00540992 A3E8715800 mov dword ptr [$005871E8], eax
00540997 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
0054099D E89663ECFF call 00406D38

* Reference to GlobalVar_005871EC
|
005409A2 A3EC715800 mov dword ptr [$005871EC], eax
005409A7 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
005409AD E88663ECFF call 00406D38

* Reference to GlobalVar_005871F0
|
005409B2 A3F0715800 mov dword ptr [$005871F0], eax
005409B7 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
005409BD E87663ECFF call 00406D38

* Reference to GlobalVar_005871F4
|
005409C2 A3F4715800 mov dword ptr [$005871F4], eax
005409C7 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLn;
|
005409CD E85664ECFF call 00406E28

* Reference to: System.Proc_004028A8
|
005409D2 E8D11EECFF call 004028A8
005409D7 A1DC715800 mov eax, dword ptr [$005871DC]
005409DC 8B15DC715800 mov edx, [$005871DC]
005409E2 891485D87D5800 mov [$587DD8+eax*4], edx
005409E9 A1E0715800 mov eax, dword ptr [$005871E0]
005409EE 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005409F5 E80A94ECFF call 00409E04
005409FA 8BD8 mov ebx, eax
005409FC A1E0715800 mov eax, dword ptr [$005871E0]
00540A01 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540A08 E8F793ECFF call 00409E04
00540A0D 891C85D87D5800 mov [$587DD8+eax*4], ebx
00540A14 A1E4715800 mov eax, dword ptr [$005871E4]
00540A19 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540A20 E8DF93ECFF call 00409E04
00540A25 8BD8 mov ebx, eax
00540A27 A1E4715800 mov eax, dword ptr [$005871E4]
00540A2C 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540A33 E8CC93ECFF call 00409E04
00540A38 891C85D87D5800 mov [$587DD8+eax*4], ebx
00540A3F A1E8715800 mov eax, dword ptr [$005871E8]
00540A44 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540A4B E8B493ECFF call 00409E04
00540A50 8BD8 mov ebx, eax
00540A52 A1E8715800 mov eax, dword ptr [$005871E8]
00540A57 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540A5E E8A193ECFF call 00409E04
00540A63 891C85D87D5800 mov [$587DD8+eax*4], ebx
00540A6A A1EC715800 mov eax, dword ptr [$005871EC]
00540A6F 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540A76 E88993ECFF call 00409E04
00540A7B 8BD8 mov ebx, eax
00540A7D A1EC715800 mov eax, dword ptr [$005871EC]
00540A82 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540A89 E87693ECFF call 00409E04
00540A8E 891C85D87D5800 mov [$587DD8+eax*4], ebx
00540A95 A1F0715800 mov eax, dword ptr [$005871F0]
00540A9A 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540AA1 E85E93ECFF call 00409E04
00540AA6 8BD8 mov ebx, eax
00540AA8 A1F0715800 mov eax, dword ptr [$005871F0]
00540AAD 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540AB4 E84B93ECFF call 00409E04
00540AB9 891C85D87D5800 mov [$587DD8+eax*4], ebx
00540AC0 A1F4715800 mov eax, dword ptr [$005871F4]
00540AC5 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540ACC E83393ECFF call 00409E04
00540AD1 8BD8 mov ebx, eax
00540AD3 A1F4715800 mov eax, dword ptr [$005871F4]
00540AD8 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540ADF E82093ECFF call 00409E04
00540AE4 891C85D87D5800 mov [$587DD8+eax*4], ebx
00540AEB 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Lbjd : TLabel
|
00540AEE 8B8008080000 mov eax, [eax+$0808]

* Reference to field TLabel.Tag : Longint
|
00540AF4 83780C02 cmp dword ptr [eax+$0C], +$02
00540AF8 0F855B010000 jnz 00540C59
00540AFE 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
00540B04 E82F62ECFF call 00406D38

* Reference to GlobalVar_005871E4
|
00540B09 A3E4715800 mov dword ptr [$005871E4], eax
00540B0E 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
00540B14 E81F62ECFF call 00406D38

* Reference to GlobalVar_005871E8
|
00540B19 A3E8715800 mov dword ptr [$005871E8], eax
00540B1E 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
00540B24 E80F62ECFF call 00406D38

* Reference to GlobalVar_005871EC
|
00540B29 A3EC715800 mov dword ptr [$005871EC], eax
00540B2E 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
00540B34 E8FF61ECFF call 00406D38

* Reference to GlobalVar_005871F0
|
00540B39 A3F0715800 mov dword ptr [$005871F0], eax
00540B3E 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
00540B44 E8EF61ECFF call 00406D38

* Reference to GlobalVar_005871F4
|
00540B49 A3F4715800 mov dword ptr [$005871F4], eax
00540B4E 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLn;
|
00540B54 E8CF62ECFF call 00406E28

* Reference to: System.Proc_004028A8
|
00540B59 E84A1DECFF call 004028A8
00540B5E A1DC715800 mov eax, dword ptr [$005871DC]
00540B63 8B15DC715800 mov edx, [$005871DC]
00540B69 891485D87D5800 mov [$587DD8+eax*4], edx
00540B70 A1E0715800 mov eax, dword ptr [$005871E0]
00540B75 8B15E0715800 mov edx, [$005871E0]
00540B7B 891485D87D5800 mov [$587DD8+eax*4], edx
00540B82 A1E4715800 mov eax, dword ptr [$005871E4]
00540B87 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540B8E E87192ECFF call 00409E04
00540B93 8BD8 mov ebx, eax
00540B95 A1E4715800 mov eax, dword ptr [$005871E4]
00540B9A 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540BA1 E85E92ECFF call 00409E04
00540BA6 891C85D87D5800 mov [$587DD8+eax*4], ebx
00540BAD A1E8715800 mov eax, dword ptr [$005871E8]
00540BB2 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540BB9 E84692ECFF call 00409E04
00540BBE 8BD8 mov ebx, eax
00540BC0 A1E8715800 mov eax, dword ptr [$005871E8]
00540BC5 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540BCC E83392ECFF call 00409E04
00540BD1 891C85D87D5800 mov [$587DD8+eax*4], ebx
00540BD8 A1EC715800 mov eax, dword ptr [$005871EC]
00540BDD 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540BE4 E81B92ECFF call 00409E04
00540BE9 8BD8 mov ebx, eax
00540BEB A1EC715800 mov eax, dword ptr [$005871EC]
00540BF0 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540BF7 E80892ECFF call 00409E04
00540BFC 891C85D87D5800 mov [$587DD8+eax*4], ebx
00540C03 A1F0715800 mov eax, dword ptr [$005871F0]
00540C08 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540C0F E8F091ECFF call 00409E04
00540C14 8BD8 mov ebx, eax
00540C16 A1F0715800 mov eax, dword ptr [$005871F0]
00540C1B 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540C22 E8DD91ECFF call 00409E04
00540C27 891C85D87D5800 mov [$587DD8+eax*4], ebx
00540C2E A1F4715800 mov eax, dword ptr [$005871F4]
00540C33 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540C3A E8C591ECFF call 00409E04
00540C3F 8BD8 mov ebx, eax
00540C41 A1F4715800 mov eax, dword ptr [$005871F4]
00540C46 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540C4D E8B291ECFF call 00409E04
00540C52 891C85D87D5800 mov [$587DD8+eax*4], ebx
00540C59 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Lbjd : TLabel
|
00540C5C 8B8008080000 mov eax, [eax+$0808]

* Reference to field TLabel.Tag : Longint
|
00540C62 83780C03 cmp dword ptr [eax+$0C], +$03
00540C66 0F8532010000 jnz 00540D9E
00540C6C 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
00540C72 E8C160ECFF call 00406D38

* Reference to GlobalVar_005871E8
|
00540C77 A3E8715800 mov dword ptr [$005871E8], eax
00540C7C 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
00540C82 E8B160ECFF call 00406D38

* Reference to GlobalVar_005871EC
|
00540C87 A3EC715800 mov dword ptr [$005871EC], eax
00540C8C 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
00540C92 E8A160ECFF call 00406D38

* Reference to GlobalVar_005871F0
|
00540C97 A3F0715800 mov dword ptr [$005871F0], eax
00540C9C 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
00540CA2 E89160ECFF call 00406D38

* Reference to GlobalVar_005871F4
|
00540CA7 A3F4715800 mov dword ptr [$005871F4], eax
00540CAC 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLn;
|
00540CB2 E87161ECFF call 00406E28

* Reference to: System.Proc_004028A8
|
00540CB7 E8EC1BECFF call 004028A8
00540CBC A1DC715800 mov eax, dword ptr [$005871DC]
00540CC1 8B15DC715800 mov edx, [$005871DC]
00540CC7 891485D87D5800 mov [$587DD8+eax*4], edx
00540CCE A1E0715800 mov eax, dword ptr [$005871E0]
00540CD3 8B15E0715800 mov edx, [$005871E0]
00540CD9 891485D87D5800 mov [$587DD8+eax*4], edx
00540CE0 A1E4715800 mov eax, dword ptr [$005871E4]
00540CE5 8B15E4715800 mov edx, [$005871E4]
00540CEB 891485D87D5800 mov [$587DD8+eax*4], edx
00540CF2 A1E8715800 mov eax, dword ptr [$005871E8]
00540CF7 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540CFE E80191ECFF call 00409E04
00540D03 8BD8 mov ebx, eax
00540D05 A1E8715800 mov eax, dword ptr [$005871E8]
00540D0A 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540D11 E8EE90ECFF call 00409E04
00540D16 891C85D87D5800 mov [$587DD8+eax*4], ebx
00540D1D A1EC715800 mov eax, dword ptr [$005871EC]
00540D22 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540D29 E8D690ECFF call 00409E04
00540D2E 8BD8 mov ebx, eax
00540D30 A1EC715800 mov eax, dword ptr [$005871EC]
00540D35 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540D3C E8C390ECFF call 00409E04
00540D41 891C85D87D5800 mov [$587DD8+eax*4], ebx
00540D48 A1F0715800 mov eax, dword ptr [$005871F0]
00540D4D 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540D54 E8AB90ECFF call 00409E04
00540D59 8BD8 mov ebx, eax
00540D5B A1F0715800 mov eax, dword ptr [$005871F0]
00540D60 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540D67 E89890ECFF call 00409E04
00540D6C 891C85D87D5800 mov [$587DD8+eax*4], ebx
00540D73 A1F4715800 mov eax, dword ptr [$005871F4]
00540D78 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540D7F E88090ECFF call 00409E04
00540D84 8BD8 mov ebx, eax
00540D86 A1F4715800 mov eax, dword ptr [$005871F4]
00540D8B 8B04856C7E5800 mov eax, [$587E6C+eax*4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540D92 E86D90ECFF call 00409E04
00540D97 891C85D87D5800 mov [$587DD8+eax*4], ebx
00540D9E C705B871580001000000 mov dword ptr [$005871B8], $00000001
00540DA8 A178715800 mov eax, dword ptr [$00587178]
00540DAD 85C0 test eax, eax
00540DAF 0F8EA3000000 jle 00540E58
00540DB5 8945CC mov [ebp-$34], eax
00540DB8 C705B471580001000000 mov dword ptr [$005871B4], $00000001
00540DC2 A1B4715800 mov eax, dword ptr [$005871B4]
00540DC7 833C85D87D580000 cmp dword ptr [$587DD8+eax*4], +$00
00540DCF 7E78 jle 00540E49
00540DD1 A1B4715800 mov eax, dword ptr [$005871B4]
00540DD6 833C85D87D58000A cmp dword ptr [$587DD8+eax*4], +$0A
00540DDE 7D35 jnl 00540E15
00540DE0 8D9560FBFFFF lea edx, [ebp+$FFFFFB60]
00540DE6 A1B4715800 mov eax, dword ptr [$005871B4]
00540DEB 8B0485D87D5800 mov eax, [$587DD8+eax*4]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00540DF2 E8DD8FECFF call 00409DD4
00540DF7 8B8D60FBFFFF mov ecx, [ebp+$FFFFFB60]
00540DFD A1B8715800 mov eax, dword ptr [$005871B8]
00540E02 8D048508725800 lea eax, [$587208+eax*4]
00540E09 BA7C445400 mov edx, $0054447C

* Reference to: system.@LStrCat3;
|
00540E0E E83D34ECFF call 00404250
00540E13 EB2E jmp 00540E43
00540E15 8D955CFBFFFF lea edx, [ebp+$FFFFFB5C]
00540E1B A1B4715800 mov eax, dword ptr [$005871B4]
00540E20 8B0485D87D5800 mov eax, [$587DD8+eax*4]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00540E27 E8A88FECFF call 00409DD4
00540E2C 8B955CFBFFFF mov edx, [ebp+$FFFFFB5C]
00540E32 A1B8715800 mov eax, dword ptr [$005871B8]
00540E37 8D048508725800 lea eax, [$587208+eax*4]

* Reference to: system.@LStrAsg;
|
00540E3E E89531ECFF call 00403FD8
00540E43 FF05B8715800 inc dword ptr [$005871B8]
00540E49 FF05B4715800 inc dword ptr [$005871B4]
00540E4F FF4DCC dec dword ptr [ebp-$34]
00540E52 0F856AFFFFFF jnz 00540DC2
00540E58 FF45F0 inc dword ptr [ebp-$10]
00540E5B 803D0A72580074 cmp byte ptr [$0058720A], $74
00540E62 0F8596000000 jnz 00540EFE
00540E68 FF350C725800 push dword ptr [$0058720C]
00540E6E 6888445400 push $00544488
00540E73 FF3510725800 push dword ptr [$00587210]
00540E79 6888445400 push $00544488
00540E7E FF3514725800 push dword ptr [$00587214]
00540E84 6888445400 push $00544488
00540E89 FF3518725800 push dword ptr [$00587218]
00540E8F 6888445400 push $00544488
00540E94 FF351C725800 push dword ptr [$0058721C]
00540E9A 6888445400 push $00544488
00540E9F FF3520725800 push dword ptr [$00587220]
00540EA5 6888445400 push $00544488
00540EAA FF3524725800 push dword ptr [$00587224]
00540EB0 8D45DC lea eax, [ebp-$24]
00540EB3 BA0D000000 mov edx, $0000000D

* Reference to: system.@LStrCatN;
|
00540EB8 E80734ECFF call 004042C4
00540EBD 8D8554FCFFFF lea eax, [ebp+$FFFFFC54]
00540EC3 8B55DC mov edx, [ebp-$24]
00540EC6 B9FF000000 mov ecx, $000000FF

* Reference to: system.@LStrToString;
|
00540ECB E81033ECFF call 004041E0
00540ED0 8D9554FCFFFF lea edx, [ebp+$FFFFFC54]
00540ED6 B83CBA5800 mov eax, $0058BA3C
00540EDB B114 mov cl, $14

* Reference to: system.@PStrNCpy;
|
00540EDD E8021EECFF call 00402CE4
00540EE2 FF45F4 inc dword ptr [ebp-$0C]
00540EE5 BA3CBA5800 mov edx, $0058BA3C
00540EEA B854BA5800 mov eax, $0058BA54

* Reference to: system.@WriteRec;
|
00540EEF E83861ECFF call 0040702C

* Reference to: System.Proc_004028A8
|
00540EF4 E8AF19ECFF call 004028A8
00540EF9 E91F010000 jmp 0054101D
00540EFE A10C725800 mov eax, dword ptr [$0058720C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540F03 E8FC8EECFF call 00409E04

* Reference to GlobalVar_005872A0
|
00540F08 A3A0725800 mov dword ptr [$005872A0], eax
00540F0D A110725800 mov eax, dword ptr [$00587210]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540F12 E8ED8EECFF call 00409E04

* Reference to GlobalVar_005872A4
|
00540F17 A3A4725800 mov dword ptr [$005872A4], eax
00540F1C A114725800 mov eax, dword ptr [$00587214]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540F21 E8DE8EECFF call 00409E04

* Reference to GlobalVar_005872A8
|
00540F26 A3A8725800 mov dword ptr [$005872A8], eax
00540F2B A118725800 mov eax, dword ptr [$00587218]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540F30 E8CF8EECFF call 00409E04

* Reference to GlobalVar_005872AC
|
00540F35 A3AC725800 mov dword ptr [$005872AC], eax
00540F3A A11C725800 mov eax, dword ptr [$0058721C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540F3F E8C08EECFF call 00409E04

* Reference to GlobalVar_005872B0
|
00540F44 A3B0725800 mov dword ptr [$005872B0], eax
00540F49 A120725800 mov eax, dword ptr [$00587220]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540F4E E8B18EECFF call 00409E04

* Reference to GlobalVar_005872B4
|
00540F53 A3B4725800 mov dword ptr [$005872B4], eax
00540F58 A124725800 mov eax, dword ptr [$00587224]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00540F5D E8A28EECFF call 00409E04

* Reference to GlobalVar_005872B8
|
00540F62 A3B8725800 mov dword ptr [$005872B8], eax
00540F67 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.btfilter : TButton
|
00540F6A 8B9828090000 mov ebx, [eax+$0928]
00540F70 8B55F8 mov edx, [ebp-$08]

* Reference to field TButton.OFFS_010C
|
00540F73 8B830C010000 mov eax, [ebx+$010C]

* Possible reference to virtual method TButton.OFFS_0108
|
00540F79 FF9308010000 call dword ptr [ebx+$0108]
00540F7F 803D0972580074 cmp byte ptr [$00587209], $74
00540F86 0F8591000000 jnz 0054101D
00540F8C FF350C725800 push dword ptr [$0058720C]
00540F92 6888445400 push $00544488
00540F97 FF3510725800 push dword ptr [$00587210]
00540F9D 6888445400 push $00544488
00540FA2 FF3514725800 push dword ptr [$00587214]
00540FA8 6888445400 push $00544488
00540FAD FF3518725800 push dword ptr [$00587218]
00540FB3 6888445400 push $00544488
00540FB8 FF351C725800 push dword ptr [$0058721C]
00540FBE 6888445400 push $00544488
00540FC3 FF3520725800 push dword ptr [$00587220]
00540FC9 6888445400 push $00544488
00540FCE FF3524725800 push dword ptr [$00587224]
00540FD4 8D45DC lea eax, [ebp-$24]
00540FD7 BA0D000000 mov edx, $0000000D

* Reference to: system.@LStrCatN;
|
00540FDC E8E332ECFF call 004042C4
00540FE1 8D8554FCFFFF lea eax, [ebp+$FFFFFC54]
00540FE7 8B55DC mov edx, [ebp-$24]
00540FEA B9FF000000 mov ecx, $000000FF

* Reference to: system.@LStrToString;
|
00540FEF E8EC31ECFF call 004041E0
00540FF4 8D9554FCFFFF lea edx, [ebp+$FFFFFC54]
00540FFA B83CBA5800 mov eax, $0058BA3C
00540FFF B114 mov cl, $14

* Reference to: system.@PStrNCpy;
|
00541001 E8DE1CECFF call 00402CE4
00541006 BA3CBA5800 mov edx, $0058BA3C
0054100B B854BA5800 mov eax, $0058BA54

* Reference to: system.@WriteRec;
|
00541010 E81760ECFF call 0040702C

* Reference to: System.Proc_004028A8
|
00541015 E88E18ECFF call 004028A8
0054101A FF45F4 inc dword ptr [ebp-$0C]
0054101D 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@EofText;
|
00541023 E8BC5AECFF call 00406AE4

* Reference to: System.Proc_004028A8
|
00541028 E87B18ECFF call 004028A8
0054102D 84C0 test al, al
0054102F 0F84F8F8FFFF jz 0054092D

* Reference to TScreen instance
|
00541035 A1D4595800 mov eax, dword ptr [$005859D4]
0054103A 8B00 mov eax, [eax]
0054103C 33D2 xor edx, edx

* Reference to: forms.TScreen.SetCursor(TScreen;TCursor);
|
0054103E E87D1DF1FF call 00452DC0
00541043 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@Close;
|
00541049 E8065AECFF call 00406A54

* Reference to: System.Proc_004028A8
|
0054104E E85518ECFF call 004028A8
00541053 8D9558FBFFFF lea edx, [ebp+$FFFFFB58]
00541059 8B45F0 mov eax, [ebp-$10]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0054105C E8738DECFF call 00409DD4
00541061 8D8558FBFFFF lea eax, [ebp+$FFFFFB58]

* Possible String Reference to: '注'
|
00541067 BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
0054106C E89B31ECFF call 0040420C
00541071 8B9558FBFFFF mov edx, [ebp+$FFFFFB58]
00541077 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Label8 : TLabel
|
0054107A 8B8014030000 mov eax, [eax+$0314]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
00541080 E8074EEFFF call 00435E8C
00541085 8D9554FBFFFF lea edx, [ebp+$FFFFFB54]
0054108B 8B45F0 mov eax, [ebp-$10]
0054108E 2B45F4 sub eax, dword ptr [ebp-$0C]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00541091 E83E8DECFF call 00409DD4
00541096 8D8554FBFFFF lea eax, [ebp+$FFFFFB54]

* Possible String Reference to: '注'
|
0054109C BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
005410A1 E86631ECFF call 0040420C
005410A6 8B9554FBFFFF mov edx, [ebp+$FFFFFB54]
005410AC 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Label9 : TLabel
|
005410AF 8B8018030000 mov eax, [eax+$0318]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
005410B5 E8D24DEFFF call 00435E8C
005410BA 8D9550FBFFFF lea edx, [ebp+$FFFFFB50]
005410C0 8B45F4 mov eax, [ebp-$0C]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
005410C3 E80C8DECFF call 00409DD4
005410C8 8D8550FBFFFF lea eax, [ebp+$FFFFFB50]

* Possible String Reference to: '注'
|
005410CE BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
005410D3 E83431ECFF call 0040420C
005410D8 8B9550FBFFFF mov edx, [ebp+$FFFFFB50]
005410DE 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.sumLb : TLabel
|
005410E1 8B80A4060000 mov eax, [eax+$06A4]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
005410E7 E8A04DEFFF call 00435E8C
005410EC 8B45F4 mov eax, [ebp-$0C]
005410EF 8945F0 mov [ebp-$10], eax
005410F2 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
005410F5 8B80F4020000 mov eax, [eax+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
005410FB 8B8044020000 mov eax, [eax+$0244]
00541101 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.TS5 : TTabSheet
|
00541104 3B8204030000 cmp eax, [edx+$0304]
0054110A 0F85AB0F0000 jnz 005420BB
00541110 8D954CFBFFFF lea edx, [ebp+$FFFFFB4C]
00541116 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.fE1 : TEdit
|
00541119 8B8084050000 mov eax, [eax+$0584]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054111F E8384DEFFF call 00435E5C
00541124 8B854CFBFFFF mov eax, [ebp+$FFFFFB4C]

* Reference to: system.@LStrLen:Integer;
| or: system.@DynArrayLength;
| or: system.DynArraySize(Pointer):Integer;
|
0054112A E8D530ECFF call 00404204
0054112F 83F802 cmp eax, +$02
00541132 0F8C90000000 jl 005411C8
00541138 8D9548FBFFFF lea edx, [ebp+$FFFFFB48]
0054113E 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE2 : TEdit
|
00541141 8B8088050000 mov eax, [eax+$0588]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541147 E8104DEFFF call 00435E5C
0054114C 8B8548FBFFFF mov eax, [ebp+$FFFFFB48]

* Reference to: system.@LStrLen:Integer;
| or: system.@DynArrayLength;
| or: system.DynArraySize(Pointer):Integer;
|
00541152 E8AD30ECFF call 00404204
00541157 83F802 cmp eax, +$02
0054115A 7C6C jl 005411C8
0054115C 8D9544FBFFFF lea edx, [ebp+$FFFFFB44]
00541162 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE3 : TEdit
|
00541165 8B808C050000 mov eax, [eax+$058C]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054116B E8EC4CEFFF call 00435E5C
00541170 8B8544FBFFFF mov eax, [ebp+$FFFFFB44]

* Reference to: system.@LStrLen:Integer;
| or: system.@DynArrayLength;
| or: system.DynArraySize(Pointer):Integer;
|
00541176 E88930ECFF call 00404204
0054117B 83F802 cmp eax, +$02
0054117E 7C48 jl 005411C8
00541180 8D9540FBFFFF lea edx, [ebp+$FFFFFB40]
00541186 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE4 : TEdit
|
00541189 8B8090050000 mov eax, [eax+$0590]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054118F E8C84CEFFF call 00435E5C
00541194 8B8540FBFFFF mov eax, [ebp+$FFFFFB40]

* Reference to: system.@LStrLen:Integer;
| or: system.@DynArrayLength;
| or: system.DynArraySize(Pointer):Integer;
|
0054119A E86530ECFF call 00404204
0054119F 83F802 cmp eax, +$02
005411A2 7C24 jl 005411C8
005411A4 8D953CFBFFFF lea edx, [ebp+$FFFFFB3C]
005411AA 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE5 : TEdit
|
005411AD 8B8094050000 mov eax, [eax+$0594]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005411B3 E8A44CEFFF call 00435E5C
005411B8 8B853CFBFFFF mov eax, [ebp+$FFFFFB3C]

* Reference to: system.@LStrLen:Integer;
| or: system.@DynArrayLength;
| or: system.DynArraySize(Pointer):Integer;
|
005411BE E84130ECFF call 00404204
005411C3 83F802 cmp eax, +$02
005411C6 7D13 jnl 005411DB
005411C8 33C9 xor ecx, ecx
005411CA 33D2 xor edx, edx

* Possible String Reference to: '输入号码有误'
|
005411CC B878455400 mov eax, $00544578

* Reference to: Unit_004BD734.Proc_004BD86C
|
005411D1 E896C6F7FF call 004BD86C
005411D6 E90E2E0000 jmp 00543FE9
005411DB 33C0 xor eax, eax
005411DD 55 push ebp

* Possible String Reference to: '镼$?3?腋xET'
|
005411DE 688E125400 push $0054128E

***** TRY
|
005411E3 64FF30 push dword ptr fs:[eax]
005411E6 648920 mov fs:[eax], esp
005411E9 8D9538FBFFFF lea edx, [ebp+$FFFFFB38]
005411EF 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.fE1 : TEdit
|
005411F2 8B8084050000 mov eax, [eax+$0584]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005411F8 E85F4CEFFF call 00435E5C
005411FD 8B8538FBFFFF mov eax, [ebp+$FFFFFB38]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541203 E8FC8BECFF call 00409E04
00541208 8D9534FBFFFF lea edx, [ebp+$FFFFFB34]
0054120E 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE2 : TEdit
|
00541211 8B8088050000 mov eax, [eax+$0588]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541217 E8404CEFFF call 00435E5C
0054121C 8B8534FBFFFF mov eax, [ebp+$FFFFFB34]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541222 E8DD8BECFF call 00409E04
00541227 8D9530FBFFFF lea edx, [ebp+$FFFFFB30]
0054122D 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE3 : TEdit
|
00541230 8B808C050000 mov eax, [eax+$058C]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541236 E8214CEFFF call 00435E5C
0054123B 8B8530FBFFFF mov eax, [ebp+$FFFFFB30]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541241 E8BE8BECFF call 00409E04
00541246 8D952CFBFFFF lea edx, [ebp+$FFFFFB2C]
0054124C 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE4 : TEdit
|
0054124F 8B8090050000 mov eax, [eax+$0590]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541255 E8024CEFFF call 00435E5C
0054125A 8B852CFBFFFF mov eax, [ebp+$FFFFFB2C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541260 E89F8BECFF call 00409E04
00541265 8D9528FBFFFF lea edx, [ebp+$FFFFFB28]
0054126B 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE5 : TEdit
|
0054126E 8B8094050000 mov eax, [eax+$0594]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541274 E8E34BEFFF call 00435E5C
00541279 8B8528FBFFFF mov eax, [ebp+$FFFFFB28]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0054127F E8808BECFF call 00409E04
00541284 33C0 xor eax, eax
00541286 5A pop edx
00541287 59 pop ecx
00541288 59 pop ecx
00541289 648910 mov fs:[eax], edx
0054128C EB22 jmp 005412B0

* Reference to: system.@HandleAnyException;
|
0054128E E95124ECFF jmp 004036E4
00541293 33C9 xor ecx, ecx
00541295 33D2 xor edx, edx

* Possible String Reference to: '输入号码有误'
|
00541297 B878455400 mov eax, $00544578

* Reference to: Unit_004BD734.Proc_004BD86C
|
0054129C E8CBC5F7FF call 004BD86C

* Reference to: system.@DoneExcept;
|
005412A1 E89A27ECFF call 00403A40
005412A6 E93E2D0000 jmp 00543FE9

* Reference to: system.@DoneExcept;
|
005412AB E89027ECFF call 00403A40

****** END
|
005412B0 8D9524FBFFFF lea edx, [ebp+$FFFFFB24]
005412B6 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.fE1 : TEdit
|
005412B9 8B8084050000 mov eax, [eax+$0584]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005412BF E8984BEFFF call 00435E5C
005412C4 8B8524FBFFFF mov eax, [ebp+$FFFFFB24]
005412CA 50 push eax
005412CB 8D9520FBFFFF lea edx, [ebp+$FFFFFB20]
005412D1 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE2 : TEdit
|
005412D4 8B8088050000 mov eax, [eax+$0588]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005412DA E87D4BEFFF call 00435E5C
005412DF 8B9520FBFFFF mov edx, [ebp+$FFFFFB20]
005412E5 58 pop eax

* Reference to: system.@LStrCmp;
|
005412E6 E82930ECFF call 00404314
005412EB 0F843D020000 jz 0054152E
005412F1 8D951CFBFFFF lea edx, [ebp+$FFFFFB1C]
005412F7 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.fE1 : TEdit
|
005412FA 8B8084050000 mov eax, [eax+$0584]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541300 E8574BEFFF call 00435E5C
00541305 8B851CFBFFFF mov eax, [ebp+$FFFFFB1C]
0054130B 50 push eax
0054130C 8D9518FBFFFF lea edx, [ebp+$FFFFFB18]
00541312 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE3 : TEdit
|
00541315 8B808C050000 mov eax, [eax+$058C]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054131B E83C4BEFFF call 00435E5C
00541320 8B9518FBFFFF mov edx, [ebp+$FFFFFB18]
00541326 58 pop eax

* Reference to: system.@LStrCmp;
|
00541327 E8E82FECFF call 00404314
0054132C 0F84FC010000 jz 0054152E
00541332 8D9514FBFFFF lea edx, [ebp+$FFFFFB14]
00541338 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.fE1 : TEdit
|
0054133B 8B8084050000 mov eax, [eax+$0584]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541341 E8164BEFFF call 00435E5C
00541346 8B8514FBFFFF mov eax, [ebp+$FFFFFB14]
0054134C 50 push eax
0054134D 8D9510FBFFFF lea edx, [ebp+$FFFFFB10]
00541353 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE4 : TEdit
|
00541356 8B8090050000 mov eax, [eax+$0590]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054135C E8FB4AEFFF call 00435E5C
00541361 8B9510FBFFFF mov edx, [ebp+$FFFFFB10]
00541367 58 pop eax

* Reference to: system.@LStrCmp;
|
00541368 E8A72FECFF call 00404314
0054136D 0F84BB010000 jz 0054152E
00541373 8D950CFBFFFF lea edx, [ebp+$FFFFFB0C]
00541379 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.fE1 : TEdit
|
0054137C 8B8084050000 mov eax, [eax+$0584]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541382 E8D54AEFFF call 00435E5C
00541387 8B850CFBFFFF mov eax, [ebp+$FFFFFB0C]
0054138D 50 push eax
0054138E 8D9508FBFFFF lea edx, [ebp+$FFFFFB08]
00541394 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE5 : TEdit
|
00541397 8B8094050000 mov eax, [eax+$0594]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054139D E8BA4AEFFF call 00435E5C
005413A2 8B9508FBFFFF mov edx, [ebp+$FFFFFB08]
005413A8 58 pop eax

* Reference to: system.@LStrCmp;
|
005413A9 E8662FECFF call 00404314
005413AE 0F847A010000 jz 0054152E
005413B4 8D9504FBFFFF lea edx, [ebp+$FFFFFB04]
005413BA 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE2 : TEdit
|
005413BD 8B8088050000 mov eax, [eax+$0588]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005413C3 E8944AEFFF call 00435E5C
005413C8 8B8504FBFFFF mov eax, [ebp+$FFFFFB04]
005413CE 50 push eax
005413CF 8D9500FBFFFF lea edx, [ebp+$FFFFFB00]
005413D5 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE3 : TEdit
|
005413D8 8B808C050000 mov eax, [eax+$058C]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005413DE E8794AEFFF call 00435E5C
005413E3 8B9500FBFFFF mov edx, [ebp+$FFFFFB00]
005413E9 58 pop eax

* Reference to: system.@LStrCmp;
|
005413EA E8252FECFF call 00404314
005413EF 0F8439010000 jz 0054152E
005413F5 8D95FCFAFFFF lea edx, [ebp+$FFFFFAFC]
005413FB 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE2 : TEdit
|
005413FE 8B8088050000 mov eax, [eax+$0588]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541404 E8534AEFFF call 00435E5C
00541409 8B85FCFAFFFF mov eax, [ebp+$FFFFFAFC]
0054140F 50 push eax
00541410 8D95F8FAFFFF lea edx, [ebp+$FFFFFAF8]
00541416 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE4 : TEdit
|
00541419 8B8090050000 mov eax, [eax+$0590]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054141F E8384AEFFF call 00435E5C
00541424 8B95F8FAFFFF mov edx, [ebp+$FFFFFAF8]
0054142A 58 pop eax

* Reference to: system.@LStrCmp;
|
0054142B E8E42EECFF call 00404314
00541430 0F84F8000000 jz 0054152E
00541436 8D95F4FAFFFF lea edx, [ebp+$FFFFFAF4]
0054143C 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE2 : TEdit
|
0054143F 8B8088050000 mov eax, [eax+$0588]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541445 E8124AEFFF call 00435E5C
0054144A 8B85F4FAFFFF mov eax, [ebp+$FFFFFAF4]
00541450 50 push eax
00541451 8D95F0FAFFFF lea edx, [ebp+$FFFFFAF0]
00541457 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE5 : TEdit
|
0054145A 8B8094050000 mov eax, [eax+$0594]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541460 E8F749EFFF call 00435E5C
00541465 8B95F0FAFFFF mov edx, [ebp+$FFFFFAF0]
0054146B 58 pop eax

* Reference to: system.@LStrCmp;
|
0054146C E8A32EECFF call 00404314
00541471 0F84B7000000 jz 0054152E
00541477 8D95ECFAFFFF lea edx, [ebp+$FFFFFAEC]
0054147D 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE3 : TEdit
|
00541480 8B808C050000 mov eax, [eax+$058C]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541486 E8D149EFFF call 00435E5C
0054148B 8B85ECFAFFFF mov eax, [ebp+$FFFFFAEC]
00541491 50 push eax
00541492 8D95E8FAFFFF lea edx, [ebp+$FFFFFAE8]
00541498 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE4 : TEdit
|
0054149B 8B8090050000 mov eax, [eax+$0590]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005414A1 E8B649EFFF call 00435E5C
005414A6 8B95E8FAFFFF mov edx, [ebp+$FFFFFAE8]
005414AC 58 pop eax

* Reference to: system.@LStrCmp;
|
005414AD E8622EECFF call 00404314
005414B2 747A jz 0054152E
005414B4 8D95E4FAFFFF lea edx, [ebp+$FFFFFAE4]
005414BA 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE3 : TEdit
|
005414BD 8B808C050000 mov eax, [eax+$058C]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005414C3 E89449EFFF call 00435E5C
005414C8 8B85E4FAFFFF mov eax, [ebp+$FFFFFAE4]
005414CE 50 push eax
005414CF 8D95E0FAFFFF lea edx, [ebp+$FFFFFAE0]
005414D5 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE5 : TEdit
|
005414D8 8B8094050000 mov eax, [eax+$0594]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005414DE E87949EFFF call 00435E5C
005414E3 8B95E0FAFFFF mov edx, [ebp+$FFFFFAE0]
005414E9 58 pop eax

* Reference to: system.@LStrCmp;
|
005414EA E8252EECFF call 00404314
005414EF 743D jz 0054152E
005414F1 8D95DCFAFFFF lea edx, [ebp+$FFFFFADC]
005414F7 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE4 : TEdit
|
005414FA 8B8090050000 mov eax, [eax+$0590]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541500 E85749EFFF call 00435E5C
00541505 8B85DCFAFFFF mov eax, [ebp+$FFFFFADC]
0054150B 50 push eax
0054150C 8D95D8FAFFFF lea edx, [ebp+$FFFFFAD8]
00541512 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE5 : TEdit
|
00541515 8B8094050000 mov eax, [eax+$0594]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054151B E83C49EFFF call 00435E5C
00541520 8B95D8FAFFFF mov edx, [ebp+$FFFFFAD8]
00541526 58 pop eax

* Reference to: system.@LStrCmp;
|
00541527 E8E82DECFF call 00404314
0054152C 7513 jnz 00541541
0054152E 33C9 xor ecx, ecx
00541530 33D2 xor edx, edx

* Possible String Reference to: '输入号码重复'
|
00541532 B890455400 mov eax, $00544590

* Reference to: Unit_004BD734.Proc_004BD86C
|
00541537 E830C3F7FF call 004BD86C
0054153C E9A82A0000 jmp 00543FE9
00541541 8D95D4FAFFFF lea edx, [ebp+$FFFFFAD4]
00541547 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.fE1 : TEdit
|
0054154A 8B8084050000 mov eax, [eax+$0584]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541550 E80749EFFF call 00435E5C
00541555 8B85D4FAFFFF mov eax, [ebp+$FFFFFAD4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0054155B E8A488ECFF call 00409E04
00541560 3B0578715800 cmp eax, [$00587178]
00541566 0F8F5F010000 jnle 005416CB
0054156C 8D95D0FAFFFF lea edx, [ebp+$FFFFFAD0]
00541572 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.fE1 : TEdit
|
00541575 8B8084050000 mov eax, [eax+$0584]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054157B E8DC48EFFF call 00435E5C
00541580 8B85D0FAFFFF mov eax, [ebp+$FFFFFAD0]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541586 E87988ECFF call 00409E04
0054158B 85C0 test eax, eax
0054158D 0F8438010000 jz 005416CB
00541593 8D95CCFAFFFF lea edx, [ebp+$FFFFFACC]
00541599 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE2 : TEdit
|
0054159C 8B8088050000 mov eax, [eax+$0588]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005415A2 E8B548EFFF call 00435E5C
005415A7 8B85CCFAFFFF mov eax, [ebp+$FFFFFACC]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005415AD E85288ECFF call 00409E04
005415B2 3B0578715800 cmp eax, [$00587178]
005415B8 0F8F0D010000 jnle 005416CB
005415BE 8D95C8FAFFFF lea edx, [ebp+$FFFFFAC8]
005415C4 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE2 : TEdit
|
005415C7 8B8088050000 mov eax, [eax+$0588]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005415CD E88A48EFFF call 00435E5C
005415D2 8B85C8FAFFFF mov eax, [ebp+$FFFFFAC8]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005415D8 E82788ECFF call 00409E04
005415DD 85C0 test eax, eax
005415DF 0F84E6000000 jz 005416CB
005415E5 8D95C4FAFFFF lea edx, [ebp+$FFFFFAC4]
005415EB 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE3 : TEdit
|
005415EE 8B808C050000 mov eax, [eax+$058C]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005415F4 E86348EFFF call 00435E5C
005415F9 8B85C4FAFFFF mov eax, [ebp+$FFFFFAC4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005415FF E80088ECFF call 00409E04
00541604 3B0578715800 cmp eax, [$00587178]
0054160A 0F8FBB000000 jnle 005416CB
00541610 8D95C0FAFFFF lea edx, [ebp+$FFFFFAC0]
00541616 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE3 : TEdit
|
00541619 8B808C050000 mov eax, [eax+$058C]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054161F E83848EFFF call 00435E5C
00541624 8B85C0FAFFFF mov eax, [ebp+$FFFFFAC0]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0054162A E8D587ECFF call 00409E04
0054162F 85C0 test eax, eax
00541631 0F8494000000 jz 005416CB
00541637 8D95BCFAFFFF lea edx, [ebp+$FFFFFABC]
0054163D 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE4 : TEdit
|
00541640 8B8090050000 mov eax, [eax+$0590]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541646 E81148EFFF call 00435E5C
0054164B 8B85BCFAFFFF mov eax, [ebp+$FFFFFABC]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541651 E8AE87ECFF call 00409E04
00541656 3B0578715800 cmp eax, [$00587178]
0054165C 7F6D jnle 005416CB
0054165E 8D95B8FAFFFF lea edx, [ebp+$FFFFFAB8]
00541664 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE4 : TEdit
|
00541667 8B8090050000 mov eax, [eax+$0590]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054166D E8EA47EFFF call 00435E5C
00541672 8B85B8FAFFFF mov eax, [ebp+$FFFFFAB8]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541678 E88787ECFF call 00409E04
0054167D 85C0 test eax, eax
0054167F 744A jz 005416CB
00541681 8D95B4FAFFFF lea edx, [ebp+$FFFFFAB4]
00541687 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE5 : TEdit
|
0054168A 8B8094050000 mov eax, [eax+$0594]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541690 E8C747EFFF call 00435E5C
00541695 8B85B4FAFFFF mov eax, [ebp+$FFFFFAB4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0054169B E86487ECFF call 00409E04
005416A0 3B0578715800 cmp eax, [$00587178]
005416A6 7F23 jnle 005416CB
005416A8 8D95B0FAFFFF lea edx, [ebp+$FFFFFAB0]
005416AE 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE5 : TEdit
|
005416B1 8B8094050000 mov eax, [eax+$0594]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005416B7 E8A047EFFF call 00435E5C
005416BC 8B85B0FAFFFF mov eax, [ebp+$FFFFFAB0]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005416C2 E83D87ECFF call 00409E04
005416C7 85C0 test eax, eax
005416C9 7513 jnz 005416DE
005416CB 33C9 xor ecx, ecx
005416CD 33D2 xor edx, edx

* Possible String Reference to: '输入号码超出范围'
|
005416CF B8A8455400 mov eax, $005445A8

* Reference to: Unit_004BD734.Proc_004BD86C
|
005416D4 E893C1F7FF call 004BD86C
005416D9 E90B290000 jmp 00543FE9
005416DE 6A01 push $01
005416E0 8D85A0FAFFFF lea eax, [ebp+$FFFFFAA0]

* Possible String Reference to: 'delete from tbhistmp'
|
005416E6 BAC4455400 mov edx, $005445C4

* Reference to: system.@VarFromLStr(Variant;Variant;String);
|
005416EB E8183DECFF call 00405408
005416F0 8D8DA0FAFFFF lea ecx, [ebp+$FFFFFAA0]

* Reference to Tfrdata instance
|
005416F6 A1BC525800 mov eax, dword ptr [$005852BC]
005416FB 8B00 mov eax, [eax]

* Reference to control Tfrdata.Qutmp : TQuery
|
005416FD 8B4068 mov eax, [eax+$68]
00541700 BA68000000 mov edx, $00000068

* Reference to: Unit_004BD734.Proc_004BDA9C
|
00541705 E892C3F7FF call 004BDA9C
0054170A 8D9594FAFFFF lea edx, [ebp+$FFFFFA94]
00541710 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.fE1 : TEdit
|
00541713 8B8084050000 mov eax, [eax+$0584]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541719 E83E47EFFF call 00435E5C
0054171E 8B8594FAFFFF mov eax, [ebp+$FFFFFA94]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541724 E8DB86ECFF call 00409E04
00541729 898598FAFFFF mov [ebp+$FFFFFA98], eax
0054172F C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
00541736 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
0054173C A1BC525800 mov eax, dword ptr [$005852BC]
00541741 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00541743 8B8080000000 mov eax, [eax+$0080]
00541749 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
0054174B E8C056F5FF call 00496E10
00541750 8D9590FAFFFF lea edx, [ebp+$FFFFFA90]
00541756 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE2 : TEdit
|
00541759 8B8088050000 mov eax, [eax+$0588]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054175F E8F846EFFF call 00435E5C
00541764 8B8590FAFFFF mov eax, [ebp+$FFFFFA90]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0054176A E89586ECFF call 00409E04
0054176F 898598FAFFFF mov [ebp+$FFFFFA98], eax
00541775 C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
0054177C 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
00541782 A1BC525800 mov eax, dword ptr [$005852BC]
00541787 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00541789 8B8080000000 mov eax, [eax+$0080]
0054178F 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
00541791 E87A56F5FF call 00496E10
00541796 8D958CFAFFFF lea edx, [ebp+$FFFFFA8C]
0054179C 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE3 : TEdit
|
0054179F 8B808C050000 mov eax, [eax+$058C]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005417A5 E8B246EFFF call 00435E5C
005417AA 8B858CFAFFFF mov eax, [ebp+$FFFFFA8C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005417B0 E84F86ECFF call 00409E04
005417B5 898598FAFFFF mov [ebp+$FFFFFA98], eax
005417BB C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
005417C2 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
005417C8 A1BC525800 mov eax, dword ptr [$005852BC]
005417CD 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
005417CF 8B8080000000 mov eax, [eax+$0080]
005417D5 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
005417D7 E83456F5FF call 00496E10
005417DC 8D9588FAFFFF lea edx, [ebp+$FFFFFA88]
005417E2 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE4 : TEdit
|
005417E5 8B8090050000 mov eax, [eax+$0590]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005417EB E86C46EFFF call 00435E5C
005417F0 8B8588FAFFFF mov eax, [ebp+$FFFFFA88]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005417F6 E80986ECFF call 00409E04
005417FB 898598FAFFFF mov [ebp+$FFFFFA98], eax
00541801 C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
00541808 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
0054180E A1BC525800 mov eax, dword ptr [$005852BC]
00541813 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00541815 8B8080000000 mov eax, [eax+$0080]
0054181B 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
0054181D E8EE55F5FF call 00496E10
00541822 8D9584FAFFFF lea edx, [ebp+$FFFFFA84]
00541828 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE5 : TEdit
|
0054182B 8B8094050000 mov eax, [eax+$0594]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541831 E82646EFFF call 00435E5C
00541836 8B8584FAFFFF mov eax, [ebp+$FFFFFA84]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0054183C E8C385ECFF call 00409E04
00541841 898598FAFFFF mov [ebp+$FFFFFA98], eax
00541847 C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
0054184E 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
00541854 A1BC525800 mov eax, dword ptr [$005852BC]
00541859 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
0054185B 8B8080000000 mov eax, [eax+$0080]
00541861 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
00541863 E8A855F5FF call 00496E10
00541868 B800725800 mov eax, $00587200
0054186D BA9C435400 mov edx, $0054439C

* Reference to: system.@LStrAsg;
|
00541872 E86127ECFF call 00403FD8
00541877 C705B871580001000000 mov dword ptr [$005871B8], $00000001
00541881 E98D000000 jmp 00541913
00541886 A178715800 mov eax, dword ptr [$00587178]
0054188B 40 inc eax

* Reference to: system.@RandInt;
|
0054188C E89715ECFF call 00402E28

* Reference to GlobalVar_005871B4
|
00541891 A3B4715800 mov dword ptr [$005871B4], eax
00541896 A1B4715800 mov eax, dword ptr [$005871B4]
0054189B 898598FAFFFF mov [ebp+$FFFFFA98], eax
005418A1 C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
005418A8 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
005418AE A1BC525800 mov eax, dword ptr [$005852BC]
005418B3 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
005418B5 8B8080000000 mov eax, [eax+$0080]
005418BB 33C9 xor ecx, ecx

* Reference to: dbtables.TTable.FindKey(TTable;arrayofTVarRec;arrayofTVarRec;0..-1):Boolean;
| or: dbtables.TTable.FindNearest(TTable;arrayofTVarRec;arrayofTVarRec;0..-1);
|
005418BD E8E2C9F6FF call 004AE2A4
005418C2 84C0 test al, al
005418C4 754D jnz 00541913
005418C6 833DB471580000 cmp dword ptr [$005871B4], +$00
005418CD 7E44 jle 00541913
005418CF A1B4715800 mov eax, dword ptr [$005871B4]
005418D4 898598FAFFFF mov [ebp+$FFFFFA98], eax
005418DA C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
005418E1 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
005418E7 A1BC525800 mov eax, dword ptr [$005852BC]
005418EC 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
005418EE 8B8080000000 mov eax, [eax+$0080]
005418F4 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
005418F6 E81555F5FF call 00496E10
005418FB A1B8715800 mov eax, dword ptr [$005871B8]
00541900 8B15B4715800 mov edx, [$005871B4]
00541906 891485F47A5800 mov [$587AF4+eax*4], edx
0054190D FF05B8715800 inc dword ptr [$005871B8]

* Reference to Tfrdata instance
|
00541913 A1BC525800 mov eax, dword ptr [$005852BC]
00541918 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
0054191A 8B8080000000 mov eax, [eax+$0080]
00541920 8B10 mov edx, [eax]

* Reference to method TTable.GetRecordCount()
|
00541922 FF924C010000 call dword ptr [edx+$014C]
00541928 3B0578715800 cmp eax, [$00587178]
0054192E 0F8C52FFFFFF jl 00541886
00541934 F6057871580001 test byte ptr [$00587178], $01
0054193B 7426 jz 00541963
0054193D A178715800 mov eax, dword ptr [$00587178]
00541942 83E805 sub eax, +$05
00541945 898558FDFFFF mov [ebp+$FFFFFD58], eax
0054194B DB8558FDFFFF fild dword ptr [ebp+$FFFFFD58]
00541951 D835DC455400 fdiv dword ptr [$005445DC]

* Reference to: system.@TRUNC;
|
00541957 E80413ECFF call 00402C60

* Reference to GlobalVar_005871BC
|
0054195C A3BC715800 mov dword ptr [$005871BC], eax
00541961 EB24 jmp 00541987
00541963 A178715800 mov eax, dword ptr [$00587178]
00541968 83E804 sub eax, +$04
0054196B 898558FDFFFF mov [ebp+$FFFFFD58], eax
00541971 DB8558FDFFFF fild dword ptr [ebp+$FFFFFD58]
00541977 D835DC455400 fdiv dword ptr [$005445DC]

* Reference to: system.@TRUNC;
|
0054197D E8DE12ECFF call 00402C60

* Reference to GlobalVar_005871BC
|
00541982 A3BC715800 mov dword ptr [$005871BC], eax
00541987 8D9580FAFFFF lea edx, [ebp+$FFFFFA80]
0054198D A1BC715800 mov eax, dword ptr [$005871BC]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00541992 E83D84ECFF call 00409DD4
00541997 8D8580FAFFFF lea eax, [ebp+$FFFFFA80]

* Possible String Reference to: '注'
|
0054199D BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
005419A2 E86528ECFF call 0040420C
005419A7 8B9580FAFFFF mov edx, [ebp+$FFFFFA80]
005419AD 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Label8 : TLabel
|
005419B0 8B8014030000 mov eax, [eax+$0314]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
005419B6 E8D144EFFF call 00435E8C
005419BB 33C0 xor eax, eax
005419BD 8945F0 mov [ebp-$10], eax
005419C0 33D2 xor edx, edx
005419C2 A1BC715800 mov eax, dword ptr [$005871BC]

* Reference to: Unit_004BD734.Proc_004BD9A4
|
005419C7 E8D8BFF7FF call 004BD9A4
005419CC C705C071580001000000 mov dword ptr [$005871C0], $00000001
005419D6 E959060000 jmp 00542034
005419DB 6A01 push $01
005419DD 8D8570FAFFFF lea eax, [ebp+$FFFFFA70]

* Possible String Reference to: 'delete from tbhistmp'
|
005419E3 BAC4455400 mov edx, $005445C4

* Reference to: system.@VarFromLStr(Variant;Variant;String);
|
005419E8 E81B3AECFF call 00405408
005419ED 8D8D70FAFFFF lea ecx, [ebp+$FFFFFA70]

* Reference to Tfrdata instance
|
005419F3 A1BC525800 mov eax, dword ptr [$005852BC]
005419F8 8B00 mov eax, [eax]

* Reference to control Tfrdata.Qutmp : TQuery
|
005419FA 8B4068 mov eax, [eax+$68]
005419FD BA68000000 mov edx, $00000068

* Reference to: Unit_004BD734.Proc_004BDA9C
|
00541A02 E895C0F7FF call 004BDA9C
00541A07 8D956CFAFFFF lea edx, [ebp+$FFFFFA6C]
00541A0D 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.fE1 : TEdit
|
00541A10 8B8084050000 mov eax, [eax+$0584]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541A16 E84144EFFF call 00435E5C
00541A1B 8B856CFAFFFF mov eax, [ebp+$FFFFFA6C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541A21 E8DE83ECFF call 00409E04
00541A26 898598FAFFFF mov [ebp+$FFFFFA98], eax
00541A2C C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
00541A33 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
00541A39 A1BC525800 mov eax, dword ptr [$005852BC]
00541A3E 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00541A40 8B8080000000 mov eax, [eax+$0080]
00541A46 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
00541A48 E8C353F5FF call 00496E10
00541A4D 8D9568FAFFFF lea edx, [ebp+$FFFFFA68]
00541A53 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE2 : TEdit
|
00541A56 8B8088050000 mov eax, [eax+$0588]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541A5C E8FB43EFFF call 00435E5C
00541A61 8B8568FAFFFF mov eax, [ebp+$FFFFFA68]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541A67 E89883ECFF call 00409E04
00541A6C 898598FAFFFF mov [ebp+$FFFFFA98], eax
00541A72 C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
00541A79 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
00541A7F A1BC525800 mov eax, dword ptr [$005852BC]
00541A84 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00541A86 8B8080000000 mov eax, [eax+$0080]
00541A8C 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
00541A8E E87D53F5FF call 00496E10
00541A93 8D9564FAFFFF lea edx, [ebp+$FFFFFA64]
00541A99 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE3 : TEdit
|
00541A9C 8B808C050000 mov eax, [eax+$058C]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541AA2 E8B543EFFF call 00435E5C
00541AA7 8B8564FAFFFF mov eax, [ebp+$FFFFFA64]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541AAD E85283ECFF call 00409E04
00541AB2 898598FAFFFF mov [ebp+$FFFFFA98], eax
00541AB8 C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
00541ABF 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
00541AC5 A1BC525800 mov eax, dword ptr [$005852BC]
00541ACA 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00541ACC 8B8080000000 mov eax, [eax+$0080]
00541AD2 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
00541AD4 E83753F5FF call 00496E10
00541AD9 8D9560FAFFFF lea edx, [ebp+$FFFFFA60]
00541ADF 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE4 : TEdit
|
00541AE2 8B8090050000 mov eax, [eax+$0590]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541AE8 E86F43EFFF call 00435E5C
00541AED 8B8560FAFFFF mov eax, [ebp+$FFFFFA60]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541AF3 E80C83ECFF call 00409E04
00541AF8 898598FAFFFF mov [ebp+$FFFFFA98], eax
00541AFE C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
00541B05 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
00541B0B A1BC525800 mov eax, dword ptr [$005852BC]
00541B10 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00541B12 8B8080000000 mov eax, [eax+$0080]
00541B18 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
00541B1A E8F152F5FF call 00496E10
00541B1F 8D955CFAFFFF lea edx, [ebp+$FFFFFA5C]
00541B25 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE5 : TEdit
|
00541B28 8B8094050000 mov eax, [eax+$0594]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541B2E E82943EFFF call 00435E5C
00541B33 8B855CFAFFFF mov eax, [ebp+$FFFFFA5C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541B39 E8C682ECFF call 00409E04
00541B3E 898598FAFFFF mov [ebp+$FFFFFA98], eax
00541B44 C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
00541B4B 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
00541B51 A1BC525800 mov eax, dword ptr [$005852BC]
00541B56 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00541B58 8B8080000000 mov eax, [eax+$0080]
00541B5E 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
00541B60 E8AB52F5FF call 00496E10
00541B65 A1C0715800 mov eax, dword ptr [$005871C0]
00541B6A 8B0485F47A5800 mov eax, [$587AF4+eax*4]
00541B71 898598FAFFFF mov [ebp+$FFFFFA98], eax
00541B77 C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
00541B7E 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
00541B84 A1BC525800 mov eax, dword ptr [$005852BC]
00541B89 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00541B8B 8B8080000000 mov eax, [eax+$0080]
00541B91 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
00541B93 E87852F5FF call 00496E10
00541B98 A1C0715800 mov eax, dword ptr [$005871C0]
00541B9D 40 inc eax
00541B9E 8B1578715800 mov edx, [$00587178]
00541BA4 83EA05 sub edx, +$05
00541BA7 3BC2 cmp eax, edx
00541BA9 7F38 jnle 00541BE3
00541BAB A1C0715800 mov eax, dword ptr [$005871C0]
00541BB0 8B0485F87A5800 mov eax, [$587AF8+eax*4]
00541BB7 898598FAFFFF mov [ebp+$FFFFFA98], eax
00541BBD C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
00541BC4 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
00541BCA A1BC525800 mov eax, dword ptr [$005852BC]
00541BCF 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00541BD1 8B8080000000 mov eax, [eax+$0080]
00541BD7 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
00541BD9 E83252F5FF call 00496E10
00541BDE E9AD010000 jmp 00541D90
00541BE3 A178715800 mov eax, dword ptr [$00587178]
00541BE8 40 inc eax

* Reference to: system.@RandInt;
|
00541BE9 E83A12ECFF call 00402E28

* Reference to GlobalVar_005871C4
|
00541BEE A3C4715800 mov dword ptr [$005871C4], eax
00541BF3 EB10 jmp 00541C05
00541BF5 A178715800 mov eax, dword ptr [$00587178]
00541BFA 40 inc eax

* Reference to: system.@RandInt;
|
00541BFB E82812ECFF call 00402E28

* Reference to GlobalVar_005871C4
|
00541C00 A3C4715800 mov dword ptr [$005871C4], eax
00541C05 BEE0455400 mov esi, $005445E0
00541C0A 8DBD30FCFFFF lea edi, [ebp+$FFFFFC30]
00541C10 B908000000 mov ecx, $00000008
00541C15 F3 rep
00541C16 A5 movsd
00541C17 A1C0715800 mov eax, dword ptr [$005871C0]
00541C1C 8B1485F47A5800 mov edx, [$587AF4+eax*4]
00541C23 8D853CFAFFFF lea eax, [ebp+$FFFFFA3C]
00541C29 B120 mov cl, $20

* Reference to: system.@SetElem;
|
00541C2B E88413ECFF call 00402FB4
00541C30 8D853CFAFFFF lea eax, [ebp+$FFFFFA3C]
00541C36 50 push eax
00541C37 8D9538FAFFFF lea edx, [ebp+$FFFFFA38]
00541C3D 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.fE1 : TEdit
|
00541C40 8B8084050000 mov eax, [eax+$0584]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541C46 E81142EFFF call 00435E5C
00541C4B 8B8538FAFFFF mov eax, [ebp+$FFFFFA38]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541C51 E8AE81ECFF call 00409E04
00541C56 8BD0 mov edx, eax
00541C58 8D8518FAFFFF lea eax, [ebp+$FFFFFA18]
00541C5E B120 mov cl, $20

* Reference to: system.@SetElem;
|
00541C60 E84F13ECFF call 00402FB4
00541C65 8D9514FAFFFF lea edx, [ebp+$FFFFFA14]
00541C6B 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE2 : TEdit
|
00541C6E 8B8088050000 mov eax, [eax+$0588]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541C74 E8E341EFFF call 00435E5C
00541C79 8B8514FAFFFF mov eax, [ebp+$FFFFFA14]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541C7F E88081ECFF call 00409E04
00541C84 8BD8 mov ebx, eax
00541C86 81FBFF000000 cmp ebx, $000000FF
00541C8C 7707 jnbe 00541C95
00541C8E 0FAB9D18FAFFFF bts [ebp+$FFFFFA18], ebx
00541C95 8D9510FAFFFF lea edx, [ebp+$FFFFFA10]
00541C9B 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE3 : TEdit
|
00541C9E 8B808C050000 mov eax, [eax+$058C]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541CA4 E8B341EFFF call 00435E5C
00541CA9 8B8510FAFFFF mov eax, [ebp+$FFFFFA10]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541CAF E85081ECFF call 00409E04
00541CB4 8BD8 mov ebx, eax
00541CB6 81FBFF000000 cmp ebx, $000000FF
00541CBC 7707 jnbe 00541CC5
00541CBE 0FAB9D18FAFFFF bts [ebp+$FFFFFA18], ebx
00541CC5 8D950CFAFFFF lea edx, [ebp+$FFFFFA0C]
00541CCB 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE4 : TEdit
|
00541CCE 8B8090050000 mov eax, [eax+$0590]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541CD4 E88341EFFF call 00435E5C
00541CD9 8B850CFAFFFF mov eax, [ebp+$FFFFFA0C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541CDF E82081ECFF call 00409E04
00541CE4 8BD8 mov ebx, eax
00541CE6 81FBFF000000 cmp ebx, $000000FF
00541CEC 7707 jnbe 00541CF5
00541CEE 0FAB9D18FAFFFF bts [ebp+$FFFFFA18], ebx
00541CF5 8D9508FAFFFF lea edx, [ebp+$FFFFFA08]
00541CFB 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.FE5 : TEdit
|
00541CFE 8B8094050000 mov eax, [eax+$0594]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00541D04 E85341EFFF call 00435E5C
00541D09 8B8508FAFFFF mov eax, [ebp+$FFFFFA08]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541D0F E8F080ECFF call 00409E04
00541D14 8BD8 mov ebx, eax
00541D16 81FBFF000000 cmp ebx, $000000FF
00541D1C 7707 jnbe 00541D25
00541D1E 0FAB9D18FAFFFF bts [ebp+$FFFFFA18], ebx
00541D25 8D9518FAFFFF lea edx, [ebp+$FFFFFA18]
00541D2B 58 pop eax
00541D2C B120 mov cl, $20

* Reference to: system.@SetUnion;
|
00541D2E E81113ECFF call 00403044
00541D33 8D953CFAFFFF lea edx, [ebp+$FFFFFA3C]
00541D39 8D8530FCFFFF lea eax, [ebp+$FFFFFC30]
00541D3F B120 mov cl, $20

* Reference to: system.@SetUnion;
|
00541D41 E8FE12ECFF call 00403044
00541D46 A1C4715800 mov eax, dword ptr [$005871C4]
00541D4B 3DFF000000 cmp eax, $000000FF
00541D50 7707 jnbe 00541D59
00541D52 0FA38530FCFFFF bt [ebp+$FFFFFC30], eax
00541D59 0F92C0 setb al
00541D5C 3C01 cmp al, $01
00541D5E 0F8491FEFFFF jz 00541BF5
00541D64 A1C4715800 mov eax, dword ptr [$005871C4]
00541D69 898598FAFFFF mov [ebp+$FFFFFA98], eax
00541D6F C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
00541D76 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
00541D7C A1BC525800 mov eax, dword ptr [$005852BC]
00541D81 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00541D83 8B8080000000 mov eax, [eax+$0080]
00541D89 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
00541D8B E88050F5FF call 00496E10
00541D90 8305C071580002 add dword ptr [$005871C0], +$02

* Reference to Tfrdata instance
|
00541D97 A1BC525800 mov eax, dword ptr [$005852BC]
00541D9C 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00541D9E 8B8080000000 mov eax, [eax+$0080]

* Reference to: db.TDataSet.First(TDataSet);
| or: db.TDataSet.Last(TDataSet);
|
00541DA4 E85746F5FF call 00496400
00541DA9 C705B471580001000000 mov dword ptr [$005871B4], $00000001
00541DB3 E997000000 jmp 00541E4F

* Reference to Tfrdata instance
|
00541DB8 A1BC525800 mov eax, dword ptr [$005852BC]
00541DBD 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00541DBF 8B8080000000 mov eax, [eax+$0080]

* Possible String Reference to: 'Numbers'
|
00541DC5 BA08465400 mov edx, $00544608

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
00541DCA E8D533F5FF call 004951A4
00541DCF 8B10 mov edx, [eax]

* Reference to method TTable.PSGetIndexDefs(TIndexOptions)
|
00541DD1 FF5254 call dword ptr [edx+$54]

* Reference to GlobalVar_005871B8
|
00541DD4 A3B8715800 mov dword ptr [$005871B8], eax
00541DD9 833DB87158000A cmp dword ptr [$005871B8], +$0A
00541DE0 7D2E jnl 00541E10
00541DE2 8D9504FAFFFF lea edx, [ebp+$FFFFFA04]
00541DE8 A1B8715800 mov eax, dword ptr [$005871B8]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00541DED E8E27FECFF call 00409DD4
00541DF2 8B8D04FAFFFF mov ecx, [ebp+$FFFFFA04]
00541DF8 A1B4715800 mov eax, dword ptr [$005871B4]
00541DFD 8D048508725800 lea eax, [$587208+eax*4]
00541E04 BA7C445400 mov edx, $0054447C

* Reference to: system.@LStrCat3;
|
00541E09 E84224ECFF call 00404250
00541E0E EB27 jmp 00541E37
00541E10 8D9500FAFFFF lea edx, [ebp+$FFFFFA00]
00541E16 A1B8715800 mov eax, dword ptr [$005871B8]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00541E1B E8B47FECFF call 00409DD4
00541E20 8B9500FAFFFF mov edx, [ebp+$FFFFFA00]
00541E26 A1B4715800 mov eax, dword ptr [$005871B4]
00541E2B 8D048508725800 lea eax, [$587208+eax*4]

* Reference to: system.@LStrAsg;
|
00541E32 E8A121ECFF call 00403FD8

* Reference to Tfrdata instance
|
00541E37 A1BC525800 mov eax, dword ptr [$005852BC]
00541E3C 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00541E3E 8B8080000000 mov eax, [eax+$0080]

* Reference to: db.TDataSet.Next(TDataSet);
|
00541E44 E88348F5FF call 004966CC
00541E49 FF05B4715800 inc dword ptr [$005871B4]

* Reference to Tfrdata instance
|
00541E4F A1BC525800 mov eax, dword ptr [$005852BC]
00541E54 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00541E56 8B8080000000 mov eax, [eax+$0080]

* Reference to field TTable.Eof : Boolean
|
00541E5C 80B89100000000 cmp byte ptr [eax+$0091], $00
00541E63 0F844FFFFFFF jz 00541DB8
00541E69 803D0A72580074 cmp byte ptr [$0058720A], $74
00541E70 0F8596000000 jnz 00541F0C
00541E76 FF350C725800 push dword ptr [$0058720C]
00541E7C 6888445400 push $00544488
00541E81 FF3510725800 push dword ptr [$00587210]
00541E87 6888445400 push $00544488
00541E8C FF3514725800 push dword ptr [$00587214]
00541E92 6888445400 push $00544488
00541E97 FF3518725800 push dword ptr [$00587218]
00541E9D 6888445400 push $00544488
00541EA2 FF351C725800 push dword ptr [$0058721C]
00541EA8 6888445400 push $00544488
00541EAD FF3520725800 push dword ptr [$00587220]
00541EB3 6888445400 push $00544488
00541EB8 FF3524725800 push dword ptr [$00587224]
00541EBE 8D45DC lea eax, [ebp-$24]
00541EC1 BA0D000000 mov edx, $0000000D

* Reference to: system.@LStrCatN;
|
00541EC6 E8F923ECFF call 004042C4
00541ECB 8D8554FCFFFF lea eax, [ebp+$FFFFFC54]
00541ED1 8B55DC mov edx, [ebp-$24]
00541ED4 B9FF000000 mov ecx, $000000FF

* Reference to: system.@LStrToString;
|
00541ED9 E80223ECFF call 004041E0
00541EDE 8D9554FCFFFF lea edx, [ebp+$FFFFFC54]
00541EE4 B83CBA5800 mov eax, $0058BA3C
00541EE9 B114 mov cl, $14

* Reference to: system.@PStrNCpy;
|
00541EEB E8F40DECFF call 00402CE4
00541EF0 BA3CBA5800 mov edx, $0058BA3C
00541EF5 B854BA5800 mov eax, $0058BA54

* Reference to: system.@WriteRec;
|
00541EFA E82D51ECFF call 0040702C

* Reference to: System.Proc_004028A8
|
00541EFF E8A409ECFF call 004028A8
00541F04 FF45F0 inc dword ptr [ebp-$10]
00541F07 E91F010000 jmp 0054202B
00541F0C A10C725800 mov eax, dword ptr [$0058720C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541F11 E8EE7EECFF call 00409E04

* Reference to GlobalVar_005872A0
|
00541F16 A3A0725800 mov dword ptr [$005872A0], eax
00541F1B A110725800 mov eax, dword ptr [$00587210]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541F20 E8DF7EECFF call 00409E04

* Reference to GlobalVar_005872A4
|
00541F25 A3A4725800 mov dword ptr [$005872A4], eax
00541F2A A114725800 mov eax, dword ptr [$00587214]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541F2F E8D07EECFF call 00409E04

* Reference to GlobalVar_005872A8
|
00541F34 A3A8725800 mov dword ptr [$005872A8], eax
00541F39 A118725800 mov eax, dword ptr [$00587218]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541F3E E8C17EECFF call 00409E04

* Reference to GlobalVar_005872AC
|
00541F43 A3AC725800 mov dword ptr [$005872AC], eax
00541F48 A11C725800 mov eax, dword ptr [$0058721C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541F4D E8B27EECFF call 00409E04

* Reference to GlobalVar_005872B0
|
00541F52 A3B0725800 mov dword ptr [$005872B0], eax
00541F57 A120725800 mov eax, dword ptr [$00587220]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541F5C E8A37EECFF call 00409E04

* Reference to GlobalVar_005872B4
|
00541F61 A3B4725800 mov dword ptr [$005872B4], eax
00541F66 A124725800 mov eax, dword ptr [$00587224]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00541F6B E8947EECFF call 00409E04

* Reference to GlobalVar_005872B8
|
00541F70 A3B8725800 mov dword ptr [$005872B8], eax
00541F75 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.btfilter : TButton
|
00541F78 8B9828090000 mov ebx, [eax+$0928]
00541F7E 8B55F8 mov edx, [ebp-$08]

* Reference to field TButton.OFFS_010C
|
00541F81 8B830C010000 mov eax, [ebx+$010C]

* Possible reference to virtual method TButton.OFFS_0108
|
00541F87 FF9308010000 call dword ptr [ebx+$0108]
00541F8D 803D0972580074 cmp byte ptr [$00587209], $74
00541F94 0F8591000000 jnz 0054202B
00541F9A FF350C725800 push dword ptr [$0058720C]
00541FA0 6888445400 push $00544488
00541FA5 FF3510725800 push dword ptr [$00587210]
00541FAB 6888445400 push $00544488
00541FB0 FF3514725800 push dword ptr [$00587214]
00541FB6 6888445400 push $00544488
00541FBB FF3518725800 push dword ptr [$00587218]
00541FC1 6888445400 push $00544488
00541FC6 FF351C725800 push dword ptr [$0058721C]
00541FCC 6888445400 push $00544488
00541FD1 FF3520725800 push dword ptr [$00587220]
00541FD7 6888445400 push $00544488
00541FDC FF3524725800 push dword ptr [$00587224]
00541FE2 8D45DC lea eax, [ebp-$24]
00541FE5 BA0D000000 mov edx, $0000000D

* Reference to: system.@LStrCatN;
|
00541FEA E8D522ECFF call 004042C4
00541FEF 8D8554FCFFFF lea eax, [ebp+$FFFFFC54]
00541FF5 8B55DC mov edx, [ebp-$24]
00541FF8 B9FF000000 mov ecx, $000000FF

* Reference to: system.@LStrToString;
|
00541FFD E8DE21ECFF call 004041E0
00542002 8D9554FCFFFF lea edx, [ebp+$FFFFFC54]
00542008 B83CBA5800 mov eax, $0058BA3C
0054200D B114 mov cl, $14

* Reference to: system.@PStrNCpy;
|
0054200F E8D00CECFF call 00402CE4
00542014 BA3CBA5800 mov edx, $0058BA3C
00542019 B854BA5800 mov eax, $0058BA54

* Reference to: system.@WriteRec;
|
0054201E E80950ECFF call 0040702C

* Reference to: System.Proc_004028A8
|
00542023 E88008ECFF call 004028A8
00542028 FF45F0 inc dword ptr [ebp-$10]
0054202B 33D2 xor edx, edx
0054202D 33C0 xor eax, eax

* Reference to: Unit_004BD734.Proc_004BD9A4
|
0054202F E870B9F7FF call 004BD9A4
00542034 A178715800 mov eax, dword ptr [$00587178]
00542039 83E805 sub eax, +$05
0054203C 3B05C0715800 cmp eax, [$005871C0]
00542042 0F8D93F9FFFF jnl 005419DB
00542048 33D2 xor edx, edx
0054204A 83C8FF or eax, -$01

* Reference to: Unit_004BD734.Proc_004BD9A4
|
0054204D E852B9F7FF call 004BD9A4
00542052 8D95FCF9FFFF lea edx, [ebp+$FFFFF9FC]
00542058 A1BC715800 mov eax, dword ptr [$005871BC]
0054205D 2B45F0 sub eax, dword ptr [ebp-$10]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00542060 E86F7DECFF call 00409DD4
00542065 8D85FCF9FFFF lea eax, [ebp+$FFFFF9FC]

* Possible String Reference to: '注'
|
0054206B BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
00542070 E89721ECFF call 0040420C
00542075 8B95FCF9FFFF mov edx, [ebp+$FFFFF9FC]
0054207B 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Label9 : TLabel
|
0054207E 8B8018030000 mov eax, [eax+$0318]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
00542084 E8033EEFFF call 00435E8C
00542089 8D95F8F9FFFF lea edx, [ebp+$FFFFF9F8]
0054208F 8B45F0 mov eax, [ebp-$10]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00542092 E83D7DECFF call 00409DD4
00542097 8D85F8F9FFFF lea eax, [ebp+$FFFFF9F8]

* Possible String Reference to: '注'
|
0054209D BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
005420A2 E86521ECFF call 0040420C
005420A7 8B95F8F9FFFF mov edx, [ebp+$FFFFF9F8]
005420AD 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.sumLb : TLabel
|
005420B0 8B80A4060000 mov eax, [eax+$06A4]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
005420B6 E8D13DEFFF call 00435E8C
005420BB 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
005420BE 8B80F4020000 mov eax, [eax+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
005420C4 8B8044020000 mov eax, [eax+$0244]
005420CA 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.TS6 : TTabSheet
|
005420CD 3B8208030000 cmp eax, [edx+$0308]
005420D3 0F859C0D0000 jnz 00542E75
005420D9 8D95F4F9FFFF lea edx, [ebp+$FFFFF9F4]
005420DF 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe1 : TEdit
|
005420E2 8B80A8050000 mov eax, [eax+$05A8]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005420E8 E86F3DEFFF call 00435E5C
005420ED 8B85F4F9FFFF mov eax, [ebp+$FFFFF9F4]

* Reference to: system.@LStrLen:Integer;
| or: system.@DynArrayLength;
| or: system.DynArraySize(Pointer):Integer;
|
005420F3 E80C21ECFF call 00404204
005420F8 83F802 cmp eax, +$02
005420FB 7C6C jl 00542169
005420FD 8D95F0F9FFFF lea edx, [ebp+$FFFFF9F0]
00542103 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe2 : TEdit
|
00542106 8B80AC050000 mov eax, [eax+$05AC]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054210C E84B3DEFFF call 00435E5C
00542111 8B85F0F9FFFF mov eax, [ebp+$FFFFF9F0]

* Reference to: system.@LStrLen:Integer;
| or: system.@DynArrayLength;
| or: system.DynArraySize(Pointer):Integer;
|
00542117 E8E820ECFF call 00404204
0054211C 83F802 cmp eax, +$02
0054211F 7C48 jl 00542169
00542121 8D95ECF9FFFF lea edx, [ebp+$FFFFF9EC]
00542127 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe3 : TEdit
|
0054212A 8B80B0050000 mov eax, [eax+$05B0]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542130 E8273DEFFF call 00435E5C
00542135 8B85ECF9FFFF mov eax, [ebp+$FFFFF9EC]

* Reference to: system.@LStrLen:Integer;
| or: system.@DynArrayLength;
| or: system.DynArraySize(Pointer):Integer;
|
0054213B E8C420ECFF call 00404204
00542140 83F802 cmp eax, +$02
00542143 7C24 jl 00542169
00542145 8D95E8F9FFFF lea edx, [ebp+$FFFFF9E8]
0054214B 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe4 : TEdit
|
0054214E 8B80B4050000 mov eax, [eax+$05B4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542154 E8033DEFFF call 00435E5C
00542159 8B85E8F9FFFF mov eax, [ebp+$FFFFF9E8]

* Reference to: system.@LStrLen:Integer;
| or: system.@DynArrayLength;
| or: system.DynArraySize(Pointer):Integer;
|
0054215F E8A020ECFF call 00404204
00542164 83F802 cmp eax, +$02
00542167 7D13 jnl 0054217C
00542169 33C9 xor ecx, ecx
0054216B 33D2 xor edx, edx

* Possible String Reference to: '输入号码有误'
|
0054216D B878455400 mov eax, $00544578

* Reference to: Unit_004BD734.Proc_004BD86C
|
00542172 E8F5B6F7FF call 004BD86C
00542177 E96D1E0000 jmp 00543FE9
0054217C 33C0 xor eax, eax
0054217E 55 push ebp
0054217F 6810225400 push $00542210

***** TRY
|
00542184 64FF30 push dword ptr fs:[eax]
00542187 648920 mov fs:[eax], esp
0054218A 8D95E4F9FFFF lea edx, [ebp+$FFFFF9E4]
00542190 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe1 : TEdit
|
00542193 8B80A8050000 mov eax, [eax+$05A8]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542199 E8BE3CEFFF call 00435E5C
0054219E 8B85E4F9FFFF mov eax, [ebp+$FFFFF9E4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005421A4 E85B7CECFF call 00409E04
005421A9 8D95E0F9FFFF lea edx, [ebp+$FFFFF9E0]
005421AF 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe2 : TEdit
|
005421B2 8B80AC050000 mov eax, [eax+$05AC]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005421B8 E89F3CEFFF call 00435E5C
005421BD 8B85E0F9FFFF mov eax, [ebp+$FFFFF9E0]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005421C3 E83C7CECFF call 00409E04
005421C8 8D95DCF9FFFF lea edx, [ebp+$FFFFF9DC]
005421CE 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe3 : TEdit
|
005421D1 8B80B0050000 mov eax, [eax+$05B0]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005421D7 E8803CEFFF call 00435E5C
005421DC 8B85DCF9FFFF mov eax, [ebp+$FFFFF9DC]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005421E2 E81D7CECFF call 00409E04
005421E7 8D95D8F9FFFF lea edx, [ebp+$FFFFF9D8]
005421ED 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe4 : TEdit
|
005421F0 8B80B4050000 mov eax, [eax+$05B4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005421F6 E8613CEFFF call 00435E5C
005421FB 8B85D8F9FFFF mov eax, [ebp+$FFFFF9D8]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542201 E8FE7BECFF call 00409E04
00542206 33C0 xor eax, eax
00542208 5A pop edx
00542209 59 pop ecx
0054220A 59 pop ecx
0054220B 648910 mov fs:[eax], edx
0054220E EB22 jmp 00542232

* Reference to: system.@HandleAnyException;
|
00542210 E9CF14ECFF jmp 004036E4
00542215 33C9 xor ecx, ecx
00542217 33D2 xor edx, edx

* Possible String Reference to: '输入号码有误'
|
00542219 B878455400 mov eax, $00544578

* Reference to: Unit_004BD734.Proc_004BD86C
|
0054221E E849B6F7FF call 004BD86C

* Reference to: system.@DoneExcept;
|
00542223 E81818ECFF call 00403A40
00542228 E9BC1D0000 jmp 00543FE9

* Reference to: system.@DoneExcept;
|
0054222D E80E18ECFF call 00403A40

****** END
|
00542232 8D95D4F9FFFF lea edx, [ebp+$FFFFF9D4]
00542238 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe1 : TEdit
|
0054223B 8B80A8050000 mov eax, [eax+$05A8]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542241 E8163CEFFF call 00435E5C
00542246 8B85D4F9FFFF mov eax, [ebp+$FFFFF9D4]
0054224C 50 push eax
0054224D 8D95D0F9FFFF lea edx, [ebp+$FFFFF9D0]
00542253 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe2 : TEdit
|
00542256 8B80AC050000 mov eax, [eax+$05AC]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054225C E8FB3BEFFF call 00435E5C
00542261 8B95D0F9FFFF mov edx, [ebp+$FFFFF9D0]
00542267 58 pop eax

* Reference to: system.@LStrCmp;
|
00542268 E8A720ECFF call 00404314
0054226D 0F8439010000 jz 005423AC
00542273 8D95CCF9FFFF lea edx, [ebp+$FFFFF9CC]
00542279 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe1 : TEdit
|
0054227C 8B80A8050000 mov eax, [eax+$05A8]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542282 E8D53BEFFF call 00435E5C
00542287 8B85CCF9FFFF mov eax, [ebp+$FFFFF9CC]
0054228D 50 push eax
0054228E 8D95C8F9FFFF lea edx, [ebp+$FFFFF9C8]
00542294 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe3 : TEdit
|
00542297 8B80B0050000 mov eax, [eax+$05B0]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054229D E8BA3BEFFF call 00435E5C
005422A2 8B95C8F9FFFF mov edx, [ebp+$FFFFF9C8]
005422A8 58 pop eax

* Reference to: system.@LStrCmp;
|
005422A9 E86620ECFF call 00404314
005422AE 0F84F8000000 jz 005423AC
005422B4 8D95C4F9FFFF lea edx, [ebp+$FFFFF9C4]
005422BA 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe1 : TEdit
|
005422BD 8B80A8050000 mov eax, [eax+$05A8]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005422C3 E8943BEFFF call 00435E5C
005422C8 8B85C4F9FFFF mov eax, [ebp+$FFFFF9C4]
005422CE 50 push eax
005422CF 8D95C0F9FFFF lea edx, [ebp+$FFFFF9C0]
005422D5 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe4 : TEdit
|
005422D8 8B80B4050000 mov eax, [eax+$05B4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005422DE E8793BEFFF call 00435E5C
005422E3 8B95C0F9FFFF mov edx, [ebp+$FFFFF9C0]
005422E9 58 pop eax

* Reference to: system.@LStrCmp;
|
005422EA E82520ECFF call 00404314
005422EF 0F84B7000000 jz 005423AC
005422F5 8D95BCF9FFFF lea edx, [ebp+$FFFFF9BC]
005422FB 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe2 : TEdit
|
005422FE 8B80AC050000 mov eax, [eax+$05AC]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542304 E8533BEFFF call 00435E5C
00542309 8B85BCF9FFFF mov eax, [ebp+$FFFFF9BC]
0054230F 50 push eax
00542310 8D95B8F9FFFF lea edx, [ebp+$FFFFF9B8]
00542316 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe3 : TEdit
|
00542319 8B80B0050000 mov eax, [eax+$05B0]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054231F E8383BEFFF call 00435E5C
00542324 8B95B8F9FFFF mov edx, [ebp+$FFFFF9B8]
0054232A 58 pop eax

* Reference to: system.@LStrCmp;
|
0054232B E8E41FECFF call 00404314
00542330 747A jz 005423AC
00542332 8D95B4F9FFFF lea edx, [ebp+$FFFFF9B4]
00542338 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe2 : TEdit
|
0054233B 8B80AC050000 mov eax, [eax+$05AC]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542341 E8163BEFFF call 00435E5C
00542346 8B85B4F9FFFF mov eax, [ebp+$FFFFF9B4]
0054234C 50 push eax
0054234D 8D95B0F9FFFF lea edx, [ebp+$FFFFF9B0]
00542353 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe4 : TEdit
|
00542356 8B80B4050000 mov eax, [eax+$05B4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054235C E8FB3AEFFF call 00435E5C
00542361 8B95B0F9FFFF mov edx, [ebp+$FFFFF9B0]
00542367 58 pop eax

* Reference to: system.@LStrCmp;
|
00542368 E8A71FECFF call 00404314
0054236D 743D jz 005423AC
0054236F 8D95ACF9FFFF lea edx, [ebp+$FFFFF9AC]
00542375 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe3 : TEdit
|
00542378 8B80B0050000 mov eax, [eax+$05B0]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054237E E8D93AEFFF call 00435E5C
00542383 8B85ACF9FFFF mov eax, [ebp+$FFFFF9AC]
00542389 50 push eax
0054238A 8D95A8F9FFFF lea edx, [ebp+$FFFFF9A8]
00542390 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe4 : TEdit
|
00542393 8B80B4050000 mov eax, [eax+$05B4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542399 E8BE3AEFFF call 00435E5C
0054239E 8B95A8F9FFFF mov edx, [ebp+$FFFFF9A8]
005423A4 58 pop eax

* Reference to: system.@LStrCmp;
|
005423A5 E86A1FECFF call 00404314
005423AA 7513 jnz 005423BF
005423AC 33C9 xor ecx, ecx
005423AE 33D2 xor edx, edx

* Possible String Reference to: '输入号码重复'
|
005423B0 B890455400 mov eax, $00544590

* Reference to: Unit_004BD734.Proc_004BD86C
|
005423B5 E8B2B4F7FF call 004BD86C
005423BA E92A1C0000 jmp 00543FE9
005423BF 8D95A4F9FFFF lea edx, [ebp+$FFFFF9A4]
005423C5 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe1 : TEdit
|
005423C8 8B80A8050000 mov eax, [eax+$05A8]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005423CE E8893AEFFF call 00435E5C
005423D3 8B85A4F9FFFF mov eax, [ebp+$FFFFF9A4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005423D9 E8267AECFF call 00409E04
005423DE 3B0578715800 cmp eax, [$00587178]
005423E4 0F8F0D010000 jnle 005424F7
005423EA 8D95A0F9FFFF lea edx, [ebp+$FFFFF9A0]
005423F0 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe1 : TEdit
|
005423F3 8B80A8050000 mov eax, [eax+$05A8]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005423F9 E85E3AEFFF call 00435E5C
005423FE 8B85A0F9FFFF mov eax, [ebp+$FFFFF9A0]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542404 E8FB79ECFF call 00409E04
00542409 85C0 test eax, eax
0054240B 0F84E6000000 jz 005424F7
00542411 8D959CF9FFFF lea edx, [ebp+$FFFFF99C]
00542417 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe2 : TEdit
|
0054241A 8B80AC050000 mov eax, [eax+$05AC]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542420 E8373AEFFF call 00435E5C
00542425 8B859CF9FFFF mov eax, [ebp+$FFFFF99C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0054242B E8D479ECFF call 00409E04
00542430 3B0578715800 cmp eax, [$00587178]
00542436 0F8FBB000000 jnle 005424F7
0054243C 8D9598F9FFFF lea edx, [ebp+$FFFFF998]
00542442 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe2 : TEdit
|
00542445 8B80AC050000 mov eax, [eax+$05AC]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054244B E80C3AEFFF call 00435E5C
00542450 8B8598F9FFFF mov eax, [ebp+$FFFFF998]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542456 E8A979ECFF call 00409E04
0054245B 85C0 test eax, eax
0054245D 0F8494000000 jz 005424F7
00542463 8D9594F9FFFF lea edx, [ebp+$FFFFF994]
00542469 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe3 : TEdit
|
0054246C 8B80B0050000 mov eax, [eax+$05B0]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542472 E8E539EFFF call 00435E5C
00542477 8B8594F9FFFF mov eax, [ebp+$FFFFF994]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0054247D E88279ECFF call 00409E04
00542482 3B0578715800 cmp eax, [$00587178]
00542488 7F6D jnle 005424F7
0054248A 8D9590F9FFFF lea edx, [ebp+$FFFFF990]
00542490 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe3 : TEdit
|
00542493 8B80B0050000 mov eax, [eax+$05B0]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542499 E8BE39EFFF call 00435E5C
0054249E 8B8590F9FFFF mov eax, [ebp+$FFFFF990]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005424A4 E85B79ECFF call 00409E04
005424A9 85C0 test eax, eax
005424AB 744A jz 005424F7
005424AD 8D958CF9FFFF lea edx, [ebp+$FFFFF98C]
005424B3 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe4 : TEdit
|
005424B6 8B80B4050000 mov eax, [eax+$05B4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005424BC E89B39EFFF call 00435E5C
005424C1 8B858CF9FFFF mov eax, [ebp+$FFFFF98C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005424C7 E83879ECFF call 00409E04
005424CC 3B0578715800 cmp eax, [$00587178]
005424D2 7F23 jnle 005424F7
005424D4 8D9588F9FFFF lea edx, [ebp+$FFFFF988]
005424DA 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe4 : TEdit
|
005424DD 8B80B4050000 mov eax, [eax+$05B4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005424E3 E87439EFFF call 00435E5C
005424E8 8B8588F9FFFF mov eax, [ebp+$FFFFF988]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005424EE E81179ECFF call 00409E04
005424F3 85C0 test eax, eax
005424F5 7513 jnz 0054250A
005424F7 33C9 xor ecx, ecx
005424F9 33D2 xor edx, edx

* Possible String Reference to: '输入号码超出范围'
|
005424FB B8A8455400 mov eax, $005445A8

* Reference to: Unit_004BD734.Proc_004BD86C
|
00542500 E867B3F7FF call 004BD86C
00542505 E9DF1A0000 jmp 00543FE9
0054250A 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.CB1 : TComboBox
|
0054250D 8B8098050000 mov eax, [eax+$0598]

* Reference to: stdctrls.TCustomComboBox.GetItemIndex(TCustomComboBox):Integer;
|
00542513 E890B1EEFF call 0042D6A8
00542518 40 inc eax
00542519 8945F4 mov [ebp-$0C], eax
0054251C 8B45F4 mov eax, [ebp-$0C]
0054251F 83C009 add eax, +$09
00542522 8945F0 mov [ebp-$10], eax
00542525 8D9584F9FFFF lea edx, [ebp+$FFFFF984]
0054252B 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe1 : TEdit
|
0054252E 8B80A8050000 mov eax, [eax+$05A8]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542534 E82339EFFF call 00435E5C
00542539 8B8584F9FFFF mov eax, [ebp+$FFFFF984]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0054253F E8C078ECFF call 00409E04
00542544 8BD8 mov ebx, eax
00542546 8B45F4 mov eax, [ebp-$0C]
00542549 8B55F0 mov edx, [ebp-$10]
0054254C 8D8D30FCFFFF lea ecx, [ebp+$FFFFFC30]
00542552 B420 mov ah, $20

* Reference to: system.@SetRange;
|
00542554 E87F0AECFF call 00402FD8
00542559 81FBFF000000 cmp ebx, $000000FF
0054255F 7707 jnbe 00542568
00542561 0FA39D30FCFFFF bt [ebp+$FFFFFC30], ebx
00542568 7313 jnb 0054257D
0054256A 33C9 xor ecx, ecx
0054256C 33D2 xor edx, edx

* Possible String Reference to: '输入的第1个号码在所选的区域范围内'
|
0054256E B818465400 mov eax, $00544618

* Reference to: Unit_004BD734.Proc_004BD86C
|
00542573 E8F4B2F7FF call 004BD86C
00542578 E96C1A0000 jmp 00543FE9
0054257D 8D9580F9FFFF lea edx, [ebp+$FFFFF980]
00542583 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe2 : TEdit
|
00542586 8B80AC050000 mov eax, [eax+$05AC]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054258C E8CB38EFFF call 00435E5C
00542591 8B8580F9FFFF mov eax, [ebp+$FFFFF980]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542597 E86878ECFF call 00409E04
0054259C 8BD8 mov ebx, eax
0054259E 8B45F4 mov eax, [ebp-$0C]
005425A1 8B55F0 mov edx, [ebp-$10]
005425A4 8D8D30FCFFFF lea ecx, [ebp+$FFFFFC30]
005425AA B420 mov ah, $20

* Reference to: system.@SetRange;
|
005425AC E8270AECFF call 00402FD8
005425B1 81FBFF000000 cmp ebx, $000000FF
005425B7 7707 jnbe 005425C0
005425B9 0FA39D30FCFFFF bt [ebp+$FFFFFC30], ebx
005425C0 7313 jnb 005425D5
005425C2 33C9 xor ecx, ecx
005425C4 33D2 xor edx, edx

* Possible String Reference to: '输入的第2个号码在所选的区域范围内'
|
005425C6 B844465400 mov eax, $00544644

* Reference to: Unit_004BD734.Proc_004BD86C
|
005425CB E89CB2F7FF call 004BD86C
005425D0 E9141A0000 jmp 00543FE9
005425D5 8D957CF9FFFF lea edx, [ebp+$FFFFF97C]
005425DB 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe3 : TEdit
|
005425DE 8B80B0050000 mov eax, [eax+$05B0]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005425E4 E87338EFFF call 00435E5C
005425E9 8B857CF9FFFF mov eax, [ebp+$FFFFF97C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005425EF E81078ECFF call 00409E04
005425F4 8BD8 mov ebx, eax
005425F6 8B45F4 mov eax, [ebp-$0C]
005425F9 8B55F0 mov edx, [ebp-$10]
005425FC 8D8D30FCFFFF lea ecx, [ebp+$FFFFFC30]
00542602 B420 mov ah, $20

* Reference to: system.@SetRange;
|
00542604 E8CF09ECFF call 00402FD8
00542609 81FBFF000000 cmp ebx, $000000FF
0054260F 7707 jnbe 00542618
00542611 0FA39D30FCFFFF bt [ebp+$FFFFFC30], ebx
00542618 7313 jnb 0054262D
0054261A 33C9 xor ecx, ecx
0054261C 33D2 xor edx, edx

* Possible String Reference to: '输入的第3个号码在所选的区域范围内'
|
0054261E B870465400 mov eax, $00544670

* Reference to: Unit_004BD734.Proc_004BD86C
|
00542623 E844B2F7FF call 004BD86C
00542628 E9BC190000 jmp 00543FE9
0054262D 8D9578F9FFFF lea edx, [ebp+$FFFFF978]
00542633 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe4 : TEdit
|
00542636 8B80B4050000 mov eax, [eax+$05B4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
0054263C E81B38EFFF call 00435E5C
00542641 8B8578F9FFFF mov eax, [ebp+$FFFFF978]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542647 E8B877ECFF call 00409E04
0054264C 8BD8 mov ebx, eax
0054264E 8B45F4 mov eax, [ebp-$0C]
00542651 8B55F0 mov edx, [ebp-$10]
00542654 8D8D30FCFFFF lea ecx, [ebp+$FFFFFC30]
0054265A B420 mov ah, $20

* Reference to: system.@SetRange;
|
0054265C E87709ECFF call 00402FD8
00542661 81FBFF000000 cmp ebx, $000000FF
00542667 7707 jnbe 00542670
00542669 0FA39D30FCFFFF bt [ebp+$FFFFFC30], ebx
00542670 7313 jnb 00542685
00542672 33C9 xor ecx, ecx
00542674 33D2 xor edx, edx

* Possible String Reference to: '输入的第4个号码在所选的区域范围内'
|
00542676 B89C465400 mov eax, $0054469C

* Reference to: Unit_004BD734.Proc_004BD86C
|
0054267B E8ECB1F7FF call 004BD86C
00542680 E964190000 jmp 00543FE9
00542685 8D9574F9FFFF lea edx, [ebp+$FFFFF974]
0054268B 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe1 : TEdit
|
0054268E 8B80A8050000 mov eax, [eax+$05A8]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542694 E8C337EFFF call 00435E5C
00542699 8B8574F9FFFF mov eax, [ebp+$FFFFF974]
0054269F 50 push eax
005426A0 8D9570F9FFFF lea edx, [ebp+$FFFFF970]
005426A6 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe2 : TEdit
|
005426A9 8B80AC050000 mov eax, [eax+$05AC]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005426AF E8A837EFFF call 00435E5C
005426B4 8B9570F9FFFF mov edx, [ebp+$FFFFF970]
005426BA 58 pop eax

* Reference to: system.@LStrCmp;
|
005426BB E8541CECFF call 00404314
005426C0 0F8439010000 jz 005427FF
005426C6 8D956CF9FFFF lea edx, [ebp+$FFFFF96C]
005426CC 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe1 : TEdit
|
005426CF 8B80A8050000 mov eax, [eax+$05A8]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005426D5 E88237EFFF call 00435E5C
005426DA 8B856CF9FFFF mov eax, [ebp+$FFFFF96C]
005426E0 50 push eax
005426E1 8D9568F9FFFF lea edx, [ebp+$FFFFF968]
005426E7 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe3 : TEdit
|
005426EA 8B80B0050000 mov eax, [eax+$05B0]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005426F0 E86737EFFF call 00435E5C
005426F5 8B9568F9FFFF mov edx, [ebp+$FFFFF968]
005426FB 58 pop eax

* Reference to: system.@LStrCmp;
|
005426FC E8131CECFF call 00404314
00542701 0F84F8000000 jz 005427FF
00542707 8D9564F9FFFF lea edx, [ebp+$FFFFF964]
0054270D 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe1 : TEdit
|
00542710 8B80A8050000 mov eax, [eax+$05A8]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542716 E84137EFFF call 00435E5C
0054271B 8B8564F9FFFF mov eax, [ebp+$FFFFF964]
00542721 50 push eax
00542722 8D9560F9FFFF lea edx, [ebp+$FFFFF960]
00542728 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe4 : TEdit
|
0054272B 8B80B4050000 mov eax, [eax+$05B4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542731 E82637EFFF call 00435E5C
00542736 8B9560F9FFFF mov edx, [ebp+$FFFFF960]
0054273C 58 pop eax

* Reference to: system.@LStrCmp;
|
0054273D E8D21BECFF call 00404314
00542742 0F84B7000000 jz 005427FF
00542748 8D955CF9FFFF lea edx, [ebp+$FFFFF95C]
0054274E 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe2 : TEdit
|
00542751 8B80AC050000 mov eax, [eax+$05AC]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542757 E80037EFFF call 00435E5C
0054275C 8B855CF9FFFF mov eax, [ebp+$FFFFF95C]
00542762 50 push eax
00542763 8D9558F9FFFF lea edx, [ebp+$FFFFF958]
00542769 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe3 : TEdit
|
0054276C 8B80B0050000 mov eax, [eax+$05B0]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542772 E8E536EFFF call 00435E5C
00542777 8B9558F9FFFF mov edx, [ebp+$FFFFF958]
0054277D 58 pop eax

* Reference to: system.@LStrCmp;
|
0054277E E8911BECFF call 00404314
00542783 747A jz 005427FF
00542785 8D9554F9FFFF lea edx, [ebp+$FFFFF954]
0054278B 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe2 : TEdit
|
0054278E 8B80AC050000 mov eax, [eax+$05AC]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542794 E8C336EFFF call 00435E5C
00542799 8B8554F9FFFF mov eax, [ebp+$FFFFF954]
0054279F 50 push eax
005427A0 8D9550F9FFFF lea edx, [ebp+$FFFFF950]
005427A6 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe4 : TEdit
|
005427A9 8B80B4050000 mov eax, [eax+$05B4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005427AF E8A836EFFF call 00435E5C
005427B4 8B9550F9FFFF mov edx, [ebp+$FFFFF950]
005427BA 58 pop eax

* Reference to: system.@LStrCmp;
|
005427BB E8541BECFF call 00404314
005427C0 743D jz 005427FF
005427C2 8D954CF9FFFF lea edx, [ebp+$FFFFF94C]
005427C8 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe3 : TEdit
|
005427CB 8B80B0050000 mov eax, [eax+$05B0]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005427D1 E88636EFFF call 00435E5C
005427D6 8B854CF9FFFF mov eax, [ebp+$FFFFF94C]
005427DC 50 push eax
005427DD 8D9548F9FFFF lea edx, [ebp+$FFFFF948]
005427E3 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe4 : TEdit
|
005427E6 8B80B4050000 mov eax, [eax+$05B4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005427EC E86B36EFFF call 00435E5C
005427F1 8B9548F9FFFF mov edx, [ebp+$FFFFF948]
005427F7 58 pop eax

* Reference to: system.@LStrCmp;
|
005427F8 E8171BECFF call 00404314
005427FD 7513 jnz 00542812
005427FF 33C9 xor ecx, ecx
00542801 33D2 xor edx, edx

* Possible String Reference to: '输入号码重复'
|
00542803 B890455400 mov eax, $00544590

* Reference to: Unit_004BD734.Proc_004BD86C
|
00542808 E85FB0F7FF call 004BD86C
0054280D E9D7170000 jmp 00543FE9
00542812 C745F401000000 mov dword ptr [ebp-$0C], $00000001
00542819 C745B01C7F5800 mov dword ptr [ebp-$50], $00587F1C
00542820 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.CB1 : TComboBox
|
00542823 8B8098050000 mov eax, [eax+$0598]

* Reference to: stdctrls.TCustomComboBox.GetItemIndex(TCustomComboBox):Integer;
|
00542829 E87AAEEEFF call 0042D6A8
0054282E 0345F4 add eax, [ebp-$0C]
00542831 83F80A cmp eax, +$0A
00542834 7D31 jnl 00542867
00542836 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.CB1 : TComboBox
|
00542839 8B8098050000 mov eax, [eax+$0598]

* Reference to: stdctrls.TCustomComboBox.GetItemIndex(TCustomComboBox):Integer;
|
0054283F E864AEEEFF call 0042D6A8
00542844 0345F4 add eax, [ebp-$0C]
00542847 8D9544F9FFFF lea edx, [ebp+$FFFFF944]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0054284D E88275ECFF call 00409DD4
00542852 8B8D44F9FFFF mov ecx, [ebp+$FFFFF944]
00542858 8B45B0 mov eax, [ebp-$50]
0054285B BA7C445400 mov edx, $0054447C

* Reference to: system.@LStrCat3;
|
00542860 E8EB19ECFF call 00404250
00542865 EB2A jmp 00542891
00542867 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.CB1 : TComboBox
|
0054286A 8B8098050000 mov eax, [eax+$0598]

* Reference to: stdctrls.TCustomComboBox.GetItemIndex(TCustomComboBox):Integer;
|
00542870 E833AEEEFF call 0042D6A8
00542875 0345F4 add eax, [ebp-$0C]
00542878 8D9540F9FFFF lea edx, [ebp+$FFFFF940]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
0054287E E85175ECFF call 00409DD4
00542883 8B9540F9FFFF mov edx, [ebp+$FFFFF940]
00542889 8B45B0 mov eax, [ebp-$50]

* Reference to: system.@LStrAsg;
|
0054288C E84717ECFF call 00403FD8
00542891 FF45F4 inc dword ptr [ebp-$0C]
00542894 8345B004 add dword ptr [ebp-$50], +$04
00542898 837DF40B cmp dword ptr [ebp-$0C], +$0B
0054289C 7582 jnz 00542820
0054289E 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Label8 : TLabel
|
005428A1 8B8014030000 mov eax, [eax+$0314]

* Possible String Reference to: '36注'
|
005428A7 BAC8465400 mov edx, $005446C8

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
005428AC E8DB35EFFF call 00435E8C
005428B1 33C0 xor eax, eax
005428B3 8945F0 mov [ebp-$10], eax
005428B6 8D9538F9FFFF lea edx, [ebp+$FFFFF938]

* Reference to TApplication instance
|
005428BC A1CC565800 mov eax, dword ptr [$005856CC]
005428C1 8B00 mov eax, [eax]

* Reference to: forms.TApplication.GetExeName(TApplication):AnsiString;
|
005428C3 E8E426F1FF call 00454FAC
005428C8 8B8538F9FFFF mov eax, [ebp+$FFFFF938]
005428CE 8D953CF9FFFF lea edx, [ebp+$FFFFF93C]

* Reference to: Unit_00408BD4.Proc_0040A240
|
005428D4 E86779ECFF call 0040A240
005428D9 8B953CF9FFFF mov edx, [ebp+$FFFFF93C]
005428DF B8FC715800 mov eax, $005871FC

* Possible String Reference to: 'Formula/F_Area.txt'
|
005428E4 B9D8465400 mov ecx, $005446D8

* Reference to: system.@LStrCat3;
|
005428E9 E86219ECFF call 00404250
005428EE 8B15FC715800 mov edx, [$005871FC]
005428F4 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@Assign(Text;Text;ShortString);
|
005428FA E8B340ECFF call 004069B2
005428FF 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: System.Proc_00406E8B
|
00542905 E88145ECFF call 00406E8B

* Reference to: System.Proc_004028A8
|
0054290A E899FFEBFF call 004028A8
0054290F 33D2 xor edx, edx
00542911 B824000000 mov eax, $00000024

* Reference to: Unit_004BD734.Proc_004BD9A4
|
00542916 E889B0F7FF call 004BD9A4
0054291B E9BA040000 jmp 00542DDA
00542920 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
00542926 E80D44ECFF call 00406D38

* Reference to GlobalVar_005871B4
|
0054292B A3B4715800 mov dword ptr [$005871B4], eax
00542930 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
00542936 E8FD43ECFF call 00406D38

* Reference to GlobalVar_005871B8
|
0054293B A3B8715800 mov dword ptr [$005871B8], eax
00542940 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLong;
| or: system.@ReadInt64;
|
00542946 E8ED43ECFF call 00406D38

* Reference to GlobalVar_005871BC
|
0054294B A3BC715800 mov dword ptr [$005871BC], eax
00542950 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@ReadLn;
|
00542956 E8CD44ECFF call 00406E28

* Reference to: System.Proc_004028A8
|
0054295B E848FFEBFF call 004028A8
00542960 6A01 push $01
00542962 8D8528F9FFFF lea eax, [ebp+$FFFFF928]

* Possible String Reference to: 'delete from tbhistmp'
|
00542968 BAC4455400 mov edx, $005445C4

* Reference to: system.@VarFromLStr(Variant;Variant;String);
|
0054296D E8962AECFF call 00405408
00542972 8D8D28F9FFFF lea ecx, [ebp+$FFFFF928]

* Reference to Tfrdata instance
|
00542978 A1BC525800 mov eax, dword ptr [$005852BC]
0054297D 8B00 mov eax, [eax]

* Reference to control Tfrdata.Qutmp : TQuery
|
0054297F 8B4068 mov eax, [eax+$68]
00542982 BA68000000 mov edx, $00000068

* Reference to: Unit_004BD734.Proc_004BDA9C
|
00542987 E810B1F7FF call 004BDA9C
0054298C A1B4715800 mov eax, dword ptr [$005871B4]
00542991 8B0485187F5800 mov eax, [$587F18+eax*4]
00542998 898598FAFFFF mov [ebp+$FFFFFA98], eax
0054299E C6859CFAFFFF0B mov byte ptr [ebp+$FFFFFA9C], $0B
005429A5 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
005429AB A1BC525800 mov eax, dword ptr [$005852BC]
005429B0 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
005429B2 8B8080000000 mov eax, [eax+$0080]
005429B8 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
005429BA E85144F5FF call 00496E10
005429BF A1B8715800 mov eax, dword ptr [$005871B8]
005429C4 8B0485187F5800 mov eax, [$587F18+eax*4]
005429CB 898598FAFFFF mov [ebp+$FFFFFA98], eax
005429D1 C6859CFAFFFF0B mov byte ptr [ebp+$FFFFFA9C], $0B
005429D8 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
005429DE A1BC525800 mov eax, dword ptr [$005852BC]
005429E3 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
005429E5 8B8080000000 mov eax, [eax+$0080]
005429EB 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
005429ED E81E44F5FF call 00496E10
005429F2 A1BC715800 mov eax, dword ptr [$005871BC]
005429F7 8B0485187F5800 mov eax, [$587F18+eax*4]
005429FE 898598FAFFFF mov [ebp+$FFFFFA98], eax
00542A04 C6859CFAFFFF0B mov byte ptr [ebp+$FFFFFA9C], $0B
00542A0B 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
00542A11 A1BC525800 mov eax, dword ptr [$005852BC]
00542A16 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00542A18 8B8080000000 mov eax, [eax+$0080]
00542A1E 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
00542A20 E8EB43F5FF call 00496E10
00542A25 8D9524F9FFFF lea edx, [ebp+$FFFFF924]
00542A2B 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe1 : TEdit
|
00542A2E 8B80A8050000 mov eax, [eax+$05A8]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542A34 E82334EFFF call 00435E5C
00542A39 8B8524F9FFFF mov eax, [ebp+$FFFFF924]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542A3F E8C073ECFF call 00409E04
00542A44 898598FAFFFF mov [ebp+$FFFFFA98], eax
00542A4A C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
00542A51 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
00542A57 A1BC525800 mov eax, dword ptr [$005852BC]
00542A5C 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00542A5E 8B8080000000 mov eax, [eax+$0080]
00542A64 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
00542A66 E8A543F5FF call 00496E10
00542A6B 8D9520F9FFFF lea edx, [ebp+$FFFFF920]
00542A71 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe2 : TEdit
|
00542A74 8B80AC050000 mov eax, [eax+$05AC]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542A7A E8DD33EFFF call 00435E5C
00542A7F 8B8520F9FFFF mov eax, [ebp+$FFFFF920]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542A85 E87A73ECFF call 00409E04
00542A8A 898598FAFFFF mov [ebp+$FFFFFA98], eax
00542A90 C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
00542A97 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
00542A9D A1BC525800 mov eax, dword ptr [$005852BC]
00542AA2 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00542AA4 8B8080000000 mov eax, [eax+$0080]
00542AAA 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
00542AAC E85F43F5FF call 00496E10
00542AB1 8D951CF9FFFF lea edx, [ebp+$FFFFF91C]
00542AB7 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe3 : TEdit
|
00542ABA 8B80B0050000 mov eax, [eax+$05B0]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542AC0 E89733EFFF call 00435E5C
00542AC5 8B851CF9FFFF mov eax, [ebp+$FFFFF91C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542ACB E83473ECFF call 00409E04
00542AD0 898598FAFFFF mov [ebp+$FFFFFA98], eax
00542AD6 C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
00542ADD 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
00542AE3 A1BC525800 mov eax, dword ptr [$005852BC]
00542AE8 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00542AEA 8B8080000000 mov eax, [eax+$0080]
00542AF0 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
00542AF2 E81943F5FF call 00496E10
00542AF7 8D9518F9FFFF lea edx, [ebp+$FFFFF918]
00542AFD 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.qe4 : TEdit
|
00542B00 8B80B4050000 mov eax, [eax+$05B4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542B06 E85133EFFF call 00435E5C
00542B0B 8B8518F9FFFF mov eax, [ebp+$FFFFF918]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542B11 E8EE72ECFF call 00409E04
00542B16 898598FAFFFF mov [ebp+$FFFFFA98], eax
00542B1C C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
00542B23 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
00542B29 A1BC525800 mov eax, dword ptr [$005852BC]
00542B2E 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00542B30 8B8080000000 mov eax, [eax+$0080]
00542B36 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
00542B38 E8D342F5FF call 00496E10

* Reference to Tfrdata instance
|
00542B3D A1BC525800 mov eax, dword ptr [$005852BC]
00542B42 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00542B44 8B8080000000 mov eax, [eax+$0080]

* Reference to: db.TDataSet.First(TDataSet);
| or: db.TDataSet.Last(TDataSet);
|
00542B4A E8B138F5FF call 00496400
00542B4F C705B471580001000000 mov dword ptr [$005871B4], $00000001
00542B59 E997000000 jmp 00542BF5

* Reference to Tfrdata instance
|
00542B5E A1BC525800 mov eax, dword ptr [$005852BC]
00542B63 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00542B65 8B8080000000 mov eax, [eax+$0080]

* Possible String Reference to: 'Numbers'
|
00542B6B BA08465400 mov edx, $00544608

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
00542B70 E82F26F5FF call 004951A4
00542B75 8B10 mov edx, [eax]

* Reference to method TTable.PSGetIndexDefs(TIndexOptions)
|
00542B77 FF5254 call dword ptr [edx+$54]

* Reference to GlobalVar_005871B8
|
00542B7A A3B8715800 mov dword ptr [$005871B8], eax
00542B7F 833DB87158000A cmp dword ptr [$005871B8], +$0A
00542B86 7D2E jnl 00542BB6
00542B88 8D9514F9FFFF lea edx, [ebp+$FFFFF914]
00542B8E A1B8715800 mov eax, dword ptr [$005871B8]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00542B93 E83C72ECFF call 00409DD4
00542B98 8B8D14F9FFFF mov ecx, [ebp+$FFFFF914]
00542B9E A1B4715800 mov eax, dword ptr [$005871B4]
00542BA3 8D048508725800 lea eax, [$587208+eax*4]
00542BAA BA7C445400 mov edx, $0054447C

* Reference to: system.@LStrCat3;
|
00542BAF E89C16ECFF call 00404250
00542BB4 EB27 jmp 00542BDD
00542BB6 8D9510F9FFFF lea edx, [ebp+$FFFFF910]
00542BBC A1B8715800 mov eax, dword ptr [$005871B8]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00542BC1 E80E72ECFF call 00409DD4
00542BC6 8B9510F9FFFF mov edx, [ebp+$FFFFF910]
00542BCC A1B4715800 mov eax, dword ptr [$005871B4]
00542BD1 8D048508725800 lea eax, [$587208+eax*4]

* Reference to: system.@LStrAsg;
|
00542BD8 E8FB13ECFF call 00403FD8

* Reference to Tfrdata instance
|
00542BDD A1BC525800 mov eax, dword ptr [$005852BC]
00542BE2 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00542BE4 8B8080000000 mov eax, [eax+$0080]

* Reference to: db.TDataSet.Next(TDataSet);
|
00542BEA E8DD3AF5FF call 004966CC
00542BEF FF05B4715800 inc dword ptr [$005871B4]

* Reference to Tfrdata instance
|
00542BF5 A1BC525800 mov eax, dword ptr [$005852BC]
00542BFA 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00542BFC 8B8080000000 mov eax, [eax+$0080]

* Reference to field TTable.Eof : Boolean
|
00542C02 80B89100000000 cmp byte ptr [eax+$0091], $00
00542C09 0F844FFFFFFF jz 00542B5E
00542C0F 803D0A72580074 cmp byte ptr [$0058720A], $74
00542C16 0F8596000000 jnz 00542CB2
00542C1C FF350C725800 push dword ptr [$0058720C]
00542C22 6888445400 push $00544488
00542C27 FF3510725800 push dword ptr [$00587210]
00542C2D 6888445400 push $00544488
00542C32 FF3514725800 push dword ptr [$00587214]
00542C38 6888445400 push $00544488
00542C3D FF3518725800 push dword ptr [$00587218]
00542C43 6888445400 push $00544488
00542C48 FF351C725800 push dword ptr [$0058721C]
00542C4E 6888445400 push $00544488
00542C53 FF3520725800 push dword ptr [$00587220]
00542C59 6888445400 push $00544488
00542C5E FF3524725800 push dword ptr [$00587224]
00542C64 8D45DC lea eax, [ebp-$24]
00542C67 BA0D000000 mov edx, $0000000D

* Reference to: system.@LStrCatN;
|
00542C6C E85316ECFF call 004042C4
00542C71 8D8554FCFFFF lea eax, [ebp+$FFFFFC54]
00542C77 8B55DC mov edx, [ebp-$24]
00542C7A B9FF000000 mov ecx, $000000FF

* Reference to: system.@LStrToString;
|
00542C7F E85C15ECFF call 004041E0
00542C84 8D9554FCFFFF lea edx, [ebp+$FFFFFC54]
00542C8A B83CBA5800 mov eax, $0058BA3C
00542C8F B114 mov cl, $14

* Reference to: system.@PStrNCpy;
|
00542C91 E84E00ECFF call 00402CE4
00542C96 BA3CBA5800 mov edx, $0058BA3C
00542C9B B854BA5800 mov eax, $0058BA54

* Reference to: system.@WriteRec;
|
00542CA0 E88743ECFF call 0040702C

* Reference to: System.Proc_004028A8
|
00542CA5 E8FEFBEBFF call 004028A8
00542CAA FF45F0 inc dword ptr [ebp-$10]
00542CAD E91F010000 jmp 00542DD1
00542CB2 A10C725800 mov eax, dword ptr [$0058720C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542CB7 E84871ECFF call 00409E04

* Reference to GlobalVar_005872A0
|
00542CBC A3A0725800 mov dword ptr [$005872A0], eax
00542CC1 A110725800 mov eax, dword ptr [$00587210]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542CC6 E83971ECFF call 00409E04

* Reference to GlobalVar_005872A4
|
00542CCB A3A4725800 mov dword ptr [$005872A4], eax
00542CD0 A114725800 mov eax, dword ptr [$00587214]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542CD5 E82A71ECFF call 00409E04

* Reference to GlobalVar_005872A8
|
00542CDA A3A8725800 mov dword ptr [$005872A8], eax
00542CDF A118725800 mov eax, dword ptr [$00587218]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542CE4 E81B71ECFF call 00409E04

* Reference to GlobalVar_005872AC
|
00542CE9 A3AC725800 mov dword ptr [$005872AC], eax
00542CEE A11C725800 mov eax, dword ptr [$0058721C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542CF3 E80C71ECFF call 00409E04

* Reference to GlobalVar_005872B0
|
00542CF8 A3B0725800 mov dword ptr [$005872B0], eax
00542CFD A120725800 mov eax, dword ptr [$00587220]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542D02 E8FD70ECFF call 00409E04

* Reference to GlobalVar_005872B4
|
00542D07 A3B4725800 mov dword ptr [$005872B4], eax
00542D0C A124725800 mov eax, dword ptr [$00587224]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542D11 E8EE70ECFF call 00409E04

* Reference to GlobalVar_005872B8
|
00542D16 A3B8725800 mov dword ptr [$005872B8], eax
00542D1B 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.btfilter : TButton
|
00542D1E 8B9828090000 mov ebx, [eax+$0928]
00542D24 8B55F8 mov edx, [ebp-$08]

* Reference to field TButton.OFFS_010C
|
00542D27 8B830C010000 mov eax, [ebx+$010C]

* Possible reference to virtual method TButton.OFFS_0108
|
00542D2D FF9308010000 call dword ptr [ebx+$0108]
00542D33 803D0972580074 cmp byte ptr [$00587209], $74
00542D3A 0F8591000000 jnz 00542DD1
00542D40 FF350C725800 push dword ptr [$0058720C]
00542D46 6888445400 push $00544488
00542D4B FF3510725800 push dword ptr [$00587210]
00542D51 6888445400 push $00544488
00542D56 FF3514725800 push dword ptr [$00587214]
00542D5C 6888445400 push $00544488
00542D61 FF3518725800 push dword ptr [$00587218]
00542D67 6888445400 push $00544488
00542D6C FF351C725800 push dword ptr [$0058721C]
00542D72 6888445400 push $00544488
00542D77 FF3520725800 push dword ptr [$00587220]
00542D7D 6888445400 push $00544488
00542D82 FF3524725800 push dword ptr [$00587224]
00542D88 8D45DC lea eax, [ebp-$24]
00542D8B BA0D000000 mov edx, $0000000D

* Reference to: system.@LStrCatN;
|
00542D90 E82F15ECFF call 004042C4
00542D95 8D8554FCFFFF lea eax, [ebp+$FFFFFC54]
00542D9B 8B55DC mov edx, [ebp-$24]
00542D9E B9FF000000 mov ecx, $000000FF

* Reference to: system.@LStrToString;
|
00542DA3 E83814ECFF call 004041E0
00542DA8 8D9554FCFFFF lea edx, [ebp+$FFFFFC54]
00542DAE B83CBA5800 mov eax, $0058BA3C
00542DB3 B114 mov cl, $14

* Reference to: system.@PStrNCpy;
|
00542DB5 E82AFFEBFF call 00402CE4
00542DBA BA3CBA5800 mov edx, $0058BA3C
00542DBF B854BA5800 mov eax, $0058BA54

* Reference to: system.@WriteRec;
|
00542DC4 E86342ECFF call 0040702C

* Reference to: System.Proc_004028A8
|
00542DC9 E8DAFAEBFF call 004028A8
00542DCE FF45F0 inc dword ptr [ebp-$10]
00542DD1 33D2 xor edx, edx
00542DD3 33C0 xor eax, eax

* Reference to: Unit_004BD734.Proc_004BD9A4
|
00542DD5 E8CAABF7FF call 004BD9A4
00542DDA 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@EofText;
|
00542DE0 E8FF3CECFF call 00406AE4

* Reference to: System.Proc_004028A8
|
00542DE5 E8BEFAEBFF call 004028A8
00542DEA 84C0 test al, al
00542DEC 0F842EFBFFFF jz 00542920
00542DF2 33D2 xor edx, edx
00542DF4 83C8FF or eax, -$01

* Reference to: Unit_004BD734.Proc_004BD9A4
|
00542DF7 E8A8ABF7FF call 004BD9A4
00542DFC 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]

* Reference to: system.@Close;
|
00542E02 E84D3CECFF call 00406A54

* Reference to: System.Proc_004028A8
|
00542E07 E89CFAEBFF call 004028A8
00542E0C 8D950CF9FFFF lea edx, [ebp+$FFFFF90C]
00542E12 B824000000 mov eax, $00000024
00542E17 2B45F0 sub eax, dword ptr [ebp-$10]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00542E1A E8B56FECFF call 00409DD4
00542E1F 8D850CF9FFFF lea eax, [ebp+$FFFFF90C]

* Possible String Reference to: '注'
|
00542E25 BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
00542E2A E8DD13ECFF call 0040420C
00542E2F 8B950CF9FFFF mov edx, [ebp+$FFFFF90C]
00542E35 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Label9 : TLabel
|
00542E38 8B8018030000 mov eax, [eax+$0318]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
00542E3E E84930EFFF call 00435E8C
00542E43 8D9508F9FFFF lea edx, [ebp+$FFFFF908]
00542E49 8B45F0 mov eax, [ebp-$10]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00542E4C E8836FECFF call 00409DD4
00542E51 8D8508F9FFFF lea eax, [ebp+$FFFFF908]

* Possible String Reference to: '注'
|
00542E57 BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
00542E5C E8AB13ECFF call 0040420C
00542E61 8B9508F9FFFF mov edx, [ebp+$FFFFF908]
00542E67 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.sumLb : TLabel
|
00542E6A 8B80A4060000 mov eax, [eax+$06A4]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
00542E70 E81730EFFF call 00435E8C
00542E75 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
00542E78 8B80F4020000 mov eax, [eax+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
00542E7E 8B8044020000 mov eax, [eax+$0244]
00542E84 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.TS7 : TTabSheet
|
00542E87 3B820C030000 cmp eax, [edx+$030C]
00542E8D 0F852F0B0000 jnz 005439C2
00542E93 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.MBE1 : TMultiBaseEdit
|
00542E96 8B80C8050000 mov eax, [eax+$05C8]

* Reference to : TMultiBaseEdit._PROC_0052EC50()
|
00542E9C E8AFBDFEFF call 0052EC50
00542EA1 48 dec eax
00542EA2 0F8C41110000 jl 00543FE9
00542EA8 6A01 push $01
00542EAA 8D85F8F8FFFF lea eax, [ebp+$FFFFF8F8]

* Possible String Reference to: 'delete from tbhistmp'
|
00542EB0 BAC4455400 mov edx, $005445C4

* Reference to: system.@VarFromLStr(Variant;Variant;String);
|
00542EB5 E84E25ECFF call 00405408
00542EBA 8D8DF8F8FFFF lea ecx, [ebp+$FFFFF8F8]

* Reference to Tfrdata instance
|
00542EC0 A1BC525800 mov eax, dword ptr [$005852BC]
00542EC5 8B00 mov eax, [eax]

* Reference to control Tfrdata.Qutmp : TQuery
|
00542EC7 8B4068 mov eax, [eax+$68]
00542ECA BA68000000 mov edx, $00000068

* Reference to: Unit_004BD734.Proc_004BDA9C
|
00542ECF E8C8ABF7FF call 004BDA9C
00542ED4 C745F401000000 mov dword ptr [ebp-$0C], $00000001
00542EDB B8F8715800 mov eax, $005871F8
00542EE0 BA38435400 mov edx, $00544338

* Reference to: system.@LStrAsg;
|
00542EE5 E8EE10ECFF call 00403FD8
00542EEA 33C0 xor eax, eax
00542EEC 55 push ebp
00542EED 683B2F5400 push $00542F3B

***** TRY
|
00542EF2 64FF30 push dword ptr fs:[eax]
00542EF5 648920 mov fs:[eax], esp
00542EF8 8D85F4F8FFFF lea eax, [ebp+$FFFFF8F4]
00542EFE 50 push eax
00542EFF 8D95F0F8FFFF lea edx, [ebp+$FFFFF8F0]
00542F05 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.zed1 : TEdit
|
00542F08 8B80C0050000 mov eax, [eax+$05C0]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542F0E E8492FEFFF call 00435E5C
00542F13 8B85F0F8FFFF mov eax, [ebp+$FFFFF8F0]
00542F19 B902000000 mov ecx, $00000002
00542F1E 8B55F4 mov edx, [ebp-$0C]

* Reference to: system.@LStrCopy;
|
00542F21 E8E614ECFF call 0040440C
00542F26 8B85F4F8FFFF mov eax, [ebp+$FFFFF8F4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542F2C E8D36EECFF call 00409E04
00542F31 33C0 xor eax, eax
00542F33 5A pop edx
00542F34 59 pop ecx
00542F35 59 pop ecx
00542F36 648910 mov fs:[eax], edx
00542F39 EB19 jmp 00542F54

* Reference to: system.@HandleAnyException;
|
00542F3B E9A407ECFF jmp 004036E4
00542F40 B8F8715800 mov eax, $005871F8
00542F45 BA9C435400 mov edx, $0054439C

* Reference to: system.@LStrAsg;
|
00542F4A E88910ECFF call 00403FD8

* Reference to: system.@DoneExcept;
|
00542F4F E8EC0AECFF call 00403A40

****** END
|
00542F54 A1F8715800 mov eax, dword ptr [$005871F8]
00542F59 BA38435400 mov edx, $00544338

* Reference to: system.@LStrCmp;
|
00542F5E E8B113ECFF call 00404314
00542F63 0F85DA000000 jnz 00543043
00542F69 8D85ECF8FFFF lea eax, [ebp+$FFFFF8EC]
00542F6F 50 push eax
00542F70 8D95E8F8FFFF lea edx, [ebp+$FFFFF8E8]
00542F76 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.zed1 : TEdit
|
00542F79 8B80C0050000 mov eax, [eax+$05C0]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00542F7F E8D82EEFFF call 00435E5C
00542F84 8B85E8F8FFFF mov eax, [ebp+$FFFFF8E8]
00542F8A B902000000 mov ecx, $00000002
00542F8F 8B55F4 mov edx, [ebp-$0C]

* Reference to: system.@LStrCopy;
|
00542F92 E87514ECFF call 0040440C
00542F97 8B85ECF8FFFF mov eax, [ebp+$FFFFF8EC]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00542F9D E8626EECFF call 00409E04

* Reference to GlobalVar_005871B4
|
00542FA2 A3B4715800 mov dword ptr [$005871B4], eax
00542FA7 833DB471580000 cmp dword ptr [$005871B4], +$00
00542FAE 0F848F000000 jz 00543043
00542FB4 A1B4715800 mov eax, dword ptr [$005871B4]
00542FB9 898598FAFFFF mov [ebp+$FFFFFA98], eax
00542FBF C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
00542FC6 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
00542FCC A1BC525800 mov eax, dword ptr [$005852BC]
00542FD1 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00542FD3 8B8080000000 mov eax, [eax+$0080]
00542FD9 33C9 xor ecx, ecx

* Reference to: dbtables.TTable.FindKey(TTable;arrayofTVarRec;arrayofTVarRec;0..-1):Boolean;
| or: dbtables.TTable.FindNearest(TTable;arrayofTVarRec;arrayofTVarRec;0..-1);
|
00542FDB E8C4B2F6FF call 004AE2A4
00542FE0 84C0 test al, al
00542FE2 7413 jz 00542FF7
00542FE4 33C9 xor ecx, ecx
00542FE6 33D2 xor edx, edx

* Possible String Reference to: '必选号码重复'
|
00542FE8 B8F4465400 mov eax, $005446F4

* Reference to: Unit_004BD734.Proc_004BD86C
|
00542FED E87AA8F7FF call 004BD86C
00542FF2 E9F20F0000 jmp 00543FE9
00542FF7 A1B4715800 mov eax, dword ptr [$005871B4]
00542FFC 3B0578715800 cmp eax, [$00587178]
00543002 7E13 jle 00543017
00543004 33C9 xor ecx, ecx
00543006 33D2 xor edx, edx

* Possible String Reference to: '必选号码超出范围'
|
00543008 B80C475400 mov eax, $0054470C

* Reference to: Unit_004BD734.Proc_004BD86C
|
0054300D E85AA8F7FF call 004BD86C
00543012 E9D20F0000 jmp 00543FE9
00543017 A1B4715800 mov eax, dword ptr [$005871B4]
0054301C 898598FAFFFF mov [ebp+$FFFFFA98], eax
00543022 C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
00543029 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
0054302F A1BC525800 mov eax, dword ptr [$005852BC]
00543034 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00543036 8B8080000000 mov eax, [eax+$0080]
0054303C 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
0054303E E8CD3DF5FF call 00496E10
00543043 8345F403 add dword ptr [ebp-$0C], +$03
00543047 837DF40E cmp dword ptr [ebp-$0C], +$0E
0054304B 0F8E8AFEFFFF jle 00542EDB
00543051 C745F405000000 mov dword ptr [ebp-$0C], $00000005
00543058 C745B0547F5800 mov dword ptr [ebp-$50], $00587F54
0054305F 8B45B0 mov eax, [ebp-$50]
00543062 33D2 xor edx, edx
00543064 8910 mov [eax], edx
00543066 8345B004 add dword ptr [ebp-$50], +$04
0054306A FF4DF4 dec dword ptr [ebp-$0C]
0054306D 75F0 jnz 0054305F

* Reference to Tfrdata instance
|
0054306F A1BC525800 mov eax, dword ptr [$005852BC]
00543074 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00543076 8B8080000000 mov eax, [eax+$0080]

* Reference to: db.TDataSet.First(TDataSet);
| or: db.TDataSet.Last(TDataSet);
|
0054307C E87F33F5FF call 00496400
00543081 C745F401000000 mov dword ptr [ebp-$0C], $00000001
00543088 EB3B jmp 005430C5

* Reference to Tfrdata instance
|
0054308A A1BC525800 mov eax, dword ptr [$005852BC]
0054308F 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00543091 8B8080000000 mov eax, [eax+$0080]

* Possible String Reference to: 'Numbers'
|
00543097 BA08465400 mov edx, $00544608

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
0054309C E80321F5FF call 004951A4
005430A1 8B10 mov edx, [eax]

* Reference to method TTable.PSGetIndexDefs(TIndexOptions)
|
005430A3 FF5254 call dword ptr [edx+$54]
005430A6 8B55F4 mov edx, [ebp-$0C]
005430A9 890495507F5800 mov [$587F50+edx*4], eax
005430B0 FF45F4 inc dword ptr [ebp-$0C]

* Reference to Tfrdata instance
|
005430B3 A1BC525800 mov eax, dword ptr [$005852BC]
005430B8 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
005430BA 8B8080000000 mov eax, [eax+$0080]

* Reference to: db.TDataSet.Next(TDataSet);
|
005430C0 E80736F5FF call 004966CC

* Reference to Tfrdata instance
|
005430C5 A1BC525800 mov eax, dword ptr [$005852BC]
005430CA 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
005430CC 8B8080000000 mov eax, [eax+$0080]

* Reference to field TTable.Eof : Boolean
|
005430D2 80B89100000000 cmp byte ptr [eax+$0091], $00
005430D9 74AF jz 0054308A
005430DB 6A01 push $01
005430DD 8D85D8F8FFFF lea eax, [ebp+$FFFFF8D8]

* Possible String Reference to: 'delete from tbhistmp'
|
005430E3 BAC4455400 mov edx, $005445C4

* Reference to: system.@VarFromLStr(Variant;Variant;String);
|
005430E8 E81B23ECFF call 00405408
005430ED 8D8DD8F8FFFF lea ecx, [ebp+$FFFFF8D8]

* Reference to Tfrdata instance
|
005430F3 A1BC525800 mov eax, dword ptr [$005852BC]
005430F8 8B00 mov eax, [eax]

* Reference to control Tfrdata.Qutmp : TQuery
|
005430FA 8B4068 mov eax, [eax+$68]
005430FD BA68000000 mov edx, $00000068

* Reference to: Unit_004BD734.Proc_004BDA9C
|
00543102 E895A9F7FF call 004BDA9C
00543107 C745F401000000 mov dword ptr [ebp-$0C], $00000001
0054310E B8F8715800 mov eax, $005871F8
00543113 BA38435400 mov edx, $00544338

* Reference to: system.@LStrAsg;
|
00543118 E8BB0EECFF call 00403FD8
0054311D 33C0 xor eax, eax
0054311F 55 push ebp
00543120 686E315400 push $0054316E

***** TRY
|
00543125 64FF30 push dword ptr fs:[eax]
00543128 648920 mov fs:[eax], esp
0054312B 8D85D4F8FFFF lea eax, [ebp+$FFFFF8D4]
00543131 50 push eax
00543132 8D95D0F8FFFF lea edx, [ebp+$FFFFF8D0]
00543138 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.ZEd2 : TEdit
|
0054313B 8B80C4050000 mov eax, [eax+$05C4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
00543141 E8162DEFFF call 00435E5C
00543146 8B85D0F8FFFF mov eax, [ebp+$FFFFF8D0]
0054314C B902000000 mov ecx, $00000002
00543151 8B55F4 mov edx, [ebp-$0C]

* Reference to: system.@LStrCopy;
|
00543154 E8B312ECFF call 0040440C
00543159 8B85D4F8FFFF mov eax, [ebp+$FFFFF8D4]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0054315F E8A06CECFF call 00409E04
00543164 33C0 xor eax, eax
00543166 5A pop edx
00543167 59 pop ecx
00543168 59 pop ecx
00543169 648910 mov fs:[eax], edx
0054316C EB19 jmp 00543187

* Reference to: system.@HandleAnyException;
|
0054316E E97105ECFF jmp 004036E4
00543173 B8F8715800 mov eax, $005871F8
00543178 BA9C435400 mov edx, $0054439C

* Reference to: system.@LStrAsg;
|
0054317D E8560EECFF call 00403FD8

* Reference to: system.@DoneExcept;
|
00543182 E8B908ECFF call 00403A40

****** END
|
00543187 A1F8715800 mov eax, dword ptr [$005871F8]
0054318C BA38435400 mov edx, $00544338

* Reference to: system.@LStrCmp;
|
00543191 E87E11ECFF call 00404314
00543196 0F8561010000 jnz 005432FD
0054319C 8D85CCF8FFFF lea eax, [ebp+$FFFFF8CC]
005431A2 50 push eax
005431A3 8D95C8F8FFFF lea edx, [ebp+$FFFFF8C8]
005431A9 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.ZEd2 : TEdit
|
005431AC 8B80C4050000 mov eax, [eax+$05C4]

* Reference to: controls.TControl.GetText(TControl):TCaption;
|
005431B2 E8A52CEFFF call 00435E5C
005431B7 8B85C8F8FFFF mov eax, [ebp+$FFFFF8C8]
005431BD B902000000 mov ecx, $00000002
005431C2 8B55F4 mov edx, [ebp-$0C]

* Reference to: system.@LStrCopy;
|
005431C5 E84212ECFF call 0040440C
005431CA 8B85CCF8FFFF mov eax, [ebp+$FFFFF8CC]

* Reference to: Unit_00408BD4.Proc_00409E04
|
005431D0 E82F6CECFF call 00409E04

* Reference to GlobalVar_005871B4
|
005431D5 A3B4715800 mov dword ptr [$005871B4], eax
005431DA 833DB471580000 cmp dword ptr [$005871B4], +$00
005431E1 0F8416010000 jz 005432FD
005431E7 A1B4715800 mov eax, dword ptr [$005871B4]
005431EC 898598FAFFFF mov [ebp+$FFFFFA98], eax
005431F2 C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
005431F9 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
005431FF A1BC525800 mov eax, dword ptr [$005852BC]
00543204 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00543206 8B8080000000 mov eax, [eax+$0080]
0054320C 33C9 xor ecx, ecx

* Reference to: dbtables.TTable.FindKey(TTable;arrayofTVarRec;arrayofTVarRec;0..-1):Boolean;
| or: dbtables.TTable.FindNearest(TTable;arrayofTVarRec;arrayofTVarRec;0..-1);
|
0054320E E891B0F6FF call 004AE2A4
00543213 84C0 test al, al
00543215 7413 jz 0054322A
00543217 33C9 xor ecx, ecx
00543219 33D2 xor edx, edx

* Possible String Reference to: '排除号码重复'
|
0054321B B828475400 mov eax, $00544728

* Reference to: Unit_004BD734.Proc_004BD86C
|
00543220 E847A6F7FF call 004BD86C
00543225 E9BF0D0000 jmp 00543FE9
0054322A A1B4715800 mov eax, dword ptr [$005871B4]
0054322F 3B0578715800 cmp eax, [$00587178]
00543235 7E13 jle 0054324A
00543237 33C9 xor ecx, ecx
00543239 33D2 xor edx, edx

* Possible String Reference to: '排除号码超出范围'
|
0054323B B840475400 mov eax, $00544740

* Reference to: Unit_004BD734.Proc_004BD86C
|
00543240 E827A6F7FF call 004BD86C
00543245 E99F0D0000 jmp 00543FE9
0054324A 8B15547F5800 mov edx, [$00587F54]
00543250 8D8530FCFFFF lea eax, [ebp+$FFFFFC30]
00543256 B120 mov cl, $20

* Reference to: system.@SetElem;
|
00543258 E857FDEBFF call 00402FB4
0054325D A1587F5800 mov eax, dword ptr [$00587F58]
00543262 3DFF000000 cmp eax, $000000FF
00543267 7707 jnbe 00543270
00543269 0FAB8530FCFFFF bts [ebp+$FFFFFC30], eax
00543270 A15C7F5800 mov eax, dword ptr [$00587F5C]
00543275 3DFF000000 cmp eax, $000000FF
0054327A 7707 jnbe 00543283
0054327C 0FAB8530FCFFFF bts [ebp+$FFFFFC30], eax
00543283 A1607F5800 mov eax, dword ptr [$00587F60]
00543288 3DFF000000 cmp eax, $000000FF
0054328D 7707 jnbe 00543296
0054328F 0FAB8530FCFFFF bts [ebp+$FFFFFC30], eax
00543296 A1647F5800 mov eax, dword ptr [$00587F64]
0054329B 3DFF000000 cmp eax, $000000FF
005432A0 7707 jnbe 005432A9
005432A2 0FAB8530FCFFFF bts [ebp+$FFFFFC30], eax
005432A9 A1B4715800 mov eax, dword ptr [$005871B4]
005432AE 3DFF000000 cmp eax, $000000FF
005432B3 7707 jnbe 005432BC
005432B5 0FA38530FCFFFF bt [ebp+$FFFFFC30], eax
005432BC 7313 jnb 005432D1
005432BE 33C9 xor ecx, ecx
005432C0 33D2 xor edx, edx

* Possible String Reference to: '排除号码与必选号码重复'
|
005432C2 B85C475400 mov eax, $0054475C

* Reference to: Unit_004BD734.Proc_004BD86C
|
005432C7 E8A0A5F7FF call 004BD86C
005432CC E9180D0000 jmp 00543FE9
005432D1 A1B4715800 mov eax, dword ptr [$005871B4]
005432D6 898598FAFFFF mov [ebp+$FFFFFA98], eax
005432DC C6859CFAFFFF00 mov byte ptr [ebp+$FFFFFA9C], $00
005432E3 8D9598FAFFFF lea edx, [ebp+$FFFFFA98]

* Reference to Tfrdata instance
|
005432E9 A1BC525800 mov eax, dword ptr [$005852BC]
005432EE 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
005432F0 8B8080000000 mov eax, [eax+$0080]
005432F6 33C9 xor ecx, ecx

* Reference to: db.TDataSet.AppendRecord(TDataSet;arrayofTVarRec;arrayofTVarRec;0..-1);
|
005432F8 E8133BF5FF call 00496E10
005432FD 8345F403 add dword ptr [ebp-$0C], +$03
00543301 837DF44A cmp dword ptr [ebp-$0C], +$4A
00543305 0F8E03FEFFFF jle 0054310E
0054330B C745F419000000 mov dword ptr [ebp-$0C], $00000019
00543312 C745B0687F5800 mov dword ptr [ebp-$50], $00587F68
00543319 8B45B0 mov eax, [ebp-$50]
0054331C 33D2 xor edx, edx
0054331E 8910 mov [eax], edx
00543320 8345B004 add dword ptr [ebp-$50], +$04
00543324 FF4DF4 dec dword ptr [ebp-$0C]
00543327 75F0 jnz 00543319

* Reference to Tfrdata instance
|
00543329 A1BC525800 mov eax, dword ptr [$005852BC]
0054332E 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00543330 8B8080000000 mov eax, [eax+$0080]

* Reference to: db.TDataSet.First(TDataSet);
| or: db.TDataSet.Last(TDataSet);
|
00543336 E8C530F5FF call 00496400
0054333B C745F401000000 mov dword ptr [ebp-$0C], $00000001
00543342 EB3B jmp 0054337F

* Reference to Tfrdata instance
|
00543344 A1BC525800 mov eax, dword ptr [$005852BC]
00543349 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
0054334B 8B8080000000 mov eax, [eax+$0080]

* Possible String Reference to: 'Numbers'
|
00543351 BA08465400 mov edx, $00544608

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
00543356 E8491EF5FF call 004951A4
0054335B 8B10 mov edx, [eax]

* Reference to method TTable.PSGetIndexDefs(TIndexOptions)
|
0054335D FF5254 call dword ptr [edx+$54]
00543360 8B55F4 mov edx, [ebp-$0C]
00543363 890495647F5800 mov [$587F64+edx*4], eax
0054336A FF45F4 inc dword ptr [ebp-$0C]

* Reference to Tfrdata instance
|
0054336D A1BC525800 mov eax, dword ptr [$005852BC]
00543372 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00543374 8B8080000000 mov eax, [eax+$0080]

* Reference to: db.TDataSet.Next(TDataSet);
|
0054337A E84D33F5FF call 004966CC

* Reference to Tfrdata instance
|
0054337F A1BC525800 mov eax, dword ptr [$005852BC]
00543384 8B00 mov eax, [eax]

* Reference to control Tfrdata.TbhisTmp : TTable
|
00543386 8B8080000000 mov eax, [eax+$0080]

* Reference to field TTable.Eof : Boolean
|
0054338C 80B89100000000 cmp byte ptr [eax+$0091], $00
00543393 74AF jz 00543344
00543395 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.MBE1 : TMultiBaseEdit
|
00543398 8B80C8050000 mov eax, [eax+$05C8]

* Reference to : TMultiBaseEdit._PROC_0052EC50()
|
0054339E E8ADB8FEFF call 0052EC50
005433A3 8D95C4F8FFFF lea edx, [ebp+$FFFFF8C4]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
005433A9 E8266AECFF call 00409DD4
005433AE 8D85C4F8FFFF lea eax, [ebp+$FFFFF8C4]

* Possible String Reference to: '注'
|
005433B4 BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
005433B9 E84E0EECFF call 0040420C
005433BE 8B95C4F8FFFF mov edx, [ebp+$FFFFF8C4]
005433C4 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Label8 : TLabel
|
005433C7 8B8014030000 mov eax, [eax+$0314]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
005433CD E8BA2AEFFF call 00435E8C
005433D2 33C0 xor eax, eax
005433D4 8945F0 mov [ebp-$10], eax

* Reference to: system.Randomize;
|
005433D7 E8C0F7EBFF call 00402B9C
005433DC 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.MBE1 : TMultiBaseEdit
|
005433DF 8B80C8050000 mov eax, [eax+$05C8]

* Reference to : TMultiBaseEdit._PROC_0052EC50()
|
005433E5 E866B8FEFF call 0052EC50
005433EA 33D2 xor edx, edx

* Reference to: Unit_004BD734.Proc_004BD9A4
|
005433EC E8B3A5F7FF call 004BD9A4
005433F1 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.MBE1 : TMultiBaseEdit
|
005433F4 8B80C8050000 mov eax, [eax+$05C8]

* Reference to : TMultiBaseEdit._PROC_0052EC50()
|
005433FA E851B8FEFF call 0052EC50
005433FF 85C0 test eax, eax
00543401 0F8E3F050000 jle 00543946
00543407 8945CC mov [ebp-$34], eax
0054340A C745F425000000 mov dword ptr [ebp-$0C], $00000025
00543411 C745A4CC7F5800 mov dword ptr [ebp-$5C], $00587FCC
00543418 8B45A4 mov eax, [ebp-$5C]
0054341B 33D2 xor edx, edx
0054341D 8910 mov [eax], edx
0054341F 8345A404 add dword ptr [ebp-$5C], +$04
00543423 FF4DF4 dec dword ptr [ebp-$0C]
00543426 75F0 jnz 00543418
00543428 33C0 xor eax, eax

* Reference to GlobalVar_005871BC
|
0054342A A3BC715800 mov dword ptr [$005871BC], eax
0054342F C745F405000000 mov dword ptr [ebp-$0C], $00000005
00543436 C745A4547F5800 mov dword ptr [ebp-$5C], $00587F54
0054343D 8B45A4 mov eax, [ebp-$5C]
00543440 833800 cmp dword ptr [eax], +$00
00543443 7E17 jle 0054345C
00543445 FF05BC715800 inc dword ptr [$005871BC]
0054344B 8B45A4 mov eax, [ebp-$5C]
0054344E 8B00 mov eax, [eax]
00543450 8B55A4 mov edx, [ebp-$5C]
00543453 8B12 mov edx, [edx]
00543455 890495C87F5800 mov [$587FC8+edx*4], eax
0054345C 8345A404 add dword ptr [ebp-$5C], +$04
00543460 FF4DF4 dec dword ptr [ebp-$0C]
00543463 75D8 jnz 0054343D
00543465 A178715800 mov eax, dword ptr [$00587178]
0054346A 40 inc eax

* Reference to: system.@RandInt;
|
0054346B E8B8F9EBFF call 00402E28

* Reference to GlobalVar_005871B8
|
00543470 A3B8715800 mov dword ptr [$005871B8], eax
00543475 833DBC71580007 cmp dword ptr [$005871BC], +$07
0054347C 0F8D5F020000 jnl 005436E1
00543482 A1B8715800 mov eax, dword ptr [$005871B8]
00543487 833C85C87F580000 cmp dword ptr [$587FC8+eax*4], +$00
0054348F 0F8515020000 jnz 005436AA
00543495 BEE0455400 mov esi, $005445E0
0054349A 8DBD30FCFFFF lea edi, [ebp+$FFFFFC30]
005434A0 B908000000 mov ecx, $00000008
005434A5 F3 rep
005434A6 A5 movsd
005434A7 8B15687F5800 mov edx, [$00587F68]
005434AD 8D853CFAFFFF lea eax, [ebp+$FFFFFA3C]
005434B3 B120 mov cl, $20

* Reference to: system.@SetElem;
|
005434B5 E8FAFAEBFF call 00402FB4
005434BA A16C7F5800 mov eax, dword ptr [$00587F6C]
005434BF 3DFF000000 cmp eax, $000000FF
005434C4 7707 jnbe 005434CD
005434C6 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
005434CD A1707F5800 mov eax, dword ptr [$00587F70]
005434D2 3DFF000000 cmp eax, $000000FF
005434D7 7707 jnbe 005434E0
005434D9 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
005434E0 A1747F5800 mov eax, dword ptr [$00587F74]
005434E5 3DFF000000 cmp eax, $000000FF
005434EA 7707 jnbe 005434F3
005434EC 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
005434F3 A1787F5800 mov eax, dword ptr [$00587F78]
005434F8 3DFF000000 cmp eax, $000000FF
005434FD 7707 jnbe 00543506
005434FF 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
00543506 A17C7F5800 mov eax, dword ptr [$00587F7C]
0054350B 3DFF000000 cmp eax, $000000FF
00543510 7707 jnbe 00543519
00543512 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
00543519 A1807F5800 mov eax, dword ptr [$00587F80]
0054351E 3DFF000000 cmp eax, $000000FF
00543523 7707 jnbe 0054352C
00543525 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
0054352C A1847F5800 mov eax, dword ptr [$00587F84]
00543531 3DFF000000 cmp eax, $000000FF
00543536 7707 jnbe 0054353F
00543538 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
0054353F A1887F5800 mov eax, dword ptr [$00587F88]
00543544 3DFF000000 cmp eax, $000000FF
00543549 7707 jnbe 00543552
0054354B 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
00543552 A18C7F5800 mov eax, dword ptr [$00587F8C]
00543557 3DFF000000 cmp eax, $000000FF
0054355C 7707 jnbe 00543565
0054355E 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
00543565 A1907F5800 mov eax, dword ptr [$00587F90]
0054356A 3DFF000000 cmp eax, $000000FF
0054356F 7707 jnbe 00543578
00543571 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
00543578 A1947F5800 mov eax, dword ptr [$00587F94]
0054357D 3DFF000000 cmp eax, $000000FF
00543582 7707 jnbe 0054358B
00543584 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
0054358B A1987F5800 mov eax, dword ptr [$00587F98]
00543590 3DFF000000 cmp eax, $000000FF
00543595 7707 jnbe 0054359E
00543597 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
0054359E A19C7F5800 mov eax, dword ptr [$00587F9C]
005435A3 3DFF000000 cmp eax, $000000FF
005435A8 7707 jnbe 005435B1
005435AA 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
005435B1 A1A07F5800 mov eax, dword ptr [$00587FA0]
005435B6 3DFF000000 cmp eax, $000000FF
005435BB 7707 jnbe 005435C4
005435BD 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
005435C4 A1A47F5800 mov eax, dword ptr [$00587FA4]
005435C9 3DFF000000 cmp eax, $000000FF
005435CE 7707 jnbe 005435D7
005435D0 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
005435D7 A1A87F5800 mov eax, dword ptr [$00587FA8]
005435DC 3DFF000000 cmp eax, $000000FF
005435E1 7707 jnbe 005435EA
005435E3 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
005435EA A1AC7F5800 mov eax, dword ptr [$00587FAC]
005435EF 3DFF000000 cmp eax, $000000FF
005435F4 7707 jnbe 005435FD
005435F6 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
005435FD A1B07F5800 mov eax, dword ptr [$00587FB0]
00543602 3DFF000000 cmp eax, $000000FF
00543607 7707 jnbe 00543610
00543609 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
00543610 A1B47F5800 mov eax, dword ptr [$00587FB4]
00543615 3DFF000000 cmp eax, $000000FF
0054361A 7707 jnbe 00543623
0054361C 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
00543623 A1B87F5800 mov eax, dword ptr [$00587FB8]
00543628 3DFF000000 cmp eax, $000000FF
0054362D 7707 jnbe 00543636
0054362F 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
00543636 A1BC7F5800 mov eax, dword ptr [$00587FBC]
0054363B 3DFF000000 cmp eax, $000000FF
00543640 7707 jnbe 00543649
00543642 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
00543649 A1C07F5800 mov eax, dword ptr [$00587FC0]
0054364E 3DFF000000 cmp eax, $000000FF
00543653 7707 jnbe 0054365C
00543655 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
0054365C A1C47F5800 mov eax, dword ptr [$00587FC4]
00543661 3DFF000000 cmp eax, $000000FF
00543666 7707 jnbe 0054366F
00543668 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
0054366F A1C87F5800 mov eax, dword ptr [$00587FC8]
00543674 3DFF000000 cmp eax, $000000FF
00543679 7707 jnbe 00543682
0054367B 0FAB853CFAFFFF bts [ebp+$FFFFFA3C], eax
00543682 8D953CFAFFFF lea edx, [ebp+$FFFFFA3C]
00543688 8D8530FCFFFF lea eax, [ebp+$FFFFFC30]
0054368E B120 mov cl, $20

* Reference to: system.@SetUnion;
|
00543690 E8AFF9EBFF call 00403044
00543695 A1B8715800 mov eax, dword ptr [$005871B8]
0054369A 3DFF000000 cmp eax, $000000FF
0054369F 7707 jnbe 005436A8
005436A1 0FA38530FCFFFF bt [ebp+$FFFFFC30], eax
005436A8 7312 jnb 005436BC
005436AA A178715800 mov eax, dword ptr [$00587178]
005436AF 40 inc eax

* Reference to: system.@RandInt;
|
005436B0 E873F7EBFF call 00402E28

* Reference to GlobalVar_005871B8
|
005436B5 A3B8715800 mov dword ptr [$005871B8], eax
005436BA EB18 jmp 005436D4
005436BC A1B8715800 mov eax, dword ptr [$005871B8]
005436C1 8B15B8715800 mov edx, [$005871B8]
005436C7 891485C87F5800 mov [$587FC8+eax*4], edx
005436CE FF05BC715800 inc dword ptr [$005871BC]
005436D4 833DBC71580007 cmp dword ptr [$005871BC], +$07
005436DB 0F8CA1FDFFFF jl 00543482
005436E1 C705B471580001000000 mov dword ptr [$005871B4], $00000001
005436EB A178715800 mov eax, dword ptr [$00587178]
005436F0 85C0 test eax, eax
005436F2 7E7E jle 00543772
005436F4 8945C8 mov [ebp-$38], eax
005436F7 C745A4CC7F5800 mov dword ptr [ebp-$5C], $00587FCC
005436FE 8B45A4 mov eax, [ebp-$5C]
00543701 833800 cmp dword ptr [eax], +$00
00543704 7E63 jle 00543769
00543706 8B45A4 mov eax, [ebp-$5C]
00543709 83380A cmp dword ptr [eax], +$0A
0054370C 7D2E jnl 0054373C
0054370E 8D95C0F8FFFF lea edx, [ebp+$FFFFF8C0]
00543714 8B45A4 mov eax, [ebp-$5C]
00543717 8B00 mov eax, [eax]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00543719 E8B666ECFF call 00409DD4
0054371E 8B8DC0F8FFFF mov ecx, [ebp+$FFFFF8C0]
00543724 A1B4715800 mov eax, dword ptr [$005871B4]
00543729 8D048508725800 lea eax, [$587208+eax*4]
00543730 BA7C445400 mov edx, $0054447C

* Reference to: system.@LStrCat3;
|
00543735 E8160BECFF call 00404250
0054373A EB27 jmp 00543763
0054373C 8D95BCF8FFFF lea edx, [ebp+$FFFFF8BC]
00543742 8B45A4 mov eax, [ebp-$5C]
00543745 8B00 mov eax, [eax]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00543747 E88866ECFF call 00409DD4
0054374C 8B95BCF8FFFF mov edx, [ebp+$FFFFF8BC]
00543752 A1B4715800 mov eax, dword ptr [$005871B4]
00543757 8D048508725800 lea eax, [$587208+eax*4]

* Reference to: system.@LStrAsg;
|
0054375E E87508ECFF call 00403FD8
00543763 FF05B4715800 inc dword ptr [$005871B4]
00543769 8345A404 add dword ptr [ebp-$5C], +$04
0054376D FF4DC8 dec dword ptr [ebp-$38]
00543770 758C jnz 005436FE
00543772 803D0A72580074 cmp byte ptr [$0058720A], $74
00543779 0F8596000000 jnz 00543815
0054377F FF350C725800 push dword ptr [$0058720C]
00543785 6888445400 push $00544488
0054378A FF3510725800 push dword ptr [$00587210]
00543790 6888445400 push $00544488
00543795 FF3514725800 push dword ptr [$00587214]
0054379B 6888445400 push $00544488
005437A0 FF3518725800 push dword ptr [$00587218]
005437A6 6888445400 push $00544488
005437AB FF351C725800 push dword ptr [$0058721C]
005437B1 6888445400 push $00544488
005437B6 FF3520725800 push dword ptr [$00587220]
005437BC 6888445400 push $00544488
005437C1 FF3524725800 push dword ptr [$00587224]
005437C7 8D45DC lea eax, [ebp-$24]
005437CA BA0D000000 mov edx, $0000000D

* Reference to: system.@LStrCatN;
|
005437CF E8F00AECFF call 004042C4
005437D4 8D8554FCFFFF lea eax, [ebp+$FFFFFC54]
005437DA 8B55DC mov edx, [ebp-$24]
005437DD B9FF000000 mov ecx, $000000FF

* Reference to: system.@LStrToString;
|
005437E2 E8F909ECFF call 004041E0
005437E7 8D9554FCFFFF lea edx, [ebp+$FFFFFC54]
005437ED B83CBA5800 mov eax, $0058BA3C
005437F2 B114 mov cl, $14

* Reference to: system.@PStrNCpy;
|
005437F4 E8EBF4EBFF call 00402CE4
005437F9 BA3CBA5800 mov edx, $0058BA3C
005437FE B854BA5800 mov eax, $0058BA54

* Reference to: system.@WriteRec;
|
00543803 E82438ECFF call 0040702C

* Reference to: System.Proc_004028A8
|
00543808 E89BF0EBFF call 004028A8
0054380D FF45F0 inc dword ptr [ebp-$10]
00543810 E91F010000 jmp 00543934
00543815 A10C725800 mov eax, dword ptr [$0058720C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
0054381A E8E565ECFF call 00409E04

* Reference to GlobalVar_005872A0
|
0054381F A3A0725800 mov dword ptr [$005872A0], eax
00543824 A110725800 mov eax, dword ptr [$00587210]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00543829 E8D665ECFF call 00409E04

* Reference to GlobalVar_005872A4
|
0054382E A3A4725800 mov dword ptr [$005872A4], eax
00543833 A114725800 mov eax, dword ptr [$00587214]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00543838 E8C765ECFF call 00409E04

* Reference to GlobalVar_005872A8
|
0054383D A3A8725800 mov dword ptr [$005872A8], eax
00543842 A118725800 mov eax, dword ptr [$00587218]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00543847 E8B865ECFF call 00409E04

* Reference to GlobalVar_005872AC
|
0054384C A3AC725800 mov dword ptr [$005872AC], eax
00543851 A11C725800 mov eax, dword ptr [$0058721C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00543856 E8A965ECFF call 00409E04

* Reference to GlobalVar_005872B0
|
0054385B A3B0725800 mov dword ptr [$005872B0], eax
00543860 A120725800 mov eax, dword ptr [$00587220]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00543865 E89A65ECFF call 00409E04

* Reference to GlobalVar_005872B4
|
0054386A A3B4725800 mov dword ptr [$005872B4], eax
0054386F A124725800 mov eax, dword ptr [$00587224]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00543874 E88B65ECFF call 00409E04

* Reference to GlobalVar_005872B8
|
00543879 A3B8725800 mov dword ptr [$005872B8], eax
0054387E 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.btfilter : TButton
|
00543881 8B9828090000 mov ebx, [eax+$0928]
00543887 8B55F8 mov edx, [ebp-$08]

* Reference to field TButton.OFFS_010C
|
0054388A 8B830C010000 mov eax, [ebx+$010C]

* Possible reference to virtual method TButton.OFFS_0108
|
00543890 FF9308010000 call dword ptr [ebx+$0108]
00543896 803D0972580074 cmp byte ptr [$00587209], $74
0054389D 0F8591000000 jnz 00543934
005438A3 FF350C725800 push dword ptr [$0058720C]
005438A9 6888445400 push $00544488
005438AE FF3510725800 push dword ptr [$00587210]
005438B4 6888445400 push $00544488
005438B9 FF3514725800 push dword ptr [$00587214]
005438BF 6888445400 push $00544488
005438C4 FF3518725800 push dword ptr [$00587218]
005438CA 6888445400 push $00544488
005438CF FF351C725800 push dword ptr [$0058721C]
005438D5 6888445400 push $00544488
005438DA FF3520725800 push dword ptr [$00587220]
005438E0 6888445400 push $00544488
005438E5 FF3524725800 push dword ptr [$00587224]
005438EB 8D45DC lea eax, [ebp-$24]
005438EE BA0D000000 mov edx, $0000000D

* Reference to: system.@LStrCatN;
|
005438F3 E8CC09ECFF call 004042C4
005438F8 8D8554FCFFFF lea eax, [ebp+$FFFFFC54]
005438FE 8B55DC mov edx, [ebp-$24]
00543901 B9FF000000 mov ecx, $000000FF

* Reference to: system.@LStrToString;
|
00543906 E8D508ECFF call 004041E0
0054390B 8D9554FCFFFF lea edx, [ebp+$FFFFFC54]
00543911 B83CBA5800 mov eax, $0058BA3C
00543916 B114 mov cl, $14

* Reference to: system.@PStrNCpy;
|
00543918 E8C7F3EBFF call 00402CE4
0054391D BA3CBA5800 mov edx, $0058BA3C
00543922 B854BA5800 mov eax, $0058BA54

* Reference to: system.@WriteRec;
|
00543927 E80037ECFF call 0040702C

* Reference to: System.Proc_004028A8
|
0054392C E877EFEBFF call 004028A8
00543931 FF45F0 inc dword ptr [ebp-$10]
00543934 33D2 xor edx, edx
00543936 33C0 xor eax, eax

* Reference to: Unit_004BD734.Proc_004BD9A4
|
00543938 E867A0F7FF call 004BD9A4
0054393D FF4DCC dec dword ptr [ebp-$34]
00543940 0F85C4FAFFFF jnz 0054340A
00543946 33D2 xor edx, edx
00543948 83C8FF or eax, -$01

* Reference to: Unit_004BD734.Proc_004BD9A4
|
0054394B E854A0F7FF call 004BD9A4
00543950 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.MBE1 : TMultiBaseEdit
|
00543953 8B80C8050000 mov eax, [eax+$05C8]

* Reference to : TMultiBaseEdit._PROC_0052EC50()
|
00543959 E8F2B2FEFF call 0052EC50
0054395E 2B45F0 sub eax, dword ptr [ebp-$10]
00543961 8D95B8F8FFFF lea edx, [ebp+$FFFFF8B8]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00543967 E86864ECFF call 00409DD4
0054396C 8D85B8F8FFFF lea eax, [ebp+$FFFFF8B8]

* Possible String Reference to: '注'
|
00543972 BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
00543977 E89008ECFF call 0040420C
0054397C 8B95B8F8FFFF mov edx, [ebp+$FFFFF8B8]
00543982 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Label9 : TLabel
|
00543985 8B8018030000 mov eax, [eax+$0318]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
0054398B E8FC24EFFF call 00435E8C
00543990 8D95B4F8FFFF lea edx, [ebp+$FFFFF8B4]
00543996 8B45F0 mov eax, [ebp-$10]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00543999 E83664ECFF call 00409DD4
0054399E 8D85B4F8FFFF lea eax, [ebp+$FFFFF8B4]

* Possible String Reference to: '注'
|
005439A4 BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
005439A9 E85E08ECFF call 0040420C
005439AE 8B95B4F8FFFF mov edx, [ebp+$FFFFF8B4]
005439B4 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.sumLb : TLabel
|
005439B7 8B80A4060000 mov eax, [eax+$06A4]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
005439BD E8CA24EFFF call 00435E8C
005439C2 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.PageControl1 : TPageControl
|
005439C5 8B80F4020000 mov eax, [eax+$02F4]

* Reference to field TPageControl.ActivePage : TTabSheet
|
005439CB 8B8044020000 mov eax, [eax+$0244]
005439D1 8B55FC mov edx, [ebp-$04]

* Reference to control TFrway.TS9 : TTabSheet
|
005439D4 3B82E8070000 cmp eax, [edx+$07E8]
005439DA 0F85DE030000 jnz 00543DBE
005439E0 33C0 xor eax, eax
005439E2 8945F4 mov [ebp-$0C], eax
005439E5 33C0 xor eax, eax
005439E7 8945F0 mov [ebp-$10], eax

* Reference to TScreen instance
|
005439EA A1D4595800 mov eax, dword ptr [$005859D4]
005439EF 8B00 mov eax, [eax]
005439F1 66BAF5FF mov dx, $FFF5

* Reference to: forms.TScreen.SetCursor(TScreen;TCursor);
|
005439F5 E8C6F3F0FF call 00452DC0

* Reference to Tfrdata instance
|
005439FA A1BC525800 mov eax, dword ptr [$005852BC]
005439FF 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbmynum : TTable
|
00543A01 8B8074010000 mov eax, [eax+$0174]

* Reference to: db.TDataSet.First(TDataSet);
| or: db.TDataSet.Last(TDataSet);
|
00543A07 E8F429F5FF call 00496400
00543A0C E9E6020000 jmp 00543CF7
00543A11 C705B471580001000000 mov dword ptr [$005871B4], $00000001
00543A1B 8D95A8F8FFFF lea edx, [ebp+$FFFFF8A8]
00543A21 A1B4715800 mov eax, dword ptr [$005871B4]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00543A26 E8A963ECFF call 00409DD4
00543A2B 8B8DA8F8FFFF mov ecx, [ebp+$FFFFF8A8]
00543A31 8D85ACF8FFFF lea eax, [ebp+$FFFFF8AC]
00543A37 BA7C475400 mov edx, $0054477C

* Reference to: system.@LStrCat3;
|
00543A3C E80F08ECFF call 00404250
00543A41 8B95ACF8FFFF mov edx, [ebp+$FFFFF8AC]

* Reference to Tfrdata instance
|
00543A47 A1BC525800 mov eax, dword ptr [$005852BC]
00543A4C 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbmynum : TTable
|
00543A4E 8B8074010000 mov eax, [eax+$0174]

* Reference to: db.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
00543A54 E84B17F5FF call 004951A4
00543A59 8D95B0F8FFFF lea edx, [ebp+$FFFFF8B0]
00543A5F 8B08 mov ecx, [eax]

* Reference to method TTable.PSGetUpdateException(Exception,EUpdateError)
|
00543A61 FF5158 call dword ptr [ecx+$58]
00543A64 8B95B0F8FFFF mov edx, [ebp+$FFFFF8B0]
00543A6A B8F8715800 mov eax, $005871F8

* Reference to: system.@LStrAsg;
|
00543A6F E86405ECFF call 00403FD8
00543A74 A1F8715800 mov eax, dword ptr [$005871F8]

* Reference to: system.@LStrLen:Integer;
| or: system.@DynArrayLength;
| or: system.DynArraySize(Pointer):Integer;
|
00543A79 E88607ECFF call 00404204
00543A7E 83F802 cmp eax, +$02
00543A81 7421 jz 00543AA4
00543A83 33C9 xor ecx, ecx
00543A85 33D2 xor edx, edx

* Possible String Reference to: '号码输入有误'
|
00543A87 B888475400 mov eax, $00544788

* Reference to: Unit_004BD734.Proc_004BD86C
|
00543A8C E8DB9DF7FF call 004BD86C

* Reference to TScreen instance
|
00543A91 A1D4595800 mov eax, dword ptr [$005859D4]
00543A96 8B00 mov eax, [eax]
00543A98 33D2 xor edx, edx

* Reference to: forms.TScreen.SetCursor(TScreen;TCursor);
|
00543A9A E821F3F0FF call 00452DC0
00543A9F E945050000 jmp 00543FE9
00543AA4 33C0 xor eax, eax
00543AA6 55 push ebp
00543AA7 68C63A5400 push $00543AC6

***** TRY
|
00543AAC 64FF30 push dword ptr fs:[eax]
00543AAF 648920 mov fs:[eax], esp
00543AB2 A1F8715800 mov eax, dword ptr [$005871F8]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00543AB7 E84863ECFF call 00409E04
00543ABC 33C0 xor eax, eax
00543ABE 5A pop edx
00543ABF 59 pop ecx
00543AC0 59 pop ecx
00543AC1 648910 mov fs:[eax], edx
00543AC4 EB30 jmp 00543AF6

* Reference to: system.@HandleAnyException;
|
00543AC6 E919FCEBFF jmp 004036E4
00543ACB 33C9 xor ecx, ecx
00543ACD 33D2 xor edx, edx

* Possible String Reference to: '号码输入有误'
|
00543ACF B888475400 mov eax, $00544788

* Reference to: Unit_004BD734.Proc_004BD86C
|
00543AD4 E8939DF7FF call 004BD86C

* Reference to TScreen instance
|
00543AD9 A1D4595800 mov eax, dword ptr [$005859D4]
00543ADE 8B00 mov eax, [eax]
00543AE0 33D2 xor edx, edx

* Reference to: forms.TScreen.SetCursor(TScreen;TCursor);
|
00543AE2 E8D9F2F0FF call 00452DC0

* Reference to: system.@DoneExcept;
|
00543AE7 E854FFEBFF call 00403A40
00543AEC E9F8040000 jmp 00543FE9

* Reference to: system.@DoneExcept;
|
00543AF1 E84AFFEBFF call 00403A40

****** END
|
00543AF6 A1B4715800 mov eax, dword ptr [$005871B4]
00543AFB 8D048508725800 lea eax, [$587208+eax*4]
00543B02 8B15F8715800 mov edx, [$005871F8]

* Reference to: system.@LStrAsg;
|
00543B08 E8CB04ECFF call 00403FD8
00543B0D FF05B4715800 inc dword ptr [$005871B4]
00543B13 833DB471580008 cmp dword ptr [$005871B4], +$08
00543B1A 0F85FBFEFFFF jnz 00543A1B
00543B20 FF45F0 inc dword ptr [ebp-$10]
00543B23 803D0A72580074 cmp byte ptr [$0058720A], $74
00543B2A 0F8596000000 jnz 00543BC6
00543B30 FF350C725800 push dword ptr [$0058720C]
00543B36 6888445400 push $00544488
00543B3B FF3510725800 push dword ptr [$00587210]
00543B41 6888445400 push $00544488
00543B46 FF3514725800 push dword ptr [$00587214]
00543B4C 6888445400 push $00544488
00543B51 FF3518725800 push dword ptr [$00587218]
00543B57 6888445400 push $00544488
00543B5C FF351C725800 push dword ptr [$0058721C]
00543B62 6888445400 push $00544488
00543B67 FF3520725800 push dword ptr [$00587220]
00543B6D 6888445400 push $00544488
00543B72 FF3524725800 push dword ptr [$00587224]
00543B78 8D45DC lea eax, [ebp-$24]
00543B7B BA0D000000 mov edx, $0000000D

* Reference to: system.@LStrCatN;
|
00543B80 E83F07ECFF call 004042C4
00543B85 8D8554FCFFFF lea eax, [ebp+$FFFFFC54]
00543B8B 8B55DC mov edx, [ebp-$24]
00543B8E B9FF000000 mov ecx, $000000FF

* Reference to: system.@LStrToString;
|
00543B93 E84806ECFF call 004041E0
00543B98 8D9554FCFFFF lea edx, [ebp+$FFFFFC54]
00543B9E B83CBA5800 mov eax, $0058BA3C
00543BA3 B114 mov cl, $14

* Reference to: system.@PStrNCpy;
|
00543BA5 E83AF1EBFF call 00402CE4
00543BAA FF45F4 inc dword ptr [ebp-$0C]
00543BAD BA3CBA5800 mov edx, $0058BA3C
00543BB2 B854BA5800 mov eax, $0058BA54

* Reference to: system.@WriteRec;
|
00543BB7 E87034ECFF call 0040702C

* Reference to: System.Proc_004028A8
|
00543BBC E8E7ECEBFF call 004028A8
00543BC1 E91F010000 jmp 00543CE5
00543BC6 A10C725800 mov eax, dword ptr [$0058720C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00543BCB E83462ECFF call 00409E04

* Reference to GlobalVar_005872A0
|
00543BD0 A3A0725800 mov dword ptr [$005872A0], eax
00543BD5 A110725800 mov eax, dword ptr [$00587210]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00543BDA E82562ECFF call 00409E04

* Reference to GlobalVar_005872A4
|
00543BDF A3A4725800 mov dword ptr [$005872A4], eax
00543BE4 A114725800 mov eax, dword ptr [$00587214]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00543BE9 E81662ECFF call 00409E04

* Reference to GlobalVar_005872A8
|
00543BEE A3A8725800 mov dword ptr [$005872A8], eax
00543BF3 A118725800 mov eax, dword ptr [$00587218]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00543BF8 E80762ECFF call 00409E04

* Reference to GlobalVar_005872AC
|
00543BFD A3AC725800 mov dword ptr [$005872AC], eax
00543C02 A11C725800 mov eax, dword ptr [$0058721C]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00543C07 E8F861ECFF call 00409E04

* Reference to GlobalVar_005872B0
|
00543C0C A3B0725800 mov dword ptr [$005872B0], eax
00543C11 A120725800 mov eax, dword ptr [$00587220]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00543C16 E8E961ECFF call 00409E04

* Reference to GlobalVar_005872B4
|
00543C1B A3B4725800 mov dword ptr [$005872B4], eax
00543C20 A124725800 mov eax, dword ptr [$00587224]

* Reference to: Unit_00408BD4.Proc_00409E04
|
00543C25 E8DA61ECFF call 00409E04

* Reference to GlobalVar_005872B8
|
00543C2A A3B8725800 mov dword ptr [$005872B8], eax
00543C2F 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.btfilter : TButton
|
00543C32 8B9828090000 mov ebx, [eax+$0928]
00543C38 8B55F8 mov edx, [ebp-$08]

* Reference to field TButton.OFFS_010C
|
00543C3B 8B830C010000 mov eax, [ebx+$010C]

* Possible reference to virtual method TButton.OFFS_0108
|
00543C41 FF9308010000 call dword ptr [ebx+$0108]
00543C47 803D0972580074 cmp byte ptr [$00587209], $74
00543C4E 0F8591000000 jnz 00543CE5
00543C54 FF350C725800 push dword ptr [$0058720C]
00543C5A 6888445400 push $00544488
00543C5F FF3510725800 push dword ptr [$00587210]
00543C65 6888445400 push $00544488
00543C6A FF3514725800 push dword ptr [$00587214]
00543C70 6888445400 push $00544488
00543C75 FF3518725800 push dword ptr [$00587218]
00543C7B 6888445400 push $00544488
00543C80 FF351C725800 push dword ptr [$0058721C]
00543C86 6888445400 push $00544488
00543C8B FF3520725800 push dword ptr [$00587220]
00543C91 6888445400 push $00544488
00543C96 FF3524725800 push dword ptr [$00587224]
00543C9C 8D45DC lea eax, [ebp-$24]
00543C9F BA0D000000 mov edx, $0000000D

* Reference to: system.@LStrCatN;
|
00543CA4 E81B06ECFF call 004042C4
00543CA9 8D8554FCFFFF lea eax, [ebp+$FFFFFC54]
00543CAF 8B55DC mov edx, [ebp-$24]
00543CB2 B9FF000000 mov ecx, $000000FF

* Reference to: system.@LStrToString;
|
00543CB7 E82405ECFF call 004041E0
00543CBC 8D9554FCFFFF lea edx, [ebp+$FFFFFC54]
00543CC2 B83CBA5800 mov eax, $0058BA3C
00543CC7 B114 mov cl, $14

* Reference to: system.@PStrNCpy;
|
00543CC9 E816F0EBFF call 00402CE4
00543CCE BA3CBA5800 mov edx, $0058BA3C
00543CD3 B854BA5800 mov eax, $0058BA54

* Reference to: system.@WriteRec;
|
00543CD8 E84F33ECFF call 0040702C

* Reference to: System.Proc_004028A8
|
00543CDD E8C6EBEBFF call 004028A8
00543CE2 FF45F4 inc dword ptr [ebp-$0C]

* Reference to Tfrdata instance
|
00543CE5 A1BC525800 mov eax, dword ptr [$005852BC]
00543CEA 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbmynum : TTable
|
00543CEC 8B8074010000 mov eax, [eax+$0174]

* Reference to: db.TDataSet.Next(TDataSet);
|
00543CF2 E8D529F5FF call 004966CC

* Reference to Tfrdata instance
|
00543CF7 A1BC525800 mov eax, dword ptr [$005852BC]
00543CFC 8B00 mov eax, [eax]

* Reference to control Tfrdata.tbmynum : TTable
|
00543CFE 8B8074010000 mov eax, [eax+$0174]

* Reference to field TTable.Eof : Boolean
|
00543D04 80B89100000000 cmp byte ptr [eax+$0091], $00
00543D0B 0F8400FDFFFF jz 00543A11

* Reference to TScreen instance
|
00543D11 A1D4595800 mov eax, dword ptr [$005859D4]
00543D16 8B00 mov eax, [eax]
00543D18 33D2 xor edx, edx

* Reference to: forms.TScreen.SetCursor(TScreen;TCursor);
|
00543D1A E8A1F0F0FF call 00452DC0
00543D1F 8D95A4F8FFFF lea edx, [ebp+$FFFFF8A4]
00543D25 8B45F0 mov eax, [ebp-$10]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00543D28 E8A760ECFF call 00409DD4
00543D2D 8D85A4F8FFFF lea eax, [ebp+$FFFFF8A4]

* Possible String Reference to: '注'
|
00543D33 BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
00543D38 E8CF04ECFF call 0040420C
00543D3D 8B95A4F8FFFF mov edx, [ebp+$FFFFF8A4]
00543D43 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Label8 : TLabel
|
00543D46 8B8014030000 mov eax, [eax+$0314]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
00543D4C E83B21EFFF call 00435E8C
00543D51 8D95A0F8FFFF lea edx, [ebp+$FFFFF8A0]
00543D57 8B45F0 mov eax, [ebp-$10]
00543D5A 2B45F4 sub eax, dword ptr [ebp-$0C]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00543D5D E87260ECFF call 00409DD4
00543D62 8D85A0F8FFFF lea eax, [ebp+$FFFFF8A0]

* Possible String Reference to: '注'
|
00543D68 BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
00543D6D E89A04ECFF call 0040420C
00543D72 8B95A0F8FFFF mov edx, [ebp+$FFFFF8A0]
00543D78 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Label9 : TLabel
|
00543D7B 8B8018030000 mov eax, [eax+$0318]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
00543D81 E80621EFFF call 00435E8C
00543D86 8D959CF8FFFF lea edx, [ebp+$FFFFF89C]
00543D8C 8B45F4 mov eax, [ebp-$0C]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00543D8F E84060ECFF call 00409DD4
00543D94 8D859CF8FFFF lea eax, [ebp+$FFFFF89C]

* Possible String Reference to: '注'
|
00543D9A BA94445400 mov edx, $00544494

* Reference to: system.@LStrCat;
|
00543D9F E86804ECFF call 0040420C
00543DA4 8B959CF8FFFF mov edx, [ebp+$FFFFF89C]
00543DAA 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.sumLb : TLabel
|
00543DAD 8B80A4060000 mov eax, [eax+$06A4]

* Reference to: controls.TControl.SetText(TControl;TCaption);
|
00543DB3 E8D420EFFF call 00435E8C
00543DB8 8B45F4 mov eax, [ebp-$0C]
00543DBB 8945F0 mov [ebp-$10], eax
00543DBE B854BA5800 mov eax, $0058BA54

* Reference to: system.@Close;
|
00543DC3 E88C2CECFF call 00406A54

* Reference to: System.Proc_004028A8
|
00543DC8 E8DBEAEBFF call 004028A8
00543DCD 8B1504725800 mov edx, [$00587204]
00543DD3 B854BA5800 mov eax, $0058BA54

* Reference to: system.@Assign(Text;Text;ShortString);
|
00543DD8 E8D52BECFF call 004069B2
00543DDD 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.Label29 : TLabel
|
00543DE0 8B80B8060000 mov eax, [eax+$06B8]
00543DE6 8B55F0 mov edx, [ebp-$10]

* Reference to field TLabel.Tag : Longint
|
00543DE9 89500C mov [eax+$0C], edx
00543DEC 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.SB1 : TScrollBar
|
00543DEF 8B80A8060000 mov eax, [eax+$06A8]
00543DF5 33D2 xor edx, edx

* Reference to: stdctrls.TScrollBar.SetPosition(TScrollBar;Integer);
|
00543DF7 E8D4C6EEFF call 004304D0
00543DFC 837DF000 cmp dword ptr [ebp-$10], +$00
00543E00 7554 jnz 00543E56
00543E02 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.SG1 : TStringGrid
|
00543E05 8B80EC020000 mov eax, [eax+$02EC]
00543E0B 33D2 xor edx, edx

* Reference to: grids.TCustomGrid.SetRowCount(TCustomGrid;Longint);
|
00543E0D E8EE72F7FF call 004BB100
00543E12 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.SB1 : TScrollBar
|
00543E15 8B80A8060000 mov eax, [eax+$06A8]
00543E1B 33D2 xor edx, edx

* Reference to: stdctrls.TScrollBar.SetMax(TScrollBar;Integer);
|
00543E1D E832C7EEFF call 00430554
00543E22 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.SG1 : TStringGrid
|
00543E25 8B80EC020000 mov eax, [eax+$02EC]
00543E2B BA01000000 mov edx, $00000001

* Reference to: grids.TStringGrid.GetCols(TStringGrid;Integer):TStrings;
|
00543E30 E8BF94F7FF call 004BD2F4
00543E35 33D2 xor edx, edx
00543E37 8B08 mov ecx, [eax]

* Reference to method TStringGrid.Create(TComponent)
|
00543E39 FF512C call dword ptr [ecx+$2C]
00543E3C 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.SG1 : TStringGrid
|
00543E3F 8B80EC020000 mov eax, [eax+$02EC]
00543E45 BA03000000 mov edx, $00000003

* Reference to: grids.TStringGrid.GetCols(TStringGrid;Integer):TStrings;
|
00543E4A E8A594F7FF call 004BD2F4
00543E4F 33D2 xor edx, edx
00543E51 8B08 mov ecx, [eax]

* Reference to method TStringGrid.Create(TComponent)
|
00543E53 FF512C call dword ptr [ecx+$2C]
00543E56 837DF000 cmp dword ptr [ebp-$10], +$00
00543E5A 0F8E89010000 jle 00543FE9
00543E60 BA15000000 mov edx, $00000015
00543E65 B854BA5800 mov eax, $0058BA54

* Reference to: System.Proc_00406FA1
|
00543E6A E83231ECFF call 00406FA1

* Reference to: System.Proc_004028A8
|
00543E6F E834EAEBFF call 004028A8
00543E74 837DF011 cmp dword ptr [ebp-$10], +$11
00543E78 0F8EB3000000 jle 00543F31
00543E7E 8B55F0 mov edx, [ebp-$10]
00543E81 83EA11 sub edx, +$11
00543E84 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.SB1 : TScrollBar
|
00543E87 8B80A8060000 mov eax, [eax+$06A8]

* Reference to: stdctrls.TScrollBar.SetMax(TScrollBar;Integer);
|
00543E8D E8C2C6EEFF call 00430554
00543E92 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.SG1 : TStringGrid
|
00543E95 8B80EC020000 mov eax, [eax+$02EC]
00543E9B BA11000000 mov edx, $00000011

* Reference to: grids.TCustomGrid.SetRowCount(TCustomGrid;Longint);
|
00543EA0 E85B72F7FF call 004BB100
00543EA5 33FF xor edi, edi
00543EA7 8BD7 mov edx, edi
00543EA9 B854BA5800 mov eax, $0058BA54

* Reference to: system.@Seek;
|
00543EAE E82531ECFF call 00406FD8

* Reference to: System.Proc_004028A8
|
00543EB3 E8F0E9EBFF call 004028A8
00543EB8 BA3CBA5800 mov edx, $0058BA3C
00543EBD B854BA5800 mov eax, $0058BA54

* Reference to: system.@ReadRec;
|
00543EC2 E8B12DECFF call 00406C78

* Reference to: System.Proc_004028A8
|
00543EC7 E8DCE9EBFF call 004028A8
00543ECC 8D8598F8FFFF lea eax, [ebp+$FFFFF898]
00543ED2 BA3CBA5800 mov edx, $0058BA3C

* Reference to: system.@LStrFromString(String;String;ShortString;ShortString);
| or: system.@WStrFromString(WideString;WideString;ShortString;ShortString);
|
00543ED7 E8CC02ECFF call 004041A8
00543EDC 8B8598F8FFFF mov eax, [ebp+$FFFFF898]
00543EE2 50 push eax
00543EE3 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.SG1 : TStringGrid
|
00543EE6 8B80EC020000 mov eax, [eax+$02EC]
00543EEC 8BCF mov ecx, edi
00543EEE BA03000000 mov edx, $00000003

* Reference to: grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
00543EF3 E83894F7FF call 004BD330
00543EF8 8D9594F8FFFF lea edx, [ebp+$FFFFF894]
00543EFE 8D4701 lea eax, [edi+$01]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00543F01 E8CE5EECFF call 00409DD4
00543F06 8B8594F8FFFF mov eax, [ebp+$FFFFF894]
00543F0C 50 push eax
00543F0D 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.SG1 : TStringGrid
|
00543F10 8B80EC020000 mov eax, [eax+$02EC]
00543F16 8BCF mov ecx, edi
00543F18 BA01000000 mov edx, $00000001

* Reference to: grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
00543F1D E80E94F7FF call 004BD330
00543F22 47 inc edi
00543F23 83FF11 cmp edi, +$11
00543F26 0F857BFFFFFF jnz 00543EA7
00543F2C E9B8000000 jmp 00543FE9
00543F31 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.SB1 : TScrollBar
|
00543F34 8B80A8060000 mov eax, [eax+$06A8]
00543F3A 33D2 xor edx, edx

* Reference to: stdctrls.TScrollBar.SetMax(TScrollBar;Integer);
|
00543F3C E813C6EEFF call 00430554
00543F41 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.SG1 : TStringGrid
|
00543F44 8B80EC020000 mov eax, [eax+$02EC]
00543F4A 8B55F0 mov edx, [ebp-$10]

* Reference to: grids.TCustomGrid.SetRowCount(TCustomGrid;Longint);
|
00543F4D E8AE71F7FF call 004BB100
00543F52 8B45F0 mov eax, [ebp-$10]
00543F55 48 dec eax
00543F56 85C0 test eax, eax
00543F58 0F8C8B000000 jl 00543FE9
00543F5E 40 inc eax
00543F5F 8945CC mov [ebp-$34], eax
00543F62 33FF xor edi, edi
00543F64 8BD7 mov edx, edi
00543F66 B854BA5800 mov eax, $0058BA54

* Reference to: system.@Seek;
|
00543F6B E86830ECFF call 00406FD8

* Reference to: System.Proc_004028A8
|
00543F70 E833E9EBFF call 004028A8
00543F75 BA3CBA5800 mov edx, $0058BA3C
00543F7A B854BA5800 mov eax, $0058BA54

* Reference to: system.@ReadRec;
|
00543F7F E8F42CECFF call 00406C78

* Reference to: System.Proc_004028A8
|
00543F84 E81FE9EBFF call 004028A8
00543F89 8D8590F8FFFF lea eax, [ebp+$FFFFF890]
00543F8F BA3CBA5800 mov edx, $0058BA3C

* Reference to: system.@LStrFromString(String;String;ShortString;ShortString);
| or: system.@WStrFromString(WideString;WideString;ShortString;ShortString);
|
00543F94 E80F02ECFF call 004041A8
00543F99 8B8590F8FFFF mov eax, [ebp+$FFFFF890]
00543F9F 50 push eax
00543FA0 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.SG1 : TStringGrid
|
00543FA3 8B80EC020000 mov eax, [eax+$02EC]
00543FA9 8BCF mov ecx, edi
00543FAB BA03000000 mov edx, $00000003

* Reference to: grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
00543FB0 E87B93F7FF call 004BD330
00543FB5 8D958CF8FFFF lea edx, [ebp+$FFFFF88C]
00543FBB 8D4701 lea eax, [edi+$01]

* Reference to: Unit_00408BD4.Proc_00409DD4
|
00543FBE E8115EECFF call 00409DD4
00543FC3 8B858CF8FFFF mov eax, [ebp+$FFFFF88C]
00543FC9 50 push eax
00543FCA 8B45FC mov eax, [ebp-$04]

* Reference to control TFrway.SG1 : TStringGrid
|
00543FCD 8B80EC020000 mov eax, [eax+$02EC]
00543FD3 8BCF mov ecx, edi
00543FD5 BA01000000 mov edx, $00000001

* Reference to: grids.TStringGrid.SetCells(TStringGrid;Integer;Integer;AnsiString);
|
00543FDA E85193F7FF call 004BD330
00543FDF 47 inc edi
00543FE0 FF4DCC dec dword ptr [ebp-$34]
00543FE3 0F857BFFFFFF jnz 00543F64
00543FE9 33C0 xor eax, eax
00543FEB 5A pop edx
00543FEC 59 pop ecx
00543FED 59 pop ecx
00543FEE 648910 mov fs:[eax], edx

****** FINALLY
|
00543FF1 680D425400 push $0054420D
00543FF6 8D858CF8FFFF lea eax, [ebp+$FFFFF88C]
00543FFC BA0F000000 mov edx, $0000000F

* Reference to: system.@LStrArrayClr;
|
00544001 E8A2FFEBFF call 00403FA8
00544006 8D85C8F8FFFF lea eax, [ebp+$FFFFF8C8]
0054400C BA04000000 mov edx, $00000004

* Reference to: system.@LStrArrayClr;
|
00544011 E892FFEBFF call 00403FA8
00544016 8D85D8F8FFFF lea eax, [ebp+$FFFFF8D8]

* Reference to: system.@VarClr;
|
0054401C E86317ECFF call 00405784
00544021 8D85E8F8FFFF lea eax, [ebp+$FFFFF8E8]
00544027 BA04000000 mov edx, $00000004

* Reference to: system.@LStrArrayClr;
|
0054402C E877FFEBFF call 00403FA8
00544031 8D85F8F8FFFF lea eax, [ebp+$FFFFF8F8]

* Reference to: system.@VarClr;
|
00544037 E84817ECFF call 00405784
0054403C 8D8508F9FFFF lea eax, [ebp+$FFFFF908]
00544042 BA04000000 mov edx, $00000004

* Reference to: system.@LStrArrayClr;
|
00544047 E85CFFEBFF call 00403FA8
0054404C 8D8518F9FFFF lea eax, [ebp+$FFFFF918]
00544052 BA04000000 mov edx, $00000004

* Reference to: system.@LStrArrayClr;
|
00544057 E84CFFEBFF call 00403FA8
0054405C 8D8528F9FFFF lea eax, [ebp+$FFFFF928]

* Reference to: system.@VarClr;
|
00544062 E81D17ECFF call 00405784
00544067 8D8538F9FFFF lea eax, [ebp+$FFFFF938]
0054406D BA04000000 mov edx, $00000004

* Reference to: system.@LStrArrayClr;
|
00544072 E831FFEBFF call 00403FA8
00544077 8D8548F9FFFF lea eax, [ebp+$FFFFF948]
0054407D BA2C000000 mov edx, $0000002C

* Reference to: system.@LStrArrayClr;
|
00544082 E821FFEBFF call 00403FA8
00544087 8D85F8F9FFFF lea eax, [ebp+$FFFFF9F8]
0054408D BA04000000 mov edx, $00000004

* Reference to: system.@LStrArrayClr;
|
00544092 E811FFEBFF call 00403FA8
00544097 8D8508FAFFFF lea eax, [ebp+$FFFFFA08]
0054409D BA04000000 mov edx, $00000004

* Reference to: system.@LStrArrayClr;
|
005440A2 E801FFEBFF call 00403FA8
005440A7 8D8538FAFFFF lea eax, [ebp+$FFFFFA38]

* Reference to: system.@LStrClr(String;String);
|
005440AD E8D2FEEBFF call 00403F84
005440B2 8D855CFAFFFF lea eax, [ebp+$FFFFFA5C]
005440B8 BA05000000 mov edx, $00000005

* Reference to: system.@LStrArrayClr;
|
005440BD E8E6FEEBFF call 00403FA8
005440C2 8D8570FAFFFF lea eax, [ebp+$FFFFFA70]

* Reference to: system.@VarClr;
|
005440C8 E8B716ECFF call 00405784
005440CD 8D8580FAFFFF lea eax, [ebp+$FFFFFA80]

* Reference to: system.@LStrClr(String;String);
|
005440D3 E8ACFEEBFF call 00403F84
005440D8 8D8584FAFFFF lea eax, [ebp+$FFFFFA84]
005440DE BA02000000 mov edx, $00000002

* Reference to: system.@LStrArrayClr;
|
005440E3 E8C0FEEBFF call 00403FA8
005440E8 8D858CFAFFFF lea eax, [ebp+$FFFFFA8C]
005440EE BA03000000 mov edx, $00000003

* Reference to: system.@LStrArrayClr;
|
005440F3 E8B0FEEBFF call 00403FA8
005440F8 8D85A0FAFFFF lea eax, [ebp+$FFFFFAA0]

* Reference to: system.@VarClr;
|
005440FE E88116ECFF call 00405784
00544103 8D85B0FAFFFF lea eax, [ebp+$FFFFFAB0]
00544109 BA28000000 mov edx, $00000028

* Reference to: system.@LStrArrayClr;
|
0054410E E895FEEBFF call 00403FA8
00544113 8D8550FBFFFF lea eax, [ebp+$FFFFFB50]
00544119 BA0A000000 mov edx, $0000000A

* Reference to: system.@LStrArrayClr;
|
0054411E E885FEEBFF call 00403FA8
00544123 8D8578FBFFFF lea eax, [ebp+$FFFFFB78]

* Reference to: system.@LStrClr(String;String);
|
00544129 E856FEEBFF call 00403F84
0054412E 8D857CFBFFFF lea eax, [ebp+$FFFFFB7C]
00544134 BA02000000 mov edx, $00000002

* Reference to: system.@LStrArrayClr;
|
00544139 E86AFEEBFF call 00403FA8
0054413E 8D8584FBFFFF lea eax, [ebp+$FFFFFB84]
00544144 BA07000000 mov edx, $00000007

* Reference to: system.@LStrArrayClr;
|
00544149 E85AFEEBFF call 00403FA8
0054414E 8D85A0FBFFFF lea eax, [ebp+$FFFFFBA0]

* Reference to: system.@LStrClr(String;String);
|
00544154 E82BFEEBFF call 00403F84
00544159 8D85A4FBFFFF lea eax, [ebp+$FFFFFBA4]
0054415F BA06000000 mov edx, $00000006

* Reference to: system.@LStrArrayClr;
|
00544164 E83FFEEBFF call 00403FA8
00544169 8D85BCFBFFFF lea eax, [ebp+$FFFFFBBC]

* Reference to: system.@LStrClr(String;String);
|
0054416F E810FEEBFF call 00403F84
00544174 8D85C0FBFFFF lea eax, [ebp+$FFFFFBC0]
0054417A BA04000000 mov edx, $00000004

* Reference to: system.@LStrArrayClr;
|
0054417F E824FEEBFF call 00403FA8
00544184 8D85D0FBFFFF lea eax, [ebp+$FFFFFBD0]

* Reference to: system.@LStrClr(String;String);
|
0054418A E8F5FDEBFF call 00403F84
0054418F 8D85D4FBFFFF lea eax, [ebp+$FFFFFBD4]
00544195 BA02000000 mov edx, $00000002

* Reference to: system.@LStrArrayClr;
|
0054419A E809FEEBFF call 00403FA8
0054419F 8D85DCFBFFFF lea eax, [ebp+$FFFFFBDC]
005441A5 BA05000000 mov edx, $00000005

* Reference to: system.@LStrArrayClr;
|
005441AA E8F9FDEBFF call 00403FA8
005441AF 8D85F0FBFFFF lea eax, [ebp+$FFFFFBF0]
005441B5 BA06000000 mov edx, $00000006

* Reference to: system.@LStrArrayClr;
|
005441BA E8E9FDEBFF call 00403FA8
005441BF 8D8508FCFFFF lea eax, [ebp+$FFFFFC08]
005441C5 BA0A000000 mov edx, $0000000A

* Reference to: system.@LStrArrayClr;
|
005441CA E8D9FDEBFF call 00403FA8
005441CF 8D8550FCFFFF lea eax, [ebp+$FFFFFC50]

* Reference to: system.@LStrClr(String;String);
|
005441D5 E8AAFDEBFF call 00403F84
005441DA 8D855CFDFFFF lea eax, [ebp+$FFFFFD5C]
005441E0 BA1C000000 mov edx, $0000001C

* Reference to: system.@LStrArrayClr;
|
005441E5 E8BEFDEBFF call 00403FA8
005441EA 8D85CCFDFFFF lea eax, [ebp+$FFFFFDCC]
005441F0 BA03000000 mov edx, $00000003

* Reference to: system.@LStrArrayClr;
|
005441F5 E8AEFDEBFF call 00403FA8
005441FA 8D45DC lea eax, [ebp-$24]

* Reference to: system.@LStrClr(String;String);
|
005441FD E882FDEBFF call 00403F84
00544202 C3 ret


* Reference to: system.@HandleFinally;
|
00544203 E990F7EBFF jmp 00403998
00544208 E9E9FDFFFF jmp 00543FF6

****** END
|
0054420D 5F pop edi
0054420E 5E pop esi
0054420F 5B pop ebx
00544210 8BE5 mov esp, ebp
00544212 5D pop ebp
00544213 C3 ret
 
需要用到散列表,也就是用散列表来保存组号在文件中的记录位置,建议你看看 delphi 版的数据结构与算法一书。
 
看看这里
http://www.anylib.com
 
能否谈具体点,我是新手。能否写一例子?谢了!!
 

Similar threads

I
回复
0
查看
843
import
I
I
回复
0
查看
572
import
I
I
回复
0
查看
473
import
I
I
回复
0
查看
654
import
I
后退
顶部