monsoc.pas

BLUE源码 BLUE源码 BLUE源码

unit MonSoc;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs, StdCtrls
type
  TFrmMonSoc=class(TForm)
    MonSocket: TServerSocket;
    MonTimer: TTimer;
    procedure FormCreate(Sender : TObject);
    procedure MonTimerTimer(Sender : TObject);
    procedure MonSocketClientError(Sender : TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  FrmMonSoc: TFrmMonSoc;

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

implementation

{$R *.DFM}

procedure TFrmMonSoc.FormCreate(Sender : TObject);
begin
(*
0048C098   55                     push    ebp
0048C099   8BEC                   mov     ebp, esp
0048C09B   83C4F8                 add     esp, -$08
0048C09E   53                     push    ebx
0048C09F   33C9                   xor     ecx, ecx
0048C0A1   894DF8                 mov     [ebp-$08], ecx
0048C0A4   8BD8                   mov     ebx, eax
0048C0A6   33C0                   xor     eax, eax
0048C0A8   55                     push    ebp

* Possible String Reference to: '闇咓