// base folder name
// NOTE: all html chunks using this var MUST be built in functions!
var navbase='';
// place here the text of latest news!
var WhatsNew='26.11.2004
DM2003 final release '+
'(build #195) and new branding web site are ready for use!!! ';
var showCurtains=false; // set false to supress curtains
// browser detection
var nn4=(document.layers) ? true : false;
var ie4=(document.all) ? true : false;
////////////////////// DESIGN BUILD //////////////////////
// page banner
function buildBannerRow()
{
var BannerRow='| Data Master 2000 |
';
var BannerRowIE5=' |
';
var av=navigator.appVersion;
var msie4=(av.indexOf('MSIE 4')>0);
if ((!ie4) || msie4) {return BannerRow} else {return BannerRowIE5};
};
// horizontal menu
var HMenuItems=new Array(
'Home',
'Download',
'Manuals',
'Sources');
var HMenuHints=new Array(
'Data Master 2000 home page',
'Software archives download page',
'Data Master 2000 online manuals',
'Help on DM2000 VCL library');
var HMenuHrefs=new Array(
'dm2000',
'download',
'manuals',
'sources');
function BuildMenuRow()
{
var HMenuRow='';
if (!ie4) {HMenuRow+=''};
for (i=0; i  '+
HMenuItems[i]+' | ';
} else
{
HMenuRow+=' '+
' '+HMenuItems[i]+' |';
};
if (!ie4) {HMenuRow+=''};
// EMAIL link
HMenuRow+=' E-mail | ';
HMenuRow+='
'; return HMenuRow; // close menu table
};
// dividers
function BuildDividerLine(vertical)
{
var DividerLine='class="DividerLine">
';
if (vertical) {return ' | '};
};
// page footer
function BuildFooter()
{
return ' | |
';
};
// leftside menu
var LMenuGeneralItems=new Array(
'About',
'Screenshots',
'Links',
'Applications',
'Actions',
'Dialogs',
'Windows',
'VCL objects',
'COM objects');
var LMenuGeneralHrefs=new Array(
'about.htm',
'scrshots.htm',
'links.htm',
'about.htm#app',
'usrguide.htm#actions',
'usrguide.htm#dialogs',
'usrguide.htm#windows',
'sources.htm',
'pgmguide.htm#howto');
var LMenuDialogsItems=new Array(
'Application',
'Axis options',
'Serie options',
'Worksheet',
'Page setup',
'DM2000 setup',
'Base line',
'Calculator',
'Digitizer',
'Linear fitter',
'NLSF fitter',
'NLSF options',
'Speed tester',
'Transformation',
'Function copy');
var LMenuDialogsHrefs=new Array(
'apppropsform.htm',
'axispropsform.htm',
'seriepropsform.htm',
'worksheetpropsform.htm',
'pagesetupform.htm',
'setupform.htm',
'baselineform.htm',
'calculatorform.htm',
'digitizerform.htm',
'linearfitform.htm',
'nlsfform.htm',
'nlsfoptionsform.htm',
'speedtestform.htm',
'transformationform.htm',
'functioncopyform.htm');
var LMenuWindowsItems=new Array(
'Notes window',
'Script window',
'Minibrowser',
'Serie manager',
'Monitor',
'Main window',
'Data window');
var LMenuWindowsHrefs=new Array(
'notesform.htm',
'scriptingform.htm',
'browserform.htm',
'seriemgrform.htm',
'monitorform.htm',
'mainform.htm',
'dataform.htm');
var LMenuActionsItems=new Array(
'File commands',
'Edit commands',
'View commands',
'Plot tools',
'Plot scaling',
'Data analysis');
var LMenuActionsHrefs=new Array(
'actfile.htm',
'actedit.htm',
'actview.htm',
'actplot.htm',
'actscale.htm',
'actproc.htm');
var LMenuVCLItems=new Array(
'TContainer',
'TPlot',
'TWorksheet',
'TAxis',
'TSerie',
'TMathParser');
var LMenuVCLHrefs=new Array(
'libcont.htm',
'libplot.htm',
'libwks.htm',
'libaxis.htm',
'libserie.htm',
'libparse.htm');
var LMenuCOMItems=new Array(
'Application',
'App Events',
'Document',
'Container',
'Worksheet',
'Plot',
'Plot axis',
'Plot serie',
'Notes');
var LMenuCOMHrefs=new Array(
'idmapp.htm',
'idmappev.htm',
'idmdoc.htm',
'idmcont.htm',
'idmwks.htm',
'idmplot.htm',
'idmaxis.htm',
'idmserie.htm',
'idmnotes.htm');
var LMenuAppItems=new Array(
'EPR spectrometer',
'MW spectrometer',
'GM measurements',
'DC conductivity',
'AC conductivity');
var LMenuAppHrefs=new Array(
'facil/epr.htm',
'facil/mw.htm',
'facil/gm.htm',
'facil/ro.htm',
'facil/ac.htm');
// define index in general and custom categories
var idxGeneral=-1;
var idxCategory=-1;
var PHREF=window.location.href;
// note: category root page also included in search!!!
for (i=0; i0) {idxGeneral=i}; }
// search Actions category
for (i=0; i0) {idxGeneral=4; idxCategory=i;}; }
// search Dialogs category
for (i=0; i0) {idxGeneral=5; idxCategory=i;}; }
// search Windows category
for (i=0; i0) {idxGeneral=6; idxCategory=i;}; }
// search VCL category
for (i=0; i0) {idxGeneral=7; idxCategory=i;}; }
// search COM category
for (i=0; i0) {idxGeneral=8; idxCategory=i;}; }
// search App category (notice: NO ROOT file!)
for (i=0; i0) {idxGeneral=-2; idxCategory=i;}; }
function BuildBlockHeader(Header)
{
return '| '+Header+' |
';
};
function BuildMarginCol()
{ // V global width of all blocks defined here!
var MarginCol='';
// build General category caption
MarginCol+=BuildBlockHeader('DM 2000');
for (i=0; i
'+LMenuGeneralItems[i]+'';
}
else
{
MarginCol+='|
';
};
} else
{
MarginCol+='
{MarginCol+='design/dot.gif) '+LMenuGeneralItems[i]+' | ';
};
// build Custom category caption (NOTE: it is NESTED into the BuildMarginCol()!!!)
function buildCustomCat(Items, Hrefs, HrefsName)
{
for (i=0; i'+Items[i]+'';
}
else
{
MarginCol+='|
';
};
} else
{
MarginCol+='
{MarginCol+='design/dot.gif) '+Items[i]+' | ';
};
}; // end of buildCustomCat()
if (showCurtains)
{
MarginCol+='| |
'; // write spacer
MarginCol+=BuildBlockHeader("What's cool");
MarginCol+='| '+BuildCurtains()+' |
';
};
MarginCol+='| |
'; // write spacer between blocks
if ((idxGeneral>3)||(idxGeneral==-2)) // custom category exists!
{
if (idxGeneral>3) // write category header
{
MarginCol+=BuildBlockHeader(LMenuGeneralItems[idxGeneral]);
if (idxGeneral==4) buildCustomCat(LMenuActionsItems,LMenuActionsHrefs,'LMenuActionsHrefs');
if (idxGeneral==5) buildCustomCat(LMenuDialogsItems,LMenuDialogsHrefs,'LMenuDialogsHrefs');
if (idxGeneral==6) buildCustomCat(LMenuWindowsItems,LMenuWindowsHrefs,'LMenuWindowsHrefs');
if (idxGeneral==7) buildCustomCat(LMenuVCLItems,LMenuVCLHrefs,'LMenuVCLHrefs');
if (idxGeneral==8) buildCustomCat(LMenuCOMItems,LMenuCOMHrefs,'LMenuCOMHrefs');
}
else // special Applications category w/o General entry
{
MarginCol+=BuildBlockHeader('Applications');
buildCustomCat(LMenuAppItems, LMenuAppHrefs, 'LMenuAppHrefs');
};
} else // no custom category -> build news block instead!
{
MarginCol+=BuildBlockHeader("What's new");
MarginCol+=' |
';
};
MarginCol+='| |
'; // this spacer divides mirror list
// build mirrors links
/*
var pagefilename=PHREF.substr(PHREF.lastIndexOf('/'));
if (PHREF.indexOf('distrib')>0) {pagefilename='/distrib'+pagefilename;}; // correct path!
if (PHREF.indexOf('facil')>0) {pagefilename='/facil'+pagefilename;};
if (PHREF.indexOf('wm')>0) {pagefilename='/wm'+pagefilename;};
if (!(PHREF.indexOf('gpi')>0)) MarginCol+='| GPI mirror |
';
if (!(PHREF.indexOf('tripod')>0)) MarginCol+='| Tripod mirror |
';
if (!(PHREF.indexOf('denco')>0)) MarginCol+='| UK mirror |
';
*/
MarginCol+='| '+
'Data Master 2003 |
';
MarginCol+='| Denco Computing |
';
MarginCol+='| '+BuildSiteMeter()+' |
'; // sitemeter
MarginCol+='
'; // close left menu table
return MarginCol;
};
// curtains definition (all 3 arrays MUST have equal size!!!)
var curtBanners=new Array(
'objects.jpg',
'dsp.gif',
'ixbt.jpg');
var curtHrefs=new Array(
'http://www.microsoft.com/ie',
'http://sunsite.icm.edu.pl/delphi',
'http://ixbt.stack.net');
var curtHints=new Array(
'Download Internet Explorer',
'Delphi Super Page logo',
'iXBT Hardware');
function BuildCurtains()
{
var curtains='';
if (!(ie4 || nn4))
{
var rndcurt=Math.round(Math.random()*(curtBanners.length-1)+1)-1;
curtains='
';
} else {
for (i=0; i!['+
curtHints[i]+']('+navbase+'banners/'+
curtBanners[i]+')
';
};};
return curtains;
}
////////////////////// MAIN BUILD FUNCTIONS //////////////////////
function buildTop()
{
if (window.location.search=='?print') return;
document.write(''+
buildBannerRow()+'| '+
BuildMarginCol()+' | '+BuildDividerLine(true)+
''+BuildMenuRow());
};
function buildBottom()
{
if (window.location.search=='?print') return;
document.write(' |
'+BuildDividerLine(false)+BuildFooter()+'
');
};
////////////////////// SITEMETER COUNTER CODE //////////////////////
// Copyright (c)2000 Site Meter, Inc.
// Modified by RRR for compatibility with DM2000 site navigation
function BuildSiteMeter()
{
var site="sm5dm2000"; // added by RRR
var g_server="sm5";
var g_date=new Date();
var g_hours=0;
var g_minutes=0;
var g_r="";
var g_rtype="0";
// Get the User Agent Name
var g_agent = navigator.appName;
// Get the referral for non-multi-domained-framed sites using a Netscape browser
if ((g_r == "") || (g_r == "unknown origin") || (g_r == "unknown") || (g_r == "undefined"))
if (document["parent"] != null)
if (parent["document"] != null) // ACCESS ERROR HERE!
if (parent.document["referrer"] != null)
if (typeof(parent.document) == "object")
{
g_rtype="1";
g_r=parent.document.referrer;
}
// Get the referral for the current document if a framed referral wasn't found
if ((g_r == "") || (g_r == "unknown origin") || (g_r == "unknown") || (g_r == "undefined"))
if (document["referrer"] != null)
{
g_rtype="4";
g_r = document.referrer;
}
// Get the hours
if (g_date)
g_hours=g_date.getHours();
// Get the minutes
if (g_date)
g_minutes=g_date.getMinutes();
// Return the image url
var Res=""+
"![](\"http://" "\\"Site")
";
return Res;
}
////////////////////// CURTAIN SCRIPTLET CODE //////////////////////
function Curtain(n,w,h) // called once!
// n - number of layers (0..n-1), w,h - width and height of layer
{
c_number=n;
c_width=w;
c_height=h;
c_nstep=50;
c_k=c_width-2*Math.floor(c_width/2);
c_delta=c_width/(c_nstep*2);
c_direct=false;
c_j=0;
c_lay=Math.round(Math.random()*(n-1)+1);
var obj=showLayer(c_lay);
doCurtain(obj,c_width,c_number,c_height);
}
function doCurtain()
// NOTE! uses internal vars of Curtain() !!!
{
setClip(obj,c_width/2-c_delta*c_j,c_width/2+c_delta*c_j+c_k,0,c_height);
c_tau=30;
if (c_direct)
{
if (c_j>0) {c_j-=1;}
else
{
c_direct=!c_direct; c_lay++;
if (c_lay>c_number) {c_lay=1;};
obj=showLayer(c_lay);
};
}
else
{
if (c_j 
Top'+
' 
Printable version
'+LMenuGeneralItems[i]+'