procedure TfrmLog.BitBtn2Click(Sender : TObject);
begin
(*
00536348 55 push ebp
00536349 8BEC mov ebp, esp
0053634B B945000000 mov ecx, $00000045
00536350 6A00 push $00
00536352 6A00 push $00
00536354 49 dec ecx
00536355 75F9 jnz 00536350
00536357 51 push ecx
00536358 53 push ebx
00536359 8BD8 mov ebx, eax
0053635B 33C0 xor eax, eax
0053635D 55 push ebp
* Possible String Reference to: '槎蒽?k???]镁??
|
0053635E 68F5675300 push $005367F5
***** TRY
|
00536363 64FF30 push dword ptr fs:[eax]
00536366 648920 mov fs:[eax], esp
00536369 8D9510FEFFFF lea edx, [ebp+$FFFFFE10]
* Reference to control Edit3 : N.A.
|
0053636F 8B8304030000 mov eax, [ebx+$0304]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
00536375 E8125AF3FF call 0046BD8C
0053637A 8B8510FEFFFF mov eax, [ebp+$FFFFFE10]
00536380 8D9514FEFFFF lea edx, [ebp+$FFFFFE14]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
00536386 E8C931EDFF call 00409554
0053638B 8B8514FEFFFF mov eax, [ebp+$FFFFFE14]
* Reference to: System.@LStrLen(String):Integer;
| or: System.@DynArrayLength;
| or: System.DynArraySize(Pointer):Integer;
| or: Variants.DynArraySize(Pointer):Integer;
|
00536391 E8D6EAECFF call 00404E6C
00536396 83F808 cmp eax, +$08
00536399 742A jz 005363C5
0053639B 33D2 xor edx, edx
* Reference to control Edit3 : N.A.
|
0053639D 8B8304030000 mov eax, [ebx+$0304]
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
005363A3 E8145AF3FF call 0046BDBC
005363A8 6A00 push $00
* Possible String Reference to: '警告'
|
005363AA B904685300 mov ecx, $00536804
* Possible String Reference to: '用户编号位数不对,请重新输入'
|
005363AF BA0C685300 mov edx, $0053680C
005363B4 A1043A5400 mov eax, dword ptr [$00543A04]
005363B9 8B00 mov eax, [eax]
* Reference to: Forms.TApplication.MessageBox(TApplication;PChar;PChar;Longint):Integer;
|
005363BB E8F05CF5FF call 0048C0B0
005363C0 E998030000 jmp 0053675D
005363C5 8D9508FEFFFF lea edx, [ebp+$FFFFFE08]
* Reference to control Label3 : TLabel
|
005363CB 8B8310030000 mov eax, [ebx+$0310]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
005363D1 E8B659F3FF call 0046BD8C
005363D6 8B8508FEFFFF mov eax, [ebp+$FFFFFE08]
005363DC 8D950CFEFFFF lea edx, [ebp+$FFFFFE0C]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
005363E2 E86D31EDFF call 00409554
005363E7 8B850CFEFFFF mov eax, [ebp+$FFFFFE0C]
* Reference to: System.@LStrLen(String):Integer;
| or: System.@DynArrayLength;
| or: System.DynArraySize(Pointer):Integer;
| or: Variants.DynArraySize(Pointer):Integer;
|
005363ED E87AEAECFF call 00404E6C
005363F2 83F817 cmp eax, +$17
005363F5 742A jz 00536421
005363F7 33D2 xor edx, edx
* Reference to control Label3 : TLabel
|
005363F9 8B8310030000 mov eax, [ebx+$0310]
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
005363FF E8B859F3FF call 0046BDBC
00536404 6A00 push $00
* Possible String Reference to: '警告'
|
00536406 B904685300 mov ecx, $00536804
* Possible String Reference to: '注册码不对,请重新输入'
|
0053640B BA2C685300 mov edx, $0053682C
00536410 A1043A5400 mov eax, dword ptr [$00543A04]
00536415 8B00 mov eax, [eax]
* Reference to: Forms.TApplication.MessageBox(TApplication;PChar;PChar;Longint):Integer;
|
00536417 E8945CF5FF call 0048C0B0
0053641C E93C030000 jmp 0053675D
00536421 8D9500FEFFFF lea edx, [ebp+$FFFFFE00]
* Reference to control Edit3 : N.A.
|
00536427 8B8304030000 mov eax, [ebx+$0304]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
0053642D E85A59F3FF call 0046BD8C
00536432 8B8500FEFFFF mov eax, [ebp+$FFFFFE00]
00536438 8D9504FEFFFF lea edx, [ebp+$FFFFFE04]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0053643E E81131EDFF call 00409554
00536443 8B8504FEFFFF mov eax, [ebp+$FFFFFE04]
00536449 8D55F4 lea edx, [ebp-$0C]
|
0053644C E8C3770000 call 0053DC14
00536451 8D95FCFDFFFF lea edx, [ebp+$FFFFFDFC]
* Reference to control Label3 : TLabel
|
00536457 8B8310030000 mov eax, [ebx+$0310]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
0053645D E82A59F3FF call 0046BD8C
00536462 8B85FCFDFFFF mov eax, [ebp+$FFFFFDFC]
00536468 8D55F8 lea edx, [ebp-$08]
* Reference to: SysUtils.Trim(AnsiString):AnsiString;overload;
|
0053646B E8E430EDFF call 00409554
00536470 8D85F8FDFFFF lea eax, [ebp+$FFFFFDF8]
00536476 50 push eax
00536477 B905000000 mov ecx, $00000005
0053647C BA01000000 mov edx, $00000001
00536481 8B45F8 mov eax, [ebp-$08]
* Reference to: System.@LStrCopy;
|
00536484 E843ECECFF call 004050CC
00536489 FFB5F8FDFFFF push dword ptr [ebp+$FFFFFDF8]
0053648F 8D85F4FDFFFF lea eax, [ebp+$FFFFFDF4]
00536495 50 push eax
00536496 B905000000 mov ecx, $00000005
0053649B BA07000000 mov edx, $00000007
005364A0 8B45F8 mov eax, [ebp-$08]
* Reference to: System.@LStrCopy;
|
005364A3 E824ECECFF call 004050CC
005364A8 FFB5F4FDFFFF push dword ptr [ebp+$FFFFFDF4]
005364AE 8D85F0FDFFFF lea eax, [ebp+$FFFFFDF0]
005364B4 50 push eax
005364B5 B905000000 mov ecx, $00000005
005364BA BA0D000000 mov edx, $0000000D
005364BF 8B45F8 mov eax, [ebp-$08]
* Reference to: System.@LStrCopy;
|
005364C2 E805ECECFF call 004050CC
005364C7 FFB5F0FDFFFF push dword ptr [ebp+$FFFFFDF0]
005364CD 8D85ECFDFFFF lea eax, [ebp+$FFFFFDEC]
005364D3 50 push eax
005364D4 B905000000 mov ecx, $00000005
005364D9 BA13000000 mov edx, $00000013
005364DE 8B45F8 mov eax, [ebp-$08]
* Reference to: System.@LStrCopy;
|
005364E1 E8E6EBECFF call 004050CC
005364E6 FFB5ECFDFFFF push dword ptr [ebp+$FFFFFDEC]
005364EC 8D45FC lea eax, [ebp-$04]
005364EF BA04000000 mov edx, $00000004
* Reference to: System.@LStrCatN;
|
005364F4 E833EAECFF call 00404F2C
005364F9 8D95E8FDFFFF lea edx, [ebp+$FFFFFDE8]
005364FF 8B45FC mov eax, [ebp-$04]
* Reference to: SysUtils.LowerCase(AnsiString):AnsiString;
|
00536502 E8192EEDFF call 00409320
00536507 8B95E8FDFFFF mov edx, [ebp+$FFFFFDE8]
0053650D 8D45FC lea eax, [ebp-$04]
* Reference to: System.@LStrLAsg(void;void;void;void);
|
00536510 E82FE7ECFF call 00404C44
00536515 8D4DF8 lea ecx, [ebp-$08]
00536518 8B55F4 mov edx, [ebp-$0C]
0053651B 8B45FC mov eax, [ebp-$04]
|
0053651E E881750000 call 0053DAA4
00536523 8D95E4FDFFFF lea edx, [ebp+$FFFFFDE4]
00536529 8B45F8 mov eax, [ebp-$08]
|
0053652C E8AF720000 call 0053D7E0
00536531 8B95E4FDFFFF mov edx, [ebp+$FFFFFDE4]
00536537 8D45F8 lea eax, [ebp-$08]
* Reference to: System.@LStrLAsg(void;void;void;void);
|
0053653A E805E7ECFF call 00404C44
0053653F 8D55F0 lea edx, [ebp-$10]
00536542 A1D4395400 mov eax, dword ptr [$005439D4]
00536547 8B00 mov eax, [eax]
|
00536549 E892720000 call 0053D7E0
0053654E 8D45EC lea eax, [ebp-$14]
00536551 50 push eax
00536552 B90C000000 mov ecx, $0000000C
00536557 BA01000000 mov edx, $00000001
0053655C 8B45F8 mov eax, [ebp-$08]
* Reference to: System.@LStrCopy;
|
0053655F E868EBECFF call 004050CC
00536564 8D45E8 lea eax, [ebp-$18]
00536567 50 push eax
00536568 B908000000 mov ecx, $00000008
0053656D BA0D000000 mov edx, $0000000D
00536572 8B45F8 mov eax, [ebp-$08]
* Reference to: System.@LStrCopy;
|
00536575 E852EBECFF call 004050CC
0053657A 8B45EC mov eax, [ebp-$14]
* Possible String Reference to: 'ankjltd92s3s'
|
0053657D BA4C685300 mov edx, $0053684C
* Reference to: System.@LStrCmp;
|
00536582 E831EAECFF call 00404FB8
00536587 0F85AF000000 jnz 0053663C
0053658D 8B45E8 mov eax, [ebp-$18]
* Possible String Reference to: 'iklloury'
|
00536590 BA64685300 mov edx, $00536864
* Reference to: System.@LStrCmp;
|
00536595 E81EEAECFF call 00404FB8
0053659A 0F859C000000 jnz 0053663C
005365A0 8B15D4385400 mov edx, [$005438D4]
005365A6 8B12 mov edx, [edx]
005365A8 8D45E4 lea eax, [ebp-$1C]
* Possible String Reference to: '\keycode.txt'
|
005365AB B978685300 mov ecx, $00536878
* Reference to: System.@LStrCat3;
|
005365B0 E803E9ECFF call 00404EB8
005365B5 8B55E4 mov edx, [ebp-$1C]
005365B8 8D8518FEFFFF lea eax, [ebp+$FFFFFE18]
* Reference to: System.@Assign(TTextRec;TTextRec;String):Integer;
|
005365BE E859C9ECFF call 00402F1C
005365C3 8D8518FEFFFF lea eax, [ebp+$FFFFFE18]
* Reference to: System.@RewritText(TTextRec;TTextRec):Integer;
|
005365C9 E8EAC6ECFF call 00402CB8
|
005365CE E8BDC3ECFF call 00402990
005365D3 8D95E0FDFFFF lea edx, [ebp+$FFFFFDE0]
* Reference to control Edit3 : N.A.
|
005365D9 8B8304030000 mov eax, [ebx+$0304]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
005365DF E8A857F3FF call 0046BD8C
005365E4 8B95E0FDFFFF mov edx, [ebp+$FFFFFDE0]
005365EA 8D8518FEFFFF lea eax, [ebp+$FFFFFE18]
* Reference to: Classes.TStream.WriteComponent(TStream;TComponent);
| or: Classes.TWriter.WriteRootComponent(TWriter;TComponent);
| or: DB.TWideStringField.GetAsWideString(TWideStringField):WideString;
| or: DB.TDateTimeField.GetValue(TDateTimeField;TDateTime;TDateTime):Boolean;
| or: DB.TSQLTimeStampField.GetValue(TSQLTimeStampField;TSQLTimeStamp;TSQLTimeStamp):Boolean;
| or: DB.TSQLTimeStampField.SetAsSQLTimeStamp(TSQLTimeStampField;TSQLTimeStamp;TSQLTimeStamp);
|
005365F0 E893ECECFF call 00405288
* Reference to: System.@WriteLn(TTextRec;TTextRec):Pointer;
|
005365F5 E86AD2ECFF call 00403864
|
005365FA E891C3ECFF call 00402990
005365FF 8B55FC mov edx, [ebp-$04]
00536602 8D8518FEFFFF lea eax, [ebp+$FFFFFE18]
* Reference to: Classes.TStream.WriteComponent(TStream;TComponent);
| or: Classes.TWriter.WriteRootComponent(TWriter;TComponent);
| or: DB.TWideStringField.GetAsWideString(TWideStringField):WideString;
| or: DB.TDateTimeField.GetValue(TDateTimeField;TDateTime;TDateTime):Boolean;
| or: DB.TSQLTimeStampField.GetValue(TSQLTimeStampField;TSQLTimeStamp;TSQLTimeStamp):Boolean;
| or: DB.TSQLTimeStampField.SetAsSQLTimeStamp(TSQLTimeStampField;TSQLTimeStamp;TSQLTimeStamp);
|
00536608 E87BECECFF call 00405288
* Reference to: System.@WriteLn(TTextRec;TTextRec):Pointer;
|
0053660D E852D2ECFF call 00403864
|
00536612 E879C3ECFF call 00402990
00536617 8D8518FEFFFF lea eax, [ebp+$FFFFFE18]
* Reference to: System.@Close(TTextRec;TTextRec):Integer;
|
0053661D E89ECAECFF call 004030C0
|
00536622 E869C3ECFF call 00402990
00536627 BA02000000 mov edx, $00000002
* Reference to control Edit1 : TEdit
|
0053662C 8B83F8020000 mov eax, [ebx+$02F8]
* Reference to: ExtCtrls.TNotebook.SetPageIndex(TNotebook;Integer);
|
00536632 E8A97EF0FF call 0043E4E0
00536637 E921010000 jmp 0053675D
0053663C 8D85DCFDFFFF lea eax, [ebp+$FFFFFDDC]
00536642 50 push eax
00536643 B90C000000 mov ecx, $0000000C
00536648 BA01000000 mov edx, $00000001
0053664D 8B45F0 mov eax, [ebp-$10]
* Reference to: System.@LStrCopy;
|
00536650 E877EAECFF call 004050CC
00536655 8B95DCFDFFFF mov edx, [ebp+$FFFFFDDC]
0053665B 8B45EC mov eax, [ebp-$14]
* Reference to: System.@LStrCmp;
|
0053665E E855E9ECFF call 00404FB8
00536663 742D jz 00536692
00536665 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]
0053666B 50 push eax
0053666C B908000000 mov ecx, $00000008
00536671 BA0D000000 mov edx, $0000000D
00536676 8B45F0 mov eax, [ebp-$10]
* Reference to: System.@LStrCopy;
|
00536679 E84EEAECFF call 004050CC
0053667E 8B95D8FDFFFF mov edx, [ebp+$FFFFFDD8]
00536684 8B45E8 mov eax, [ebp-$18]
* Reference to: System.@LStrCmp;
|
00536687 E82CE9ECFF call 00404FB8
0053668C 0F8599000000 jnz 0053672B
00536692 8B15D4385400 mov edx, [$005438D4]
00536698 8B12 mov edx, [edx]
0053669A 8D45E4 lea eax, [ebp-$1C]
* Possible String Reference to: '\keycode.txt'
|
0053669D B978685300 mov ecx, $00536878
* Reference to: System.@LStrCat3;
|
005366A2 E811E8ECFF call 00404EB8
005366A7 8B55E4 mov edx, [ebp-$1C]
005366AA 8D8518FEFFFF lea eax, [ebp+$FFFFFE18]
* Reference to: System.@Assign(TTextRec;TTextRec;String):Integer;
|
005366B0 E867C8ECFF call 00402F1C
005366B5 8D8518FEFFFF lea eax, [ebp+$FFFFFE18]
* Reference to: System.@RewritText(TTextRec;TTextRec):Integer;
|
005366BB E8F8C5ECFF call 00402CB8
|
005366C0 E8CBC2ECFF call 00402990
005366C5 8D95D4FDFFFF lea edx, [ebp+$FFFFFDD4]
* Reference to control Edit3 : N.A.
|
005366CB 8B8304030000 mov eax, [ebx+$0304]
* Reference to: Controls.TControl.GetText(TControl):TCaption;
|
005366D1 E8B656F3FF call 0046BD8C
005366D6 8B95D4FDFFFF mov edx, [ebp+$FFFFFDD4]
005366DC 8D8518FEFFFF lea eax, [ebp+$FFFFFE18]
* Reference to: Classes.TStream.WriteComponent(TStream;TComponent);
| or: Classes.TWriter.WriteRootComponent(TWriter;TComponent);
| or: DB.TWideStringField.GetAsWideString(TWideStringField):WideString;
| or: DB.TDateTimeField.GetValue(TDateTimeField;TDateTime;TDateTime):Boolean;
| or: DB.TSQLTimeStampField.GetValue(TSQLTimeStampField;TSQLTimeStamp;TSQLTimeStamp):Boolean;
| or: DB.TSQLTimeStampField.SetAsSQLTimeStamp(TSQLTimeStampField;TSQLTimeStamp;TSQLTimeStamp);
|
005366E2 E8A1EBECFF call 00405288
* Reference to: System.@WriteLn(TTextRec;TTextRec):Pointer;
|
005366E7 E878D1ECFF call 00403864
|
005366EC E89FC2ECFF call 00402990
005366F1 8B55FC mov edx, [ebp-$04]
005366F4 8D8518FEFFFF lea eax, [ebp+$FFFFFE18]
* Reference to: Classes.TStream.WriteComponent(TStream;TComponent);
| or: Classes.TWriter.WriteRootComponent(TWriter;TComponent);
| or: DB.TWideStringField.GetAsWideString(TWideStringField):WideString;
| or: DB.TDateTimeField.GetValue(TDateTimeField;TDateTime;TDateTime):Boolean;
| or: DB.TSQLTimeStampField.GetValue(TSQLTimeStampField;TSQLTimeStamp;TSQLTimeStamp):Boolean;
| or: DB.TSQLTimeStampField.SetAsSQLTimeStamp(TSQLTimeStampField;TSQLTimeStamp;TSQLTimeStamp);
|
005366FA E889EBECFF call 00405288
* Reference to: System.@WriteLn(TTextRec;TTextRec):Pointer;
|
005366FF E860D1ECFF call 00403864
|
00536704 E887C2ECFF call 00402990
00536709 8D8518FEFFFF lea eax, [ebp+$FFFFFE18]
* Reference to: System.@Close(TTextRec;TTextRec):Integer;
|
0053670F E8ACC9ECFF call 004030C0
|
00536714 E877C2ECFF call 00402990
00536719 BA02000000 mov edx, $00000002
* Reference to control Edit1 : TEdit
|
0053671E 8B83F8020000 mov eax, [ebx+$02F8]
* Reference to: ExtCtrls.TNotebook.SetPageIndex(TNotebook;Integer);
|
00536724 E8B77DF0FF call 0043E4E0
00536729 EB32 jmp 0053675D
0053672B 33D2 xor edx, edx
* Reference to control Edit3 : N.A.
|
0053672D 8B8304030000 mov eax, [ebx+$0304]
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
00536733 E88456F3FF call 0046BDBC
00536738 33D2 xor edx, edx
* Reference to control Label3 : TLabel
|
0053673A 8B8310030000 mov eax, [ebx+$0310]
* Reference to: Controls.TControl.SetText(TControl;TCaption);
|
00536740 E87756F3FF call 0046BDBC
00536745 6A00 push $00
* Possible String Reference to: '警告'
|
00536747 B904685300 mov ecx, $00536804
* Possible String Reference to: '用户码或注册码不对,请重新输入'
|
0053674C BA88685300 mov edx, $00536888
00536751 A1043A5400 mov eax, dword ptr [$00543A04]
00536756 8B00 mov eax, [eax]
* Reference to: Forms.TApplication.MessageBox(TApplication;PChar;PChar;Longint):Integer;
|
00536758 E85359F5FF call 0048C0B0
0053675D 33C0 xor eax, eax
0053675F 5A pop edx
00536760 59 pop ecx
00536761 59 pop ecx
00536762 648910 mov fs:[eax], edx
****** FINALLY
|
* Possible String Reference to: '[?]镁??
|
00536765 68FF675300 push $005367FF
0053676A 8D85D4FDFFFF lea eax, [ebp+$FFFFFDD4]
* Reference to: System.@LStrClr(void;void);
|
00536770 E837E4ECFF call 00404BAC
00536775 8D85D8FDFFFF lea eax, [ebp+$FFFFFDD8]
0053677B BA02000000 mov edx, $00000002
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
00536780 E84BE4ECFF call 00404BD0
00536785 8D85E0FDFFFF lea eax, [ebp+$FFFFFDE0]
* Reference to: System.@LStrClr(void;void);
|
0053678B E81CE4ECFF call 00404BAC
00536790 8D85E4FDFFFF lea eax, [ebp+$FFFFFDE4]
00536796 BA06000000 mov edx, $00000006
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
0053679B E830E4ECFF call 00404BD0
005367A0 8D85FCFDFFFF lea eax, [ebp+$FFFFFDFC]
005367A6 BA02000000 mov edx, $00000002
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
005367AB E820E4ECFF call 00404BD0
005367B0 8D8504FEFFFF lea eax, [ebp+$FFFFFE04]
* Reference to: System.@LStrClr(void;void);
|
005367B6 E8F1E3ECFF call 00404BAC
005367BB 8D8508FEFFFF lea eax, [ebp+$FFFFFE08]
* Reference to: System.@LStrClr(void;void);
|
005367C1 E8E6E3ECFF call 00404BAC
005367C6 8D850CFEFFFF lea eax, [ebp+$FFFFFE0C]
* Reference to: System.@LStrClr(void;void);
|
005367CC E8DBE3ECFF call 00404BAC
005367D1 8D8510FEFFFF lea eax, [ebp+$FFFFFE10]
* Reference to: System.@LStrClr(void;void);
|
005367D7 E8D0E3ECFF call 00404BAC
005367DC 8D8514FEFFFF lea eax, [ebp+$FFFFFE14]
* Reference to: System.@LStrClr(void;void);
|
005367E2 E8C5E3ECFF call 00404BAC
005367E7 8D45E4 lea eax, [ebp-$1C]
005367EA BA07000000 mov edx, $00000007
* Reference to: System.@LStrArrayClr(void;void;Integer);
|
005367EF E8DCE3ECFF call 00404BD0
005367F4 C3 ret
* Reference to: System.@HandleFinally;
|
005367F5 E9B6DDECFF jmp 004045B0
005367FA E96BFFFFFF jmp 0053676A
****** END
|
005367FF 5B pop ebx
00536800 8BE5 mov esp, ebp
00536802 5D pop ebp
00536803 C3 ret
*)
这是用DeDe分析出来的代码,没哪个老大帮下忙
,分析 解释一下吗。谢谢