想知道程序是如何实现加密解密的嘛？ 那么来下载去看看吧

				program Project;
				
				uses
				  Forms,
				  Unit1 in 'Unit1.pas' {Form1},
				  register in 'register.pas'{registerForm};
				
				{$R *.res}
				
				begin
				  Application.Initialize;
				  Application.CreateForm(TForm1, Form1);
				  
				  Application.Run;
				end.