smain.pas

乐都SQL版传奇全套代码,绝对可编译

unit smain;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Sockets, D7ScktComp, ExtCtrls, Menus, Grids, StdCtrls;

type
  TFrmMain = class(TForm)
    MemoLog: TMemo;
    Panel1: TPanel;
    LbRunTime: TLabel;
    LbUserCount: TLabel;
    Label1: TLabel;
    Label2: TLabel;
    LbTimeCount: TLabel;
    Label5: TLabel;
    LbRunSocketTime: TLabel;
    Label20: TLabel;
    MemStatus: TLabel;
    Lbcheck: TLabel;
    Image1: TImage;
    GridGate: TStringGrid;
    MainMenu: TMainMenu;
    MENU_CONTROL: TMenuItem;
    MENU_CONTROL_START: TMenuItem;
    MENU_CONTROL_STOP: TMenuItem;
    MENU_CONTROL_CLEARLOGMSG: TMenuItem;
    MENU_CONTROL_RELOAD: TMenuItem;
    MENU_CONTROL_RELOAD_ITEMDB: TMenuItem;
    MENU_CONTROL_RELOAD_MAGICDB: TMenuItem;
    MENU_CONTROL_RELOAD_MONSTERDB: TMenuItem;
    MENU_CONTROL_RELOAD_MONSTERSAY: TMenuItem;
    MENU_CONTROL_RELOAD_DISABLEMAKE: TMenuItem;
    MENU_CONTROL_RELOAD_STARTPOINT: TMenuItem;
    MENU_CONTROL_RELOAD_CONF: TMenuItem;
    MENU_CONTROL_RELOAD_SABAK: TMenuItem;
    MENU_CONTROL_GATE: TMenuItem;
    MENU_CONTROL_GATE_OPEN: TMenuItem;
    MENU_CONTROL_GATE_CLOSE: TMenuItem;
    MENU_CONTROL_EXIT: TMenuItem;
    MENU_VIEW: TMenuItem;
    MENU_VIEW_ONLINEHUMAN: TMenuItem;
    MENU_VIEW_SESSION: TMenuItem;
    MENU_VIEW_LEVEL: TMenuItem;
    MENU_VIEW_LIST: TMenuItem;
    MENU_VIEW_KERNELINFO: TMenuItem;
    MENU_VIEW_GATE: TMenuItem;
    MENU_OPTION: TMenuItem;
    MENU_OPTION_GENERAL: TMenuItem;
    MENU_OPTION_GAME: TMenuItem;
    MENU_OPTION_ITEMFUNC: TMenuItem;
    G1: TMenuItem;
    MENU_OPTION_FUNCTION: TMenuItem;
    MENU_OPTION_MONSTER: TMenuItem;
    MENU_OPTION_SERVERCONFIG: TMenuItem;
    MENU_MANAGE: TMenuItem;
    MENU_MANAGE_ONLINEMSG: TMenuItem;
    MENU_MANAGE_PLUG: TMenuItem;
    MENU_MANAGE_CASTLE: TMenuItem;
    MENU_TOOLS: TMenuItem;
    MENU_TOOLS_MERCHANT: TMenuItem;
    MENU_TOOLS_NPC: TMenuItem;
    MENU_TOOLS_MONGEN: TMenuItem;
    MENU_TOOLS_IPSEARCH: TMenuItem;
    MENU_TOOLS_TEST: TMenuItem;
    aaa1: TMenuItem;
    DECODESCRIPT: TMenuItem;
    MenuStackTest: TMenuItem;
    MENU_HELP: TMenuItem;
    MENU_HELP_ABOUT: TMenuItem;
    SaveVariableTimer: TTimer;
    StartTimer: TTimer;
    RunTimer: TTimer;
    Timer1: TTimer;
    ConnectTimer: TTimer;
    CloseTimer: TTimer;
    DBSocket: TClientSocket;
    LogUDP: TUdpSocket;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  FrmMain: TFrmMain;

implementation

{$R *.dfm}

end.