pas_password.pas

比较详细的功能

unit pas_password;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Buttons, StdCtrls, ExtCtrls;

type
  TForm_mdpasswd = class(TForm)
    e1: TLabeledEdit;
    e2: TLabeledEdit;
    SB_mdPasswd: TSpeedButton;
    SpeedButton2: TSpeedButton;
    LabeledEdit1: TLabeledEdit;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form_mdpasswd: TForm_mdpasswd;

implementation
  uses pas_dm;
{$R *.dfm}

end.