u6_2.pas

来自「前言 随着旅游业的发展」· PAS 代码 · 共 47 行

unit U6_2;

interface

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

type
  TF6_2 = class(TForm)
    GBzc: TGroupBox;
    Lbqm: TLabel;
    Edqm: TEdit;
    Lbld: TLabel;
    Edld: TEdit;
    Lbyb: TLabel;
    Edyb: TEdit;
    Lblh: TLabel;
    Edlh: TEdit;
    Lblr: TLabel;
    Edlr: TEdit;
    Lbzb: TLabel;
    CBzb: TComboBox;
    Lbzd: TLabel;
    Edzd: TEdit;
    UpDown1: TUpDown;
    Lbsm: TLabel;
    SBsc: TSpeedButton;
    CLBzy: TCheckListBox;
    SBzb: TSpeedButton;
    SBgb: TSpeedButton;
    P: TPanel;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  F6_2: TF6_2;

implementation

{$R *.dfm}

end.