PC World Komputer 1997 May/Pcwk0597.iso/borland/ib/setups/intrabld/data.z/SAMPHOME.JFM

Text File | 1996-11-13 | 5KB | 178 lines

/****************************************************************************\
*                                                                            *
* SampHome.jfm  --  Sample Files Home Page Form                              *
*                                                                            *
* SampHome.jfm was generated by the Home Page Expert. It contains links to   *
* other forms and reports in the samples directory.                          *
*                                                                            *
* Dependencies:  Borlnd22.gif                                                *
*                IBsplash.bmp                                                *
*                                                                            *
* Updated 11/13/96 by IntraBuilder Samples Group                             *
* $Revision:   1.11  $                                                       *
*                                                                            *
* Copyright (c) 1996, Borland International, Inc. All rights reserved.       *
*                                                                            *
\****************************************************************************/
// {End Header} Do not remove this comment//
// Generated on 11/13/96
//
var f = new samphomeForm();
f.open();
class samphomeForm extends Form {
   _sys.scripts.load("COUNTER.CC")
   with (this) {
      onServerLoad = class::Form_onServerLoad;
      color = "";
      height = 14;
      left = 0;
      top = 0;
      width = 72;
      title = "IntraBuilder Sample Forms";
      background = "filename borlnd22.gif";
   }


   with (this.rule1 = new Rule(this)){
      left = 1;
      top = 8;
      size = 2;
      right = 59;
   }


   with (this.rule2 = new Rule(this)){
      left = 1;
      top = 13;
      size = 2;
      right = 59;
   }


   with (this.TITLE = new HTML(this)){
      height = 2;
      left = 18;
      width = 54;
      color = "black";
      fontBold = true;
      text = '<H1><Font Size="+4">I</Font>ntraBuilder <Font Size="+4">S</Font>ample <Font Size="+4">F</Font>orms</H1>';
   }


   with (this.image1 = new Image(this)){
      height = 5;
      left = 1;
      width = 16;
      dataSource = "filename IBSPLASH.BMP";
      alignment = 3;
   }


   with (this.html1 = new HTML(this)){
      height = 3;
      left = 1;
      top = 9;
      width = 55;
      color = "black";
      fontBold = true;
      text = "<H3>This page contains links to the sample forms that come with IntraBuilder For more information about these forms, see the samples.txt file.</H3>";
   }


   with (this.html2 = new HTML(this)){
      height = 1;
      left = 1;
      top = 14;
      width = 55;
      color = "black";
      fontBold = true;
      text = "<H3>Links</H3>";
   }


   with (this.html3 = new HTML(this)){
      height = 2;
      left = 1;
      top = 15.5;
      width = 70;
      color = "black";
      fontBold = true;
      text = '<UL><LI><A HREF="intrasrv.isv?samples\\activex.jfm">ActiveX.jfm - An ActiveX chart sample</A></LI></UL>';
   }


   with (this.html4 = new HTML(this)){
      height = 2;
      left = 1;
      top = 17.5;
      width = 70;
      color = "black";
      fontBold = true;
      text = '<UL><LI><A HREF="intrasrv.isv?samples\\java.jfm">Java.jfm - A Java applet chart sample</A></LI></UL>';
   }


   with (this.html5 = new HTML(this)){
      height = 2;
      left = 1;
      top = 19.5;
      width = 70;
      color = "black";
      fontBold = true;
      text = "<UL><LI><A HREF=" + '"' + "intrasrv.isv?samples\\mssqlpub.jfm" + '"' + ">MSSQLpub.jfm - Sample using MS SQL Server's pubs database</A></LI></UL>";
   }


   with (this.html6 = new HTML(this)){
      height = 2;
      left = 1;
      top = 21.5;
      width = 70;
      color = "black";
      fontBold = true;
      text = '<UL><LI><A HREF="intrasrv.isv?samples\\biolife.jfm">BioLife.jfm - Expert generated form with modifications</A></LI></UL>';
   }


   with (this.html7 = new HTML(this)){
      height = 2;
      left = 1;
      top = 23.5;
      width = 70;
      color = "black";
      fontBold = true;
      text = '<UL><LI><A HREF="intrasrv.isv?samples\\custord.jfm">CustOrd.jfm - One to many form</A></LI></UL>';
   }


   with (this.html8 = new HTML(this)){
      height = 2;
      left = 1;
      top = 25.5;
      width = 70;
      color = "black";
      fontBold = true;
      text = '<UL><LI><A HREF="intrasrv.isv?samples\\netinfo.jfm">NetInfo.jfm - Using the NetInfo class</A></LI></UL>';
   }


   with (this.Counter1 = new Counter(this)){
      height = 1.1667;
      top = 28;
      width = 70;
      color = "blue";
      fontBold = true;
   }


   function Form_onServerLoad()
   {
      // set custom properties for custom counter class:
      form.Counter1.cTableName= "COUNTERS"
      form.Counter1.cCountName= "SAMPHOME"
      form.Counter1.cFontSize = "5"
      form.Counter1.cText     = "Number of visits to this page: "
   }

}