applyfoodwin.pas

详细说明:毕业论文中关于小型宾馆管理系统的详细设计毕 业论文中关于小型宾馆...一个酒店管理系统VB+Access [学生学籍管理系统(VB+Acess).zip] - !这个是刚刚编的毕业设计,可能

unit ApplyFoodWin;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics,
  Controls, Forms, Dialogs;

type
  TFormApplyFoodWin=class(TForm)
    Panel1: TPanel;
    PageControl3: TPageControl;
    TabSheetApplyFood: TTabSheet;
    DBGridFoot: TDBGrid;
    TabSheetApplySeat: TTabSheet;
    SpbSeatSum: TSpeedButton;
    Label2: TLabel;
    DBGridSeat: TDBGrid;
    DBGrid4: TDBGrid;
    Edit1: TEdit;
    PageControl4: TPageControl;
    TabSheet3: TTabSheet;
    SpbSelectFood: TSpeedButton;
    Label4: TLabel;
    DBGrid3: TDBGrid;
    GroupBox1: TGroupBox;
    Label1: TLabel;
    Label3: TLabel;
    CbBFoodType: TComboBox;
    CkBoxAnd: TCheckBox;
    EditMealName: TEdit;
    StatusBar1: TStatusBar;
    ChBoxToSeat: TCheckBox;
    Edit2: TEdit;
    TabSheet4: TTabSheet;
    SpbSelectSeat: TSpeedButton;
    DBGrid1: TDBGrid;
    DBGrid5: TDBGrid;
    Panel2: TPanel;
    LabTip: TLabel;
    EditProc: TEdit;
    Panel3: TPanel;
    SpbOk: TSpeedButton;
    SpbClose: TSpeedButton;
    SpbOk1: TSpeedButton;
    SpbOk2: TSpeedButton;
    LabCaption: TLabel;
    SpbSum: TSpeedButton;
    Panel4: TPanel;
    DsFoodList: TDataSource;
    QrFoodList: TQuery;
    TabtApplyFood: TTable;
    DstApplyFood: TDataSource;
    TabtApplySeat: TTable;
    DstApplySeat: TDataSource;
    DstApplySeatFood: TDataSource;
    TabtApplySeatFood: TTable;
    TabFoodType: TTable;
    TabFoodTypeSn: TStringField;
    TabFoodTypeOption: TStringField;
    TabSeat: TTable;
    DsSeat: TDataSource;
    TabSeatFood: TTable;
    DsSeatFood: TDataSource;
  private
    { Private declarations }
  public
    { Public declarations }
  end ;

var
  FormApplyFoodWin: TFormApplyFoodWin;


{This file is generated by DeDe Ver 3.00 Copyright (c) 1999-2001 DaFixer}

implementation

{$R *.DFM}


end.