unit u_op_seae_double; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, BusinessSkinForm, wwdblook, RxLookup, StdCtrls, DBCtrls, Mask, bsSkinCtrls, DB, ADODB; type Tfrm_op_seae_double = class(TForm) bsBusinessSkinForm1: TbsBusinessSkinForm; bsSkinPanel4: TbsSkinPanel; Label125: TLabel; Label15: TLabel; Label7: TLabel; Label124: TLabel; Label146: TLabel; Label145: TLabel; Label32: TLabel; Label21: TLabel; Label27: TLabel; Label30: TLabel; Label31: TLabel; Label12: TLabel; Label11: TLabel; Label13: TLabel; Label126: TLabel; Label25: TLabel; Label34: TLabel; Label39: TLabel; Label18: TLabel; Label73: TLabel; Label22: TLabel; Label35: TLabel; Label26: TLabel; Label28: TLabel; Label9: TLabel; Label10: TLabel; Label8: TLabel; Label16: TLabel; Label23: TLabel; Label24: TLabel; Label29: TLabel; Label33: TLabel; Label164: TLabel; Label168: TLabel; Label6: TLabel; Label14: TLabel; Label20: TLabel; Label40: TLabel; bsSkinPanel5: TbsSkinPanel; Label1: TLabel; Label4: TLabel; Label5: TLabel; Label36: TLabel; Label37: TLabel; Label38: TLabel; Label19: TLabel; Label17: TLabel; Label65: TLabel; DBEdit1: TDBEdit; DBEdit7: TDBEdit; DBEdit8: TDBEdit; DBEdit9: TDBEdit; DBEdit18: TDBEdit; DBEdit4: TDBEdit; DBEdit45: TDBEdit; DBEdit46: TDBEdit; DBEdit47: TDBEdit; DBEdit5: TDBEdit; DBMemo3: TDBMemo; DBMemo4: TDBMemo; DBMemo5: TDBMemo; DBMemo6: TDBMemo; DBEdit81: TDBEdit; DBEdit82: TDBEdit; DBEdit83: TDBEdit; DBEdit80: TDBEdit; DBEdit55: TDBEdit; DBEdit56: TDBEdit; DBEdit53: TDBEdit; DBEdit54: TDBEdit; DBEdit10: TDBEdit; DBEdit17: TDBEdit; DBEdit57: TDBEdit; DBEdit58: TDBEdit; DBEdit25: TDBEdit; DBEdit59: TDBEdit; DBEdit27: TDBEdit; DBEdit60: TDBEdit; DBEdit61: TDBEdit; DBEdit70: TDBEdit; DBEdit71: TDBEdit; DBEdit72: TDBEdit; DBEdit73: TDBEdit; DBEdit26: TDBEdit; DBEdit74: TDBEdit; DBEdit66: TDBEdit; DBEdit67: TDBEdit; DBEdit68: TDBEdit; DBEdit69: TDBEdit; DBEdit64: TDBEdit; DBEdit65: TDBEdit; DBEdit62: TDBEdit; DBEdit63: TDBEdit; DBEdit2: TDBEdit; DBEdit3: TDBEdit; p_old1: TDataSource; p_old: TADOStoredProc; bsSkinPanel1: TbsSkinPanel; bsSkinButton5: TbsSkinButton; Label2: TLabel; procedure bsSkinButton5Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var frm_op_seae_double: Tfrm_op_seae_double; implementation uses u_main; {$R *.dfm} procedure Tfrm_op_seae_double.bsSkinButton5Click(Sender: TObject); begin close; end; end.