Смена пароля

[Magda]

Для входа в программу нужно сначала ввести пароль, для этого я использовала стандартный код
unit Unit24;

interface

uses Windows, SysUtils, Classes, Graphics, Forms, Controls, StdCtrls, 
  Buttons;
type
  TPasswordDlg = class(TForm)
    Label1: TLabel;
    Password: TEdit;
    OKBtn: TButton;
    CancelBtn: TButton;
procedure FormCloseQuery(Sender: TObject; var CanClose: Boolean);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  PasswordDlg: TPasswordDlg;
implementation
{$R *.dfm}

procedure TPasswordDlg.FormCloseQuery(Sender: TObject;
  var CanClose: Boolean);
const pass='welcome'; //наш пароль
begin
if Password.Text = pass then CanClose:=true
else Application.Terminate;
end;
end.

но как реализовать смену пароля??? просмотрела темы, толком ничего не поняла, я новичок в этом...

[DoDge_VipeR]

как реализовать смену пароля

хранить его либо в реестре либо в зашифрованном файле)

[DoDge_VipeR]

...........................

[Magda]

а как это сделать?