كيف أجعل لبرنآمجي كلمة سر ؟

[raf2009]

PHP كود :

begin
  Application.Initialize;
  FormUtilisateur:=TFormUtilisateur.Create(nil) ;
  FormUtilisateur.ShowModal;
  IF  not FormUtilisateur.Pass THEN
  BEGIN
     FormUtilisateur.Release;
     application.Terminate; 
  END
  ELSE
  BEGIN
     FormUtilisateur.Release;
 //----------------------------------
     FormSkin:=  TFormSkin.Create(nil);
     FormSkin.Show;
     FormSkin.Update;
     FormSkin.free;
     Application.Run;
 End; //  //-------------Utilisateur---------------------
 
end.