[Snake22]

конечно можно. что мешает? =)

Код:

  
const 
pass1='123';
masterpass='456';
  
begin
 if Password.Text = pass then
  begin 
       CanClose:=true;
       Form1.pgc1.Visible := True;
   end else
  if  Password.Text = masterpass then
   begin
       ЧТОТОТАМ.visible:=true;
   end
else 
   Application.Terminate;
end;