unit u_op_znjpj;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, wwdbdatetimepicker, bsSkinCtrls, BusinessSkinForm, DB,ADODB,
  Mask, DBCtrls, wwdblook, ExtCtrls, jpeg;

type
  Tfrm_op_znjpj = class(TForm)
    bsBusinessSkinForm1: TbsBusinessSkinForm;
    DataSource1: TDataSource;
    bsSkinPanel1: TbsSkinPanel;
    bsSkinButton1: TbsSkinButton;
    Panel1: TPanel;
    Image1: TImage;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
    Label4: TLabel;
    Label5: TLabel;
    Label6: TLabel;
    Label7: TLabel;
    lblznj: TLabel;
    lblysstr: TLabel;
    lblcust: TLabel;
    lblmblno: TLabel;
    lbletd: TLabel;
    lbldate: TLabel;
    Label12: TLabel;
    lblttlznj: TLabel;
    bsSkinButton2: TbsSkinButton;
    procedure bsSkinButton5Click(Sender: TObject);

  private
    { Private declarations }
  public
    { Public declarations }
    BSTYPE:string;
  end;

var
  frm_op_znjpj: Tfrm_op_znjpj;

implementation

uses my_sys_function, u_data_share;

{$R *.dfm}

procedure Tfrm_op_znjpj.bsSkinButton5Click(Sender: TObject);
begin
  close;
end;

end.