unit13.pas

音像租赁管理系统 进行音像店的日常工作管理!

procedure Tworkroom.StaticText19MouseMove(Sender : TObject);
begin
(*
005299FC   55                     push    ebp
005299FD   8BEC                   mov     ebp, esp
005299FF   53                     push    ebx
00529A00   8BD8                   mov     ebx, eax

* Reference to control Tworkroom.StaticText13 : TStaticText
|
00529A02   8B8328030000           mov     eax, [ebx+$0328]

* Reference to field TStaticText.Font : TFont
|
00529A08   8B4068                 mov     eax, [eax+$68]
00529A0B   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529A10   E8B3B5EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText15 : TStaticText
|
00529A15   8B8330030000           mov     eax, [ebx+$0330]

* Reference to field TStaticText.Font : TFont
|
00529A1B   8B4068                 mov     eax, [eax+$68]
00529A1E   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529A23   E8A0B5EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText16 : TStaticText
|
00529A28   8B8334030000           mov     eax, [ebx+$0334]

* Reference to field TStaticText.Font : TFont
|
00529A2E   8B4068                 mov     eax, [eax+$68]
00529A31   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529A36   E88DB5EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText17 : TStaticText
|
00529A3B   8B8338030000           mov     eax, [ebx+$0338]

* Reference to field TStaticText.Font : TFont
|
00529A41   8B4068                 mov     eax, [eax+$68]
00529A44   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529A49   E87AB5EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText18 : TStaticText
|
00529A4E   8B833C030000           mov     eax, [ebx+$033C]

* Reference to field TStaticText.Font : TFont
|
00529A54   8B4068                 mov     eax, [eax+$68]
00529A57   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529A5C   E867B5EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText20 : TStaticText
|
00529A61   8B8344030000           mov     eax, [ebx+$0344]

* Reference to field TStaticText.Font : TFont
|
00529A67   8B4068                 mov     eax, [eax+$68]
00529A6A   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529A6F   E854B5EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText19 : TStaticText
|
00529A74   8B8340030000           mov     eax, [ebx+$0340]

* Reference to field TStaticText.Font : TFont
|
00529A7A   8B4068                 mov     eax, [eax+$68]
00529A7D   BAFF000000             mov     edx, $000000FF

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529A82   E841B5EFFF             call    00424FC8
00529A87   5B                     pop     ebx
00529A88   5D                     pop     ebp
00529A89   C20800                 ret     $0008

*)
end;

procedure Tworkroom.StaticText20MouseMove(Sender : TObject);
begin
(*
00529A8C   55                     push    ebp
00529A8D   8BEC                   mov     ebp, esp
00529A8F   53                     push    ebx
00529A90   8BD8                   mov     ebx, eax

* Reference to control Tworkroom.StaticText13 : TStaticText
|
00529A92   8B8328030000           mov     eax, [ebx+$0328]

* Reference to field TStaticText.Font : TFont
|
00529A98   8B4068                 mov     eax, [eax+$68]
00529A9B   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529AA0   E823B5EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText15 : TStaticText
|
00529AA5   8B8330030000           mov     eax, [ebx+$0330]

* Reference to field TStaticText.Font : TFont
|
00529AAB   8B4068                 mov     eax, [eax+$68]
00529AAE   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529AB3   E810B5EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText16 : TStaticText
|
00529AB8   8B8334030000           mov     eax, [ebx+$0334]

* Reference to field TStaticText.Font : TFont
|
00529ABE   8B4068                 mov     eax, [eax+$68]
00529AC1   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529AC6   E8FDB4EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText17 : TStaticText
|
00529ACB   8B8338030000           mov     eax, [ebx+$0338]

* Reference to field TStaticText.Font : TFont
|
00529AD1   8B4068                 mov     eax, [eax+$68]
00529AD4   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529AD9   E8EAB4EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText18 : TStaticText
|
00529ADE   8B833C030000           mov     eax, [ebx+$033C]

* Reference to field TStaticText.Font : TFont
|
00529AE4   8B4068                 mov     eax, [eax+$68]
00529AE7   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529AEC   E8D7B4EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText19 : TStaticText
|
00529AF1   8B8340030000           mov     eax, [ebx+$0340]

* Reference to field TStaticText.Font : TFont
|
00529AF7   8B4068                 mov     eax, [eax+$68]
00529AFA   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529AFF   E8C4B4EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText20 : TStaticText
|
00529B04   8B8344030000           mov     eax, [ebx+$0344]

* Reference to field TStaticText.Font : TFont
|
00529B0A   8B4068                 mov     eax, [eax+$68]
00529B0D   BAFF000000             mov     edx, $000000FF

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529B12   E8B1B4EFFF             call    00424FC8
00529B17   5B                     pop     ebx
00529B18   5D                     pop     ebp
00529B19   C20800                 ret     $0008

*)
end;

procedure Tworkroom.StaticText18MouseMove(Sender : TObject);
begin
(*
00529B1C   55                     push    ebp
00529B1D   8BEC                   mov     ebp, esp
00529B1F   53                     push    ebx
00529B20   8BD8                   mov     ebx, eax

* Reference to control Tworkroom.StaticText13 : TStaticText
|
00529B22   8B8328030000           mov     eax, [ebx+$0328]

* Reference to field TStaticText.Font : TFont
|
00529B28   8B4068                 mov     eax, [eax+$68]
00529B2B   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529B30   E893B4EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText15 : TStaticText
|
00529B35   8B8330030000           mov     eax, [ebx+$0330]

* Reference to field TStaticText.Font : TFont
|
00529B3B   8B4068                 mov     eax, [eax+$68]
00529B3E   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529B43   E880B4EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText16 : TStaticText
|
00529B48   8B8334030000           mov     eax, [ebx+$0334]

* Reference to field TStaticText.Font : TFont
|
00529B4E   8B4068                 mov     eax, [eax+$68]
00529B51   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529B56   E86DB4EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText17 : TStaticText
|
00529B5B   8B8338030000           mov     eax, [ebx+$0338]

* Reference to field TStaticText.Font : TFont
|
00529B61   8B4068                 mov     eax, [eax+$68]
00529B64   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529B69   E85AB4EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText19 : TStaticText
|
00529B6E   8B8340030000           mov     eax, [ebx+$0340]

* Reference to field TStaticText.Font : TFont
|
00529B74   8B4068                 mov     eax, [eax+$68]
00529B77   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529B7C   E847B4EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText20 : TStaticText
|
00529B81   8B8344030000           mov     eax, [ebx+$0344]

* Reference to field TStaticText.Font : TFont
|
00529B87   8B4068                 mov     eax, [eax+$68]
00529B8A   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529B8F   E834B4EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText18 : TStaticText
|
00529B94   8B833C030000           mov     eax, [ebx+$033C]

* Reference to field TStaticText.Font : TFont
|
00529B9A   8B4068                 mov     eax, [eax+$68]
00529B9D   BAFF000000             mov     edx, $000000FF

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529BA2   E821B4EFFF             call    00424FC8
00529BA7   5B                     pop     ebx
00529BA8   5D                     pop     ebp
00529BA9   C20800                 ret     $0008

*)
end;

procedure Tworkroom.Shape1MouseMove(Sender : TObject);
begin
(*
00529BAC   55                     push    ebp
00529BAD   8BEC                   mov     ebp, esp
00529BAF   53                     push    ebx
00529BB0   8BD8                   mov     ebx, eax

* Reference to control Tworkroom.ep : TShape
|
00529BB2   8B834C030000           mov     eax, [ebx+$034C]

* Reference to field TShape.Brush : TBrush
|
00529BB8   8B806C010000           mov     eax, [eax+$016C]
00529BBE   BAFFFFFF00             mov     edx, $00FFFFFF

* Reference to: Graphics.TBrush.SetColor(TBrush;TColor);
|
00529BC3   E8F4BBEFFF             call    004257BC
00529BC8   BAFFFFFF00             mov     edx, $00FFFFFF

* Reference to control Tworkroom.el : TStaticText
|
00529BCD   8B8350030000           mov     eax, [ebx+$0350]

* Reference to: Controls.TControl.SetColor(TControl;TColor);
|
00529BD3   E834F5F1FF             call    0044910C

* Reference to control Tworkroom.StaticText13 : TStaticText
|
00529BD8   8B8328030000           mov     eax, [ebx+$0328]

* Reference to field TStaticText.Font : TFont
|
00529BDE   8B4068                 mov     eax, [eax+$68]
00529BE1   BA0000FF00             mov     edx, $00FF0000

* Reference to: Graphics.TFont.SetColor(TFont;TColor);
|
00529BE6   E8DDB3EFFF             call    00424FC8

* Reference to control Tworkroom.StaticText15 : TStaticText
|
00529BEB   8B8330030000           mov     eax, [ebx+$0330]