Delphi031会员管理系统..docVIP

Delphi031会员管理系统 pB style=mso-bidi-font-weiDelphi031会员管理系统 ght: normal2.4nbsp;nbsp;nbspDelphi031会员管理系统 ;nbsp;nbsp;nbsp;nbsp;nbsp;Delphi031会员管理系统 nbsp;nbsp;nbsp; /BB style=Delphi031会员管理系统 mso-bidi-font-weight: normalDelphi031会员管理系统 系统的详细设计/BB style=mso-bidi-foDelphi031会员管理系统 nt-weight: normal?/B/P pDelphi031会员管理系统 进入Access后要做的第一件事就是建立一个数据库。AccessDelphi031会员管理系统 提供了6种用构造数据库系统的对象，根据本课题的需要，在这里选Delphi031会员管理系统 择一个空的数据库，命名建立了一个数据库名称为“YoungCluDelphi031会员管理系统 b”，通用会员管理系统。并在此数据库下创建了七个表，用于存放原始数据Delphi031会员管理系统 。它只是存放数据，对其中数据的修改要通过对应的窗体来完成。创建各Delphi031会员管理系统 表的具体结构如下：/P pprocedure TfrmrDelphi031会员管理系统 egister.Label1Click(Sender: TObDelphi031会员管理系统 ject);/P pbegin/P pnbspDelphi031会员管理系统 ; close;/P pend;/P pDelphi031会员管理系统 nbsp;/P pprocedure TfrmregisDelphi031会员管理系统 ter.FormCreate(Sender: TObject);Delphi031会员管理系统 /P pbegin/P pnbsp; Dm1.adoqry1.Close;/P pnbsp; Dm1.adoqry1.sql.Clear;/P pnbsp; Dm1.adoqry1.sql.Text := select * from city where pbm=0;/P pnbsp; dm1.adoqry1.Open;/P pnbsp; Dm1.adoqry1.first;/P pnbsp; dm1.adoqry1.next;/P pnbsp; cmbszqy.Properties.Items.Clear;/P pnbsp; while not dm1.adoqry1.Eof do/P pnbsp; begin/P pnbsp;nbsp;nbsp; cmbszqy.Properties.Items.Append(Dm1.adoqry1.fieldbyname(city).asstring);/P pnbsp;nbsp;nbsp; Dm1.adoqry1.Next;/P pnbsp; end;/P pnbsp; Dm1.adoqry1.Close;/P pnbsp; if not dm1.tblHuiyuan.Active then/P pnbsp;nbsp;nbsp; dm1.tblHuiyuan.Open;/P /pbr / P字段之间有这种“多对多”的关系时，你需要使用第三个表来指明这种关系。BRBR但是，在许多情况下，两个表之间的关系并不复杂 。比如你需要指明表titles和表publishers之间的关系。因为一个书名不可能与多个出版商相匹配，你不需要通过第三个表来指明这两个表之间的关系。要指明表titles和表publishers之间的关系，你只要让这两个表有一个公共的字段就可以了。在数据库pubs中，表titles和表publishers都有一个名为pub_id的字段。如果你想得到书名及其出版商的一个列表，你可以使用如下的语句：BRBRSELECTnbsp;title,pub_namenbsp;FROMnbsp;titles,publishersBRBRWHEREnbsp;titles.pub_id=publishers.pub_idBRBR当然，如果一本书是由两个出版商联合出版的，那么你需要第三个表来代表这种关系。BRBR通常，当你予先知道两个表的字段间存在“多对多”关系时，就使用第三个表来关联这两个表。反之，如果两个表的字段间只有“一对一”或“一对多”关系，你可以使用公共字段来关联它门。BRBR操作字段BRBR通常，当你从一个表中取出字段值时，该值与创建该表时所定义的字段名联系在一起。如果你从表authors中选择所有的作者名字，所有的值将会与字段名au_lname相联系。但是在某些情况下，你需要对字