如何才能让Delphi 7中验证用户密码正确才能调用窗口2？

独自面对℡

这个问题在百度查了好久今天才解决。但是有没有别的方法验证？
成功代码如下：var
str1:string ;
str2:string;
strtxt: string;

begin
  str1:=Trim(Edit1.Text);
  STR2:=Trim(Edit2.Text);

  if((str1 = 'admin')and (STR2 = 'admin')) then
   begin
     Form1.Hide;
     MAIN.Show;
   end
   else
   begin
      ShowMessage('用户或密码错误');
   end;


   end;
请高手帮看下有没有别的方法可以解决用户登录验证！感谢！

独自面对℡

坐等高手帮解决。万分感谢！