home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 May / Pcwk0597.iso / borland / ib / setups / intrabld / data.z / GBLOGIN.JFM < prev    next >
Encoding:
Text File  |  1996-12-11  |  3.2 KB  |  93 lines
  1. /****************************************************************************\
  2. *                                                                            *
  3. * GbLogin.jfm  --  Guest Book Login Form                                     *
  4. *                                                                            *
  5. * GbLogin is part of the Guest Book prebuilt business solution. It allows    *
  6. * you to log into the Guest Book Update form. The Guest Book Update form     *
  7. * calls this before opening and is only opened itself after a successful     *
  8. * login. This form uses the smLoginForm base class defined in SECURITY.JCF   *
  9. * in the Shared directory. The login logic is contained there. This form     *
  10. * applies the Guest Book user interface.                                     *
  11. *                                                                            *
  12. * Dependencies:  gestbk31.gif                                                *
  13. *                homepg31.gif                                                *
  14. *                apps/shared/controls.cc                                     *
  15. *                                                                            *
  16. * Updated 11/12/96 by IntraBuilder Samples Group                              *
  17. * $Revision:   1.3  $                                                        *
  18. *                                                                            *
  19. * Copyright (c) 1996, Borland International, Inc. All rights reserved.       *
  20. *                                                                            *
  21. \****************************************************************************/
  22. // {End Header} Do not remove this comment//
  23. // Generated on 11/12/96
  24. //
  25. var f = new gbloginForm();
  26. f.open();
  27. class gbloginForm extends smLoginForm from (_sys.env.home() + "APPS\\SHARED\\SECURITY.JCF") {
  28.    _sys.scripts.load(_sys.env.home() + "APPS\\SHARED\\CONTROLS.CC")
  29.    with (this) {
  30.       color = "a4d5ff";
  31.       height = 12.25;
  32.       left = 0;
  33.       top = 0;
  34.       width = 72;
  35.       title = "Guest Book Update Login";
  36.    }
  37.  
  38.  
  39.    with (this.rule1 = new Rule(this)){
  40.       top = 4;
  41.       size = 2;
  42.       right = 66;
  43.       pageno = 0;
  44.    }
  45.  
  46.  
  47.    with (this.rule2 = new Rule(this)){
  48.       top = 9.5;
  49.       size = 2;
  50.       right = 66;
  51.       pageno = 0;
  52.    }
  53.  
  54.  
  55.    with (this.guestBookLogo = new Image(this)){
  56.       height = 3.4167;
  57.       width = 10.25;
  58.       dataSource = "filename GESTBK31.GIF";
  59.       alignment = 4;
  60.       pageno = 0;
  61.    }
  62.  
  63.  
  64.    with (this.titleHTML = new HTML(this)){
  65.       height = 2;
  66.       left = 12;
  67.       width = 54;
  68.       color = "steelblue";
  69.       text = '<H1><FONT SIZE="+4"><FONT COLOR="mediumvioletred">G</FONT></FONT>uest <FONT SIZE="+4"><FONT COLOR="mediumvioletred">B</FONT></FONT>ook <FONT SIZE="+4"><FONT COLOR="mediumvioletred">L</FONT></FONT>ogin</H1>';
  70.       pageno = 0;
  71.    }
  72.  
  73.  
  74.    with (this.GeneratedHTML1 = new GeneratedHTML(this)){
  75.       height = 1;
  76.       top = 10;
  77.       width = 69;
  78.       pageno = 0;
  79.    }
  80.  
  81.  
  82.    with (this.hintHTML = new HTML(this)){
  83.       height = 1;
  84.       left = 12;
  85.       top = 2;
  86.       width = 54;
  87.       color = "black";
  88.       text = "(Hint: try Luke or Eugenia. Password matches name.)";
  89.    }
  90.  
  91.  
  92. }
  93.