delphi+access通用会员管理系统[开题报告＋论文＋源代码＋答辩ppt＋外文翻译](十四)

delphi+access通用会员管理系统[开题报告＋论文＋源代码＋答辩ppt＋外文翻译](十四) xButtons, cxTextEdit, cxLabel,
cxControls, cxContainer, cxEdit, cxGroupBox;

type
Tfrmchangepwd = class(TForm)
    cxGroupBox1: TcxGroupBox;
    cxLabel1: TcxLabel;
    cxLabel2: TcxLabel;
    edt1: TcxTextEdit;
    edt2: TcxTextEdit;
    cxButton1: TcxButton;
    cxButton2: TcxButton;
    procedure cxButton1Click(Sender: TObject);
    procedure cxButton2Click(Sender: TObject);
private
    { Private declarations }
public
    { Public declarations }
end;

var
frmchangepwd: Tfrmchangepwd;

implementation

uses md, main;

{$R *.dfm}

procedure Tfrmchangepwd.cxButton1Click(Sender: TObject);
begin
if edt1.Text <> edt2.Text then
begin
    ShowMessage('两次输入的密码不匹配，请重新输入。');
    edt1.SetFocus;
    exit;
end;
with Dm1.tblLoginUser do
begin
    if not Active then
      open;
    First;
    while not eof do
    begin
      if Trim(FieldByName('mc').AsString) = frmMain.LoginUserName then
      begin
        Edit;
        FieldByName('pwd').AsString := edt1.Text;
        post;
        Break;
      end;
      next;
    end;
    close;
    MessageBox(0, '密码修改成功。', '提示', MB_OK + MB_ICONWARNING);
end;
close;
end;

procedure Tfrmchangepwd.cxButton2Click(Sender: TObject);
begin
close;
end;

end.

主界面与代码设计

代码设计:
object frmMain: TfrmMain
Left = 249
Top = 182
Width = 696
Height = 480
Caption = #36890#29992#20250#21592#31649#29702#31995#32479
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsMDIForm
OldCreateOrder = False
WindowState = wsMaximized
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object ilLargeImages: TImageList
    Height = 32
    Width = 32
    Left = 272
    Top = 90

总结
会员管理系统是一个典型的信息管理系统，其主要通过软件工程方面的选择课题、需求分析、总体设计、选用工具、程序模块、系统测试等几个步骤来实现。开发本系统的过程中，首先要对会员管理进行系统调研，熟悉其中新会员登记、会员查询的流程、步骤；其次在系统需求分析过程中，要透过现象看本质，敏锐观察到会员管理中存在的各种问题，并在总体设计把握好对问题的分析、理解，进而解决问题；选用开发工具要选用自己最熟悉、应用较多的开发工具，本系统开发选用DELPHI 6.0，其具有语言简单、功能强大、组件众多的优点。程序模块的编制中，重点把握系统内部完整性、功能性、实用性、便捷性，使其能够协调统一、运行无误。

致谢

我首先感谢我的指导老师吕老师，在他严格的要求下我懂得了开发软件要有一种极其认真负责的态度。无论做什么事都要大胆的去想去做，这样会有好的创意，才能更有作为。
在这里我还要感谢我们宿舍的其它5个同学。他们和我共同生活了四年，在生活和学习上给了我很大的帮助。

首页上一页 11 12 13 14 15 下一页尾页 14/15/15

delphi+access通用会员管理系统[开题报告＋论文＋源代码＋答辩ppt＋外文翻译](十四)由免费论文网（www.jaoyuw.com）会员上传。