⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 frm24cother.pas

📁 酷鱼下载线源程序
💻 PAS
📖 第 1 页 / 共 2 页
字号:
unit frm24cother;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls
type
  Tchip24cotherFrm=class(TForm)
    RadioGroup1: N.A.;
    ac: N.A.;
    mc: N.A.;
    pa2: N.A.;
    pa1: N.A.;
    pa0: N.A.;
    BitBtn1: N.A.;
    BitBtn2: N.A.;
    procedure acClick(Sender : TObject);
    procedure mcClick(Sender : TObject);
    procedure FormCreate(Sender : TObject);
    procedure BitBtn1Click(Sender : TObject);
    procedure _PROC_004F7069(Sender : TObject);
    procedure _PROC_004F7098(Sender : TObject);
    procedure _PROC_004F70A0(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  chip24cotherFrm: Tchip24cotherFrm;

{This file is generated by DaRk Ver 3.50.04 Copyright (c) 1999-2002 DaFixer}

implementation

{$R *.DFM}

procedure Tchip24cotherFrm.acClick(Sender : TObject);
begin
(*
004F6B5C   53                     push    ebx
004F6B5D   8BD8                   mov     ebx, eax
004F6B5F   33D2                   xor     edx, edx
004F6B61   8B83FC020000           mov     eax, [ebx+$02FC]
004F6B67   8B08                   mov     ecx, [eax]
004F6B69   FF5164                 call    dword ptr [ecx+$64]
004F6B6C   33D2                   xor     edx, edx
004F6B6E   8B8300030000           mov     eax, [ebx+$0300]
004F6B74   8B08                   mov     ecx, [eax]
004F6B76   FF5164                 call    dword ptr [ecx+$64]
004F6B79   33D2                   xor     edx, edx
004F6B7B   8B8304030000           mov     eax, [ebx+$0304]
004F6B81   8B08                   mov     ecx, [eax]
004F6B83   FF5164                 call    dword ptr [ecx+$64]
004F6B86   5B                     pop     ebx
004F6B87   C3                     ret

*)
end;

procedure Tchip24cotherFrm.mcClick(Sender : TObject);
begin
(*
004F6B88   53                     push    ebx
004F6B89   8BD8                   mov     ebx, eax
004F6B8B   B201                   mov     dl, $01
004F6B8D   8B83FC020000           mov     eax, [ebx+$02FC]
004F6B93   8B08                   mov     ecx, [eax]
004F6B95   FF5164                 call    dword ptr [ecx+$64]
004F6B98   B201                   mov     dl, $01
004F6B9A   8B8300030000           mov     eax, [ebx+$0300]
004F6BA0   8B08                   mov     ecx, [eax]
004F6BA2   FF5164                 call    dword ptr [ecx+$64]
004F6BA5   B201                   mov     dl, $01
004F6BA7   8B8304030000           mov     eax, [ebx+$0304]
004F6BAD   8B08                   mov     ecx, [eax]
004F6BAF   FF5164                 call    dword ptr [ecx+$64]
004F6BB2   5B                     pop     ebx
004F6BB3   C3                     ret

*)
end;

procedure Tchip24cotherFrm.FormCreate(Sender : TObject);
begin
(*
004F6BB4   53                     push    ebx
004F6BB5   56                     push    esi
004F6BB6   8BD8                   mov     ebx, eax
004F6BB8   A1B4765000             mov     eax, dword ptr [$005076B4]
004F6BBD   8B00                   mov     eax, [eax]

* Reference to control Printer : N.A.
|
004F6BBF   8B4058                 mov     eax, [eax+$58]

* Reference to: DB.TCustomConnection.Close(TCustomConnection);
|
004F6BC2   E89DB6FAFF             call    004A2264
004F6BC7   A1B4765000             mov     eax, dword ptr [$005076B4]
004F6BCC   8B00                   mov     eax, [eax]
004F6BCE   8B7060                 mov     esi, [eax+$60]
004F6BD1   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.Close(TDataSet);
|
004F6BD3   E80C68FBFF             call    004AD3E4
004F6BD8   8BC6                   mov     eax, esi

* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|           or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
|           or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
|           or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
|           or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
|           or: DB.TObjectField.GetFields(TObjectField):TFields;
|
004F6BDA   E8E5CEFEFF             call    004E3AC4
004F6BDF   8B10                   mov     edx, [eax]
004F6BE1   FF5244                 call    dword ptr [edx+$44]
004F6BE4   8BC6                   mov     eax, esi

* Reference to: ADODB.TADOQuery.GetSQL(TADOQuery):TStrings;
|           or: ArrowCha.TArrowSeries.GetStartXValues(TArrowSeries):TChartValueList;
|           or: ArrowCha.TArrowSeries.GetStartYValues(TArrowSeries):TChartValueList;
|           or: ComCtrls.TCustomComboBoxEx.GetDropDownCount(TCustomComboBoxEx):Integer;
|           or: Controls.TControl.GetFloatingDockSiteClass(TControl):TWinControlClass;
|           or: DB.TObjectField.GetFields(TObjectField):TFields;
|
004F6BE6   E8D9CEFEFF             call    004E3AC4

* Possible String Reference to: 'select * from settings'
|
004F6BEB   BAA46D4F00             mov     edx, $004F6DA4
004F6BF0   8B08                   mov     ecx, [eax]
004F6BF2   FF5138                 call    dword ptr [ecx+$38]
004F6BF5   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.Open(TDataSet);
|
004F6BF7   E8DC67FBFF             call    004AD3D8
004F6BFC   8BC6                   mov     eax, esi
004F6BFE   8B10                   mov     edx, [eax]
004F6C00   FF924C010000           call    dword ptr [edx+$014C]
004F6C06   85C0                   test    eax, eax
004F6C08   7E64                   jle     004F6C6E

* Possible String Reference to: 'chip24ca2'
|
004F6C0A   BAC46D4F00             mov     edx, $004F6DC4
004F6C0F   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004F6C11   E8D677FBFF             call    004AE3EC
004F6C16   8B10                   mov     edx, [eax]
004F6C18   FF5258                 call    dword ptr [edx+$58]
004F6C1B   898318030000           mov     [ebx+$0318], eax

* Possible String Reference to: 'chip24ca1'
|
004F6C21   BAD86D4F00             mov     edx, $004F6DD8
004F6C26   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004F6C28   E8BF77FBFF             call    004AE3EC
004F6C2D   8B10                   mov     edx, [eax]
004F6C2F   FF5258                 call    dword ptr [edx+$58]
004F6C32   898314030000           mov     [ebx+$0314], eax

* Possible String Reference to: 'chip24ca0'
|
004F6C38   BAEC6D4F00             mov     edx, $004F6DEC
004F6C3D   8BC6                   mov     eax, esi

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004F6C3F   E8A877FBFF             call    004AE3EC
004F6C44   8B10                   mov     edx, [eax]
004F6C46   FF5258                 call    dword ptr [edx+$58]
004F6C49   898310030000           mov     [ebx+$0310], eax
004F6C4F   A1B4765000             mov     eax, dword ptr [$005076B4]
004F6C54   8B00                   mov     eax, [eax]
004F6C56   8B4060                 mov     eax, [eax+$60]

* Possible String Reference to: 'chip24caddrconfig'
|
004F6C59   BA006E4F00             mov     edx, $004F6E00

* Reference to: DB.TDataSet.FieldByName(TDataSet;AnsiString):TField;
|
004F6C5E   E88977FBFF             call    004AE3EC
004F6C63   8B10                   mov     edx, [eax]
004F6C65   FF5258                 call    dword ptr [edx+$58]
004F6C68   89831C030000           mov     [ebx+$031C], eax
004F6C6E   83BB1803000000         cmp     dword ptr [ebx+$0318], +$00
004F6C75   7512                   jnz     004F6C89
004F6C77   B201                   mov     dl, $01
004F6C79   8B83FC020000           mov     eax, [ebx+$02FC]
004F6C7F   8B08                   mov     ecx, [eax]
004F6C81   FF91C8000000           call    dword ptr [ecx+$00C8]
004F6C87   EB10                   jmp     004F6C99
004F6C89   33D2                   xor     edx, edx
004F6C8B   8B83FC020000           mov     eax, [ebx+$02FC]
004F6C91   8B08                   mov     ecx, [eax]
004F6C93   FF91C8000000           call    dword ptr [ecx+$00C8]
004F6C99   83BB1403000000         cmp     dword ptr [ebx+$0314], +$00
004F6CA0   7512                   jnz     004F6CB4
004F6CA2   B201                   mov     dl, $01
004F6CA4   8B8300030000           mov     eax, [ebx+$0300]
004F6CAA   8B08                   mov     ecx, [eax]
004F6CAC   FF91C8000000           call    dword ptr [ecx+$00C8]
004F6CB2   EB10                   jmp     004F6CC4
004F6CB4   33D2                   xor     edx, edx
004F6CB6   8B8300030000           mov     eax, [ebx+$0300]
004F6CBC   8B08                   mov     ecx, [eax]
004F6CBE   FF91C8000000           call    dword ptr [ecx+$00C8]
004F6CC4   83BB1003000000         cmp     dword ptr [ebx+$0310], +$00
004F6CCB   7512                   jnz     004F6CDF
004F6CCD   B201                   mov     dl, $01
004F6CCF   8B8304030000           mov     eax, [ebx+$0304]
004F6CD5   8B08                   mov     ecx, [eax]
004F6CD7   FF91C8000000           call    dword ptr [ecx+$00C8]
004F6CDD   EB10                   jmp     004F6CEF
004F6CDF   33D2                   xor     edx, edx
004F6CE1   8B8304030000           mov     eax, [ebx+$0304]
004F6CE7   8B08                   mov     ecx, [eax]
004F6CE9   FF91C8000000           call    dword ptr [ecx+$00C8]
004F6CEF   83BB1C03000001         cmp     dword ptr [ebx+$031C], +$01
004F6CF6   7552                   jnz     004F6D4A
004F6CF8   B201                   mov     dl, $01
004F6CFA   8B83F4020000           mov     eax, [ebx+$02F4]
004F6D00   8B08                   mov     ecx, [eax]

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -