u6_1.pas

前言 随着旅游业的发展

unit U6_1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, CheckLst, ComCtrls, Buttons, ExtCtrls;

type
  TF6_1 = class(TForm)
    Pbt: TPanel;
    SByc: TSpeedButton;
    SB: TSpeedButton;
    SBqj: TSpeedButton;
    SBzy: TSpeedButton;
    SBdy: TSpeedButton;
    SBxx: TSpeedButton;
    PCml: TPageControl;
    TSml: TTabSheet;
    TSsy: TTabSheet;
    TSss: TTabSheet;
    TVml: TTreeView;
    Lbjr: TLabel;
    Edgj: TEdit;
    CLBcz: TCheckListBox;
    SpeedButton1: TSpeedButton;
    Lbsr: TLabel;
    CBsr: TComboBox;
    SBlz: TSpeedButton;
    SBxs: TSpeedButton;
    Lbxz: TLabel;
    Lbzd: TLabel;
    Bevel1: TBevel;
    CBss: TCheckBox;
    CBpp: TCheckBox;
    CBjb: TCheckBox;
    Bbt: TBitBtn;
    Bwz: TBitBtn;
    Bjb: TBitBtn;
    lvjs: TListView;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  F6_1: TF6_1;

implementation

{$R *.dfm}

end.