超级DIY 用注册表给应用程序加口令( 二 )

//窗体的Show事件
procedure TWszLoginForm.FormShow(Sender: TObject);
begin
if Wsz_IfFirst then
begin
Application.MessageBox(
"您是第一次使用本软件,您可以随便输入用户名和口令 。",
"系统提示",
MB_OKMB_ICONINFORMATION);
end;
end;

推荐阅读