SQL2000通用日志压缩工具

SQL2000通用日志压缩工具 含源码 type TFrm_main = class(TForm) Panel1: TPanel; btn_config: TBitBtn; grp_db: TGroupBox; cbb_database: TComboBox; Memo1: TMemo; btn_do: TBitBtn; btn_close: TBitBtn; Button1: TButton; Label3: TLabel; GroupBox1: TGroupBox; GroupBox2: TGroupBox; Label1: TLabel; Label2: TLabel; procedure btn_closeClick(Sender: TObject); procedure btn_configClick(Sender: TObject); procedure edt_NewSizeKeyPress(Sender: TObject; var Key: Char); procedure btn_doClick(Sender: TObject); procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;