home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1997 May
/
Pcwk0597.iso
/
borland
/
ib
/
setups
/
intrabld
/
data.z
/
EMPPROF.JFM
< prev
next >
Wrap
Text File
|
1996-12-11
|
3KB
|
80 lines
/****************************************************************************\
* *
* EmpProf.jfm -- Employee Security Profile Form *
* *
* EmpProf.jfm is part of the Phone Book prebuilt business solution. It is *
* called by the udpate form to allow the user to update their security *
* profile. The real logic of the profile form is in the base class. *
* The base class is smUserProfileForm in the file Shared\security.jcf. *
* This form simply provides a user interface compatible with the rest of the *
* Phone Book solution. * *
* *
* Dependencies: phonbk31.gif *
* apps\shared\profile.jcf *
* apps\shared\controls.cc *
* *
* Updated 11/12/96 by IntraBuilder Samples Group *
* $Revision: 1.4 $ *
* *
* Copyright (c) 1996, Borland International, Inc. All rights reserved. *
* *
\****************************************************************************/
// {End Header} Do not remove this comment//
// Generated on 11/12/96
//
var f = new empprofForm();
f.open();
class empprofForm extends smUserProfileForm from (_sys.env.home() + "APPS\\SHARED\\PROFILE.JCF") {
_sys.scripts.load(_sys.env.home() + "APPS\\SHARED\\CONTROLS.CC")
with (this) {
color = "cae4ff";
height = 14.6667;
left = 0;
top = 0;
width = 76;
title = "Security Profile Update";
}
with (this.rule1 = new Rule(this)){
top = 4;
size = 2;
right = 70;
}
with (this.rule2 = new Rule(this)){
top = 19.5;
size = 2;
right = 70;
}
with (this.PhoneBookLogo = new Image(this)){
height = 3.4167;
width = 10.25;
dataSource = "filename PHONBK31.GIF";
alignment = 4;
pageno = 0;
}
with (this.HeadingHTML = new HTML(this)){
height = 2;
left = 12;
width = 57;
color = "853a1a";
text = "<H1>Security Profile Update</H1>";
pageno = 0;
}
with (this.GeneratedHTML1 = new GeneratedHTML(this)){
height = 1;
top = 20;
width = 70;
}
}