home *** CD-ROM | disk | FTP | other *** search
- /****************************************************************************\
- * *
- * Biolife.jfm -- Biolife Table Sample Form *
- * *
- * Biolife.jfm is a stand-along sample file. It demonstrates the amazing *
- * capabilities of the IntraBuilder Form Designer. This entire form was *
- * created with the Forms Expert with a few modifications in the Forms *
- * designer. *
- * *
- * Updated 11/13/96 by IntraBuilder Samples Group *
- * $Revision: 1.7 $ *
- * *
- * Copyright (c) 1996, Borland International, Inc. All rights reserved. *
- * *
- \****************************************************************************/
- // {End Header} Do not remove this comment//
- // Generated on 11/13/96
- //
- var f = new biolifeForm();
- f.open();
- class biolifeForm extends Form {
- with (this) {
- color = "aqua";
- height = 15;
- left = 0;
- top = 0;
- width = 72;
- title = "Life in Our Oceans";
- background = "filename wave_21.gif";
- }
-
-
- with (this.query1 = new Query()){
- left = 60;
- top = 3;
- sql = "SELECT * FROM biolife.dbf";
-
- active = true;
- }
-
-
- with (this.query1.rowset) {
-
- }
-
-
- with (this.TITLE = new HTML(this)){
- height = 2;
- width = 70;
- color = "yellow";
- alignHorizontal = 1;
- text = "<CENTER><H1><FONT SIZE=+4>L</FONT>ife <FONT SIZE=+4>I</FONT>n <FONT SIZE=+4>O</FONT>ur <FONT SIZE=+4>O</FONT>ceans</H1></CENTER>";
- }
-
-
- with (this.image1 = new Image(this)){
- height = 6.25;
- top = 3.5;
- width = 31.25;
- dataSource = parent.query1.rowset.fields["GRAPHIC"];
- alignment = 4;
- }
-
-
- with (this.button1 = new Button(this)){
- onServerClick = {;form.rowset.first()};
- top = 2;
- width = 10;
- text = "First";
- }
-
-
- with (this.button2 = new Button(this)){
- onServerClick = {;if (!form.rowset.next(-1)) form.rowset.next()};
- left = 14;
- top = 2;
- width = 10;
- text = "Prev";
- }
-
-
- with (this.button3 = new Button(this)){
- onServerClick = {;if (!form.rowset.next()) form.rowset.next(-1)};
- left = 28;
- top = 2;
- width = 10;
- text = "Next";
- }
-
-
- with (this.button4 = new Button(this)){
- onServerClick = {;form.rowset.last()};
- left = 42;
- top = 2;
- width = 10;
- text = "Last";
- }
-
-
- with (this.HTML1 = new HTML(this)){
- height = 1;
- left = 34;
- top = 3.5;
- width = 12;
- color = "yellow";
- alignVertical = 1;
- text = "Number";
- }
-
-
- with (this.text1 = new Text(this)){
- left = 46;
- top = 3.5;
- width = 10;
- dataLink = parent.query1.rowset.fields["SPECIES_NO"];
- }
-
-
- with (this.HTML2 = new HTML(this)){
- height = 1;
- left = 34;
- top = 4.5;
- width = 12;
- color = "yellow";
- alignVertical = 1;
- text = "Name";
- }
-
-
- with (this.text2 = new Text(this)){
- left = 46;
- top = 4.5;
- width = 20;
- dataLink = parent.query1.rowset.fields["COMMONNAME"];
- }
-
-
- with (this.HTML3 = new HTML(this)){
- height = 1;
- left = 34;
- top = 5.5;
- width = 12;
- color = "yellow";
- alignVertical = 1;
- text = "Species";
- }
-
-
- with (this.text3 = new Text(this)){
- left = 46;
- top = 5.5;
- width = 20;
- dataLink = parent.query1.rowset.fields["SPECIES"];
- }
-
-
- with (this.HTML4 = new HTML(this)){
- height = 1;
- left = 34;
- top = 6.5;
- width = 12;
- color = "yellow";
- alignVertical = 1;
- text = "Category";
- }
-
-
- with (this.text4 = new Text(this)){
- left = 46;
- top = 6.5;
- width = 20;
- dataLink = parent.query1.rowset.fields["CATEGORY"];
- }
-
-
- with (this.HTML5 = new HTML(this)){
- height = 1;
- left = 34;
- top = 7.5;
- width = 12;
- color = "yellow";
- alignVertical = 1;
- text = "Length(cm)";
- }
-
-
- with (this.text5 = new Text(this)){
- left = 46;
- top = 7.5;
- width = 16;
- dataLink = parent.query1.rowset.fields["LENGTH_CM"];
- }
-
-
- with (this.HTML6 = new HTML(this)){
- height = 1;
- left = 34;
- top = 8.5;
- width = 12;
- color = "yellow";
- alignVertical = 1;
- text = "Length(in)";
- }
-
-
- with (this.text6 = new Text(this)){
- left = 46;
- top = 8.5;
- width = 16;
- dataLink = parent.query1.rowset.fields["LENGTH_IN"];
- }
-
-
- with (this.textArea1 = new TextArea(this)){
- height = 5;
- top = 10;
- width = 70;
- dataLink = parent.query1.rowset.fields["NOTES"];
- }
-
- this.rowset = this.query1.rowset;
-
- }
-