⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 dbdef.pas

📁 详细说明:毕业论文中关于小型宾馆管理系统的详细设计毕 业论文中关于小型宾馆...一个酒店管理系统VB+Access [学生学籍管理系统(VB+Acess).zip] - !这个是刚刚编的毕业设计,可能
💻 PAS
字号:
//
// Database definitions. This module contains the Pascal definitions
// for the database tables and user types in the PODMS database.
//
// NOTE: If you add a new table, then do the following:
//
//  1) Add any new user definable data types
//  2) Define the database definition
//  3) Add entries PODMS_KEYS (if primary keys is an auto-created integer)
//  4) Add entries to KeysRecord record (if step 3 was performed)
//  5) Update TDSThread.LoadKeys (if step 3 was performed)
//  6) Update TDSThread.GetNewIntegerKey (if step 3 was performed)
//  7) Update TDSThread.ReadLastKeyValue (if step 3 was performed)
//  8) Add the entry to EPODMS_TABLE_TYPE enum (PODMS Constants type library)
//  9) Add the entry to the PODMS_TABLE record
// 10) Update the TableName function (see dbfuncs.pas)
// 11) Update the PODMS Constants type library to add the columns to the
//     enumerator, e.g. see EAS_TRANSACTIONS
//
// (c) Chicony Software 2001
//
// When       Who  Why
// ---------  ---  ------------------------------------------------------------
// 2001.6.7   century Initial version
//
unit dbdef;

interface

uses dbtables, classes,
     // PODMS modules
     Constants_TLB;

//---------------------------------------------------------------------------
//
// PODMS database user-definable data types
//
type G_T_BIT = Boolean;                    // Leave as Boolean even if the RDBMS
                                           // does not support it - this is what
                                           // clients use
type DATETIME = TDateTime;                 // Leave as TDateTime even if the RDBMS
                                           // does not support it - this is what
                                           // clients use

type G_T_INT32 = LongInt;                  // 32-bits (signed, 

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -