diff options
author | Joachim Lingner <jl@openoffice.org> | 2002-06-19 09:13:31 +0000 |
---|---|---|
committer | Joachim Lingner <jl@openoffice.org> | 2002-06-19 09:13:31 +0000 |
commit | bf74f2f14ea2e09dd270f4f00b191c37e5850ecc (patch) | |
tree | 190edbdaf1ba9f3f024c1b7367e17db8b461dbdf /extensions/test | |
parent | b4e6e261db915f67c99f178a5c6d158331378307 (diff) |
*** empty log message ***
Diffstat (limited to 'extensions/test')
-rw-r--r-- | extensions/test/ole/ScriptTest.html | 602 |
1 files changed, 281 insertions, 321 deletions
diff --git a/extensions/test/ole/ScriptTest.html b/extensions/test/ole/ScriptTest.html index caae75e9e92c..aea3d322a7d1 100644 --- a/extensions/test/ole/ScriptTest.html +++ b/extensions/test/ole/ScriptTest.html @@ -43,8 +43,47 @@ arFunctions["AttrSequence"]="[attribute] sequence< sequence<long> > AttrSequence arFunctions["AttrSequence2"]="[attribute] sequence< sequence< sequence <long> > > AttrSequence2"; arFunctions["AttrXInterface"]="[attribute] sequence< com::sun::star::uno::XInterface > AttrXInterface"; +arFunctions["testout_methodByte"]= " void testout_methodByte( [out] byte rOut )"; +arFunctions["testout_methodFloat"]= "void testout_methodFloat( [out] float rOut)"; +arFunctions["testout_methodDouble"]= "void testout_methodDouble( [out] double rOut)"; +arFunctions["testout_methodBool"]= "void testout_methodBool( [out] boolean rOut)"; +arFunctions["testout_methodShort"]= "void testout_methodShort( [out] short rOut)"; +arFunctions["testout_methodUShort"]= "void testout_methodUShort( [out] unsigned short rOut)"; +arFunctions["testout_methodLong"]= "void testout_methodLong( [out] long rOut)"; +arFunctions["testout_methodULong"]= "void testout_methodULong( [out] unsigned long rOut)"; +arFunctions["testout_methodString"]= "void testout_methodString( [out] string rOut)"; +arFunctions["testout_methodChar"]= "void testout_methodChar( [out] char rOut)"; +arFunctions["testout_methodAny"]= "void testout_methodAny( [out] any rOut)"; +arFunctions["testout_methodSequence"]= "void testout_methodSequence( [out] sequence< long > rOut)"; +arFunctions["testout_methodSequence2"]= "void testout_methodSequence2( [out] sequence < sequence< long > > rOut)"; +arFunctions["testout_methodXInterface"]= "void testout_methodXInterface( [out] com::sun::star::uno::XInterface rOut)"; +arFunctions["testout_methodMulParams1"]= "void testout_methodMulParams1( [out] long rout1, [out] long rout2)"; +arFunctions["testout_methodMulParams2"]= "void testout_methodMulParams2( [out] long rout1, [out] long rout2, [out] string rout3)"; +arFunctions["testout_methodMulParams3"]= "void testout_methodMulParams3( [in] string sin, [out] string sout)"; +arFunctions["testout_methodMulParams4"]= "void testout_methodMulParams4( [in] float in1, [out] float out1, [in] long in2, [out] long out2, [in] long in3)"; +arFunctions["testinout_methodByte"]="void testinout_methodByte( [inout] byte rOut )"; +arFunctions["testinout_methodFloat"]="void testinout_methodFloat( [inout] float rOut)"; +arFunctions["testinout_methodDouble"]="void testinout_methodDouble( [inout] double rOut)"; +arFunctions["testinout_methodBool"]="void testinout_methodBool( [inout] boolean rOut)"; +arFunctions["testinout_methodShort"]="void testinout_methodShort( [inout] short rOut)"; +arFunctions["testinout_methodUShort"]="void testinout_methodUShort( [inout] unsigned short rOut)"; +arFunctions["testinout_methodLong"]="void testinout_methodLong( [inout] long rOut)"; +arFunctions["testinout_methodULong"]="void testinout_methodULong( [inout] unsigned long rOut)"; +arFunctions["testinout_methodString"]="void testinout_methodString( [inout] string rOut)"; +arFunctions["testinout_methodChar"]="void testinout_methodChar( [inout] char rOut)"; +arFunctions["testinout_methodAny"]="void testinout_methodAny( [inout] any rOut)"; +arFunctions["testinout_methodSequence"]="void testinout_methodSequence( [inout] sequence< long > rOut)"; +arFunctions["testinout_methodSequence2"]="void testinout_methodSequence2( [inout] sequence < sequence< long > > rOut)"; +arFunctions["testinout_methodXInterface"]="void testinout_methodXInterface( [inout] com::sun::star::script::XInvocation rOut)"; +arFunctions["testinout_methodXInterface2"]="void testinout_methodXInterface2( [inout] com::sun::star::uno::XInterface rOut)"; + +arFunctions["methodAnyTest1"]="any methodAnyTest1( [in] any rIn)"; + + +var Log= new Logger(); var arr= new Array( 1, 2, 3, 4, 0); +var arrInt= new Array( 1,2,3,4,5); var arrDouble= new Array( 1.2345, 12.345, 123.45, 1234.5, 12345); var arrBool= new Array( true, false, true, false, true); var arrChar= new Array( '1', 'A'," ", 55); @@ -60,6 +99,13 @@ var arEventListener2= new Array( new XEventListener_Impl(), new XEventListener_I new XEventListener_Impl()); var arArEventListener= new Array( arEventListener, arEventListener2); +var arObj= new Array(); +for( i=0; i< 3; i++) + arObj[i]= new Object(); + +var outVal= new Array(); +var outVal2= new Array(); +var outVal3= new Array(); for( i=0; i < 3; i++) { @@ -79,7 +125,7 @@ for( i=0; i < 3; i++) ret= oletest.methodByte( arr); _ret= new VBArray( ret).toArray(); -log( isEqualAr( arr, _ret), "methodByte"); +Log.print( isEqualAr( arr, _ret), "methodByte"); ret= oletest.methodFloat( arrDouble); _ret= new VBArray( ret).toArray(); @@ -91,46 +137,46 @@ if( (arrDouble.length == _ret.length) && (_ret[3] > 1234.4 && _ret[3] < 1234.6) && (_ret[4] > 12344 && _ret[4] < 12346)) bOk= true; -log( bOk, "methodFloat"); +Log.print( bOk, "methodFloat"); ret= oletest.methodDouble( arrDouble); _ret= new VBArray( ret).toArray(); -log( isEqualAr( arrDouble, _ret), "methodDouble"); +Log.print( isEqualAr( arrDouble, _ret), "methodDouble"); ret= oletest.methodBool( arrBool); _ret= new VBArray( ret).toArray(); -log( isEqualAr( arrBool, _ret), "methodBool"); +Log.print( isEqualAr( arrBool, _ret), "methodBool"); ret= oletest.methodShort( arr); _ret= new VBArray( ret).toArray(); -log( isEqualAr( arr, _ret), "methodShort"); +Log.print( isEqualAr( arr, _ret), "methodShort"); ret= oletest.methodUShort( arr); _ret= new VBArray( ret).toArray(); -log( isEqualAr( arr, _ret), "methodUShort"); +Log.print( isEqualAr( arr, _ret), "methodUShort"); ret= oletest.methodLong( arr); _ret= new VBArray( ret).toArray(); -log( isEqualAr( arr, _ret), "methodLong"); +Log.print( isEqualAr( arr, _ret), "methodLong"); ret= oletest.methodULong( arr); _ret= new VBArray( ret).toArray(); -log( isEqualAr( arr, _ret), "methodULong"); +Log.print( isEqualAr( arr, _ret), "methodULong"); ret= oletest.methodChar( arrChar); _ret= new VBArray( ret).toArray(); bOk= false; if( _ret.length == arrChar.length && _ret[0] == 49 && _ret[1] == 65 && _ret[2] == 32 && _ret[3] == 55) bOk= true; -log( bOk, "methodChar"); +Log.print( bOk, "methodChar"); ret= oletest.methodString( arrString); _ret= new VBArray( ret).toArray(); -log( isEqualAr( arrString, _ret), "methodString"); +Log.print( isEqualAr( arrString, _ret), "methodString"); ret= oletest.methodAny( arrAny); _ret= new VBArray( ret).toArray(); -log( isEqualAr( arrAny, _ret), "methodAny"); +Log.print( isEqualAr( arrAny, _ret), "methodAny"); ret= oletest.methodSequence( arrSeq); _ret= new VBArray( ret).toArray(); @@ -144,7 +190,7 @@ for( i=0; i < _ret.length; i++) break; } } -log( bOk, "methodSequence"); +Log.print( bOk, "methodSequence"); ret= oletest.methodSequence2( arrSeq2); arr1= new VBArray( ret).toArray(); @@ -166,26 +212,21 @@ for( i=0; i < arr1.length; i++) } } } -log( bOk, "methodSequence2"); +Log.print( bOk, "methodSequence2"); - -var ar= new Array(); -for( i=0; i< 3; i++) - ar[i]= new Object(); - -ret = oletest.methodXInterface( ar); +ret= oletest.methodXInterface( arObj); _ret= new VBArray( ret); _ret= _ret.toArray(); bOk= true; for(i in _ret) { - if( _ret[i] !== ar[i]) + if( _ret[i] !== arObj[i]) { bOk= false; break; } } -log( bOk, "methodXInterface"); +Log.print( bOk, "methodXInterface"); ret= oletest.methodXEventListeners( arEventListener); _ret= new VBArray(ret).toArray(); @@ -198,7 +239,7 @@ for ( key in _ret) break; } } -log( bOk, "methodXEventListeners"); +Log.print( bOk, "methodXEventListeners"); ret= oletest.methodXEventListenersMul( arArEventListener); _ret= new VBArray(ret).toArray(); @@ -215,16 +256,16 @@ for( key in _ret) } } } -log( bOk, "methodXEventListenersMul"); +Log.print( bOk, "methodXEventListenersMul"); document.writeln("<br>"); oletest.AttrByte = arr; ret= oletest.AttrByte; _ret= new VBArray( ret).toArray(); -log( isEqualAr( arr, _ret), "AttrByte"); +Log.print( isEqualAr( arr, _ret), "AttrByte"); -oletest.AttrDouble= arrDouble; -ret= oletest.AttrDouble; +oletest.AttrFloat= arrDouble; +ret= oletest.AttrFloat; _ret= new VBArray( ret).toArray(); bOk= false; if( (arrDouble.length == _ret.length) @@ -234,32 +275,37 @@ if( (arrDouble.length == _ret.length) && (_ret[3] > 1234.4 && _ret[3] < 1234.6) && (_ret[4] > 12344 && _ret[4] < 12346)) bOk= true; -log( bOk, "AttrDouble"); +Log.print( bOk, "AttrFloat"); + +oletest.AttrDouble= arrDouble; +ret= oletest.AttrDouble; +_ret= new VBArray( ret).toArray(); +Log.print( isEqualAr( arrDouble, _ret), "AttrDouble"); oletest.AttrBool= arrBool; ret= oletest.AttrBool; _ret= new VBArray( ret).toArray(); -log( isEqualAr( arrBool, _ret), "AttrBool"); +Log.print( isEqualAr( arrBool, _ret), "AttrBool"); oletest.AttrShort= arr; ret= oletest.AttrShort; _ret= new VBArray( ret).toArray(); -log( isEqualAr( arr, _ret), "AttrShort"); +Log.print( isEqualAr( arr, _ret), "AttrShort"); oletest.AttrUShort= arr; ret= oletest.AttrUShort; _ret= new VBArray( ret).toArray(); -log( isEqualAr( arr, _ret), "AttrUShort"); +Log.print( isEqualAr( arr, _ret), "AttrUShort"); oletest.AttrLong= arr; ret= oletest.AttrLong; _ret= new VBArray( ret).toArray(); -log( isEqualAr( arr, _ret), "AttrLong"); +Log.print( isEqualAr( arr, _ret), "AttrLong"); oletest.AttrULong= arr; ret= oletest.AttrULong; _ret= new VBArray( ret).toArray(); -log( isEqualAr( arr, _ret), "AttrULong"); +Log.print( isEqualAr( arr, _ret), "AttrULong"); oletest.AttrChar= arrChar; ret= oletest.AttrChar; @@ -267,17 +313,17 @@ _ret= new VBArray(ret).toArray(); bOk= false; if( _ret.length == arrChar.length && _ret[0] == 49 && _ret[1] == 65 && _ret[2] == 32 && _ret[3] == 55) bOk= true; -log( bOk, "AttrChar"); +Log.print( bOk, "AttrChar"); oletest.AttrString= arrString; ret= oletest.AttrString; _ret= new VBArray( ret).toArray(); -log( isEqualAr( arrString, _ret), "AttrString"); +Log.print( isEqualAr( arrString, _ret), "AttrString"); oletest.AttrAny= arrAny; ret= oletest.AttrAny; _ret= new VBArray( ret).toArray(); -log( isEqualAr( arrAny, _ret), "AttrAny"); +Log.print( isEqualAr( arrAny, _ret), "AttrAny"); oletest.AttrSequence= arrSeq; ret= oletest.AttrSequence; @@ -292,7 +338,7 @@ for( i=0; i < _ret.length; i++) break; } } -log( bOk, "AttrSequence"); +Log.print( bOk, "AttrSequence"); oletest.AttrSequence2= arrSeq2; ret= oletest.AttrSequence2; @@ -314,20 +360,214 @@ for( i=0; i < arr1.length; i++) } } } -log( bOk, "AttrSequence2"); +Log.print( bOk, "AttrSequence2"); -oletest.AttrFloat= arrDouble; -ret= oletest.AttrFloat; +oletest.AttrXInterface( arObj); +ret= oletest.AttrXInterface; +_ret= new VBArray( ret).toArray(); +bOk= true; +for(i in _ret) +{ + if( _ret[i] !== arObj[i]) + { + bOk= false; + break; + } +} +Log.print( bOk, "AttrXInterface"); + +document.writeln("<br>"); + +oletest.testout_methodByte( outVal ); +Log.print( outVal[0] == 111, "testout_methodByte"); + +oletest.testout_methodFloat( outVal ); +Log.print( outVal[0] > 3.13 && outVal[0] < 3.15, "testout_methodFloat"); + +oletest.testout_methodDouble( outVal ); +Log.print( outVal[0] == 3.14, "testout_methodDouble" ); + +oletest.testout_methodBool( outVal ); +Log.print( outVal[0] == true, "testout_methodBool"); + +oletest.testout_methodShort( outVal ); +Log.print( outVal[0] == 222, "testout_methodShort"); + +oletest.testout_methodUShort( outVal ); +Log.print( outVal[0] == 333, "testout_methodUShort"); + +oletest.testout_methodLong( outVal ); +Log.print( outVal[0] == 444, "testout_methodLong"); + +oletest.testout_methodULong( outVal ); +Log.print( outVal[0] == 555, "testout_methodULong"); + +oletest.testout_methodChar( outVal ); +Log.print( outVal[0] == 65, "testout_methodChar"); + +oletest.testout_methodString( outVal ); +Log.print( outVal[0] == "a little string", "testout_methodString"); + +oletest.testout_methodAny( outVal ); +Log.print( outVal[0] == "I am a string in an any", "testout_methodAny"); + +oletest.testout_methodSequence( outVal ); +var arr= new VBArray( outVal[0]).toArray(); +Log.print( isEqualAr(arr, new Array( 0,1,2,3,4,5,6,7,8,9)), "testout_methodSequence"); + +oletest.testout_methodSequence2( outVal ); +var arr= new VBArray( outVal[0]).toArray(); +bOk= true; +if( arr.length= 10) +{ + for( i=0; i < arr.length; i++) + { + var arr2= new VBArray( arr[i]).toArray(); + if( ! isEqualAr( arr2, new Array( 0,1,2,3,4,5,6,7,8,9))) + { + bOk= false; + break; + } + } +} +Log.print( bOk, "testout_methodSequence2"); + +oletest.testout_methodMulParams1( outVal, outVal2 ); +Log.print( outVal[0] == 999 && outVal2[0] == 1111, "testout_methodMulParams1"); + +oletest.testout_methodMulParams2( outVal, outVal2, outVal3 ); +Log.print( outVal[0] == 1111 && outVal2[0] == 1222 && outVal3[0] == " another string", + "testout_methodMulParams2"); + +oletest.testout_methodMulParams3( "hallo", outVal ); +Log.print( outVal[0] == "Out Hallo!", "testout_methodMulParams3"); + +var in1= 3.14; +var in2= 1111; +var in3= -2222; +oletest.testout_methodMulParams4( in1, outVal, in2, outVal2, in3 ); +Log.print( (outVal[0] > 4.13 && outVal[0] < 4.15) && (outVal2[0] == 1112), "testout_methodMulParams4"); + +oletest.testout_methodXInterface( outVal ); +var obj= outVal[0]; +Log.print( outVal[0].AttrAny2 == "Property Any", "testout_methodXInterface"); +document.writeln("<p>"); -function log( bool, method) +outVal[0]= 100; +oletest.testinout_methodByte( outVal ); +Log.print( outVal[0] == 101, "testinout_methodByte"); + +outVal[0]= 3.14; +oletest.testinout_methodFloat( outVal ); +Log.print( outVal[0] > 4.13 && outVal[0] < 4.15, "testinout_methodFloat"); + +outVal[0]= 3.14; +oletest.testinout_methodDouble( outVal ); +Log.print( outVal[0] > 4.13 && outVal[0] < 4.15, "testinout_methodDouble"); + +outVal[0]= false; +oletest.testinout_methodBool( outVal ); +Log.print( outVal[0] == true, "testinout_methodBool"); + +outVal[0]= 200; +oletest.testinout_methodShort( outVal ); +Log.print( outVal[0] == 201, "testinout_methodShort"); + +outVal[0]= 300; +oletest.testinout_methodUShort( outVal ); +Log.print( outVal[0] == 301, "testinout_methodUShort"); + +outVal[0]= 400; +oletest.testinout_methodLong( outVal ); +Log.print( outVal[0] == 401, "testinout_methodLong"); + +outVal[0]= 500; +oletest.testinout_methodULong( outVal ); +Log.print( outVal[0] == 501, "testinout_methodULong"); + +outVal[0]= "A"; +oletest.testinout_methodChar( outVal ); +Log.print( outVal[0] == 66, "testinout_methodChar"); + +outVal[0]= "I am a string"; +oletest.testinout_methodString( outVal ); +Log.print( outVal[0] == "I am a string out string", "testinout_methodString"); + +outVal[0]= arrInt; +oletest.testinout_methodAny( outVal ); +var arr2= new VBArray( outVal[0]).toArray(); +Log.print( isEqualAr(arrInt, arr2), "testinout_methodAny"); + +outVal[0]= arrInt; +oletest.testinout_methodSequence( outVal ); +arr= new VBArray( outVal[0]).toArray(); +Log.print( isEqualAr( arr, new Array( 2,3,4,5,6)), "testinout_methodSequence"); + + +outVal[0]= arrSeq; +oletest.testinout_methodSequence2( outVal ); +var arr= new VBArray( outVal[0]).toArray(); +var i; +bOk= true; +if( arr.length == 3) +{ + var tmpArr= new Array(2,4,6,8,0); + for( i=0; i < arr.length; i++) + { + var arr2= new VBArray( arr[i]).toArray(); + if( ! isEqualAr( arr2, tmpArr)) + { + bOk= false; + break; + } + } +} +Log.print( bOk, "testinout_methodSequence2"); + + +var ob= new Object(); +var sInVal= "this is a string" +ob.value= sInVal; +outVal[0]= ob; +oletest.testinout_methodXInterface( outVal); +Log.print( outVal[0].value == " this string was written in the UNO component to the inout pararmeter", "testinout_methodXInterface"); + +document.writeln("<p>"); + + +Log.summarize(); + + + + +function Logger() +{ + this.print= logger_print; + this.summarize= logger_summarize; + this.bAllOk= true; +} +function logger_print( bool, method) { if( bool) document.writeln( "Ok " + arFunctions[method] + "<br>"); else + { document.writeln( "Failed " + arFunctions[method] + "<br>"); + this.bAllOk= this.bAllOk && false; + } +} + +function logger_summarize() +{ + document.writeln("<p> ==============================================================================<br>"); + if(this.bAllOk) + document.writeln("No errors <br>"); + else + document.writeln("Error ! The test failed! <br>"); } + function isEqualAr( ar1, ar2) { var bOk= false; @@ -431,251 +671,7 @@ function callOleTest( id) var arArEventListener= new Array( arEventListener, arEventListener2); switch( id) { - // Array in-params - - - - // Properties: setting and getting values - case 200: oletest.AttrByte = arr; - ret= oletest.AttrByte; - document.writeln("Setting AttrByte: " + arr.toString() + "<p>"); - document.writeln("Getting AttrByte: " + arr.toString()); break; - - case 201: oletest.AttrDouble= arrDouble; - ret= oletest.AttrDouble; - document.writeln("Setting AttrDouble: " + arrDouble.toString() + "<p>"); - document.writeln("Getting AttrDouble: " + arrDouble.toString()); break; - - case 202: oletest.AttrBool= arrBool; - ret= oletest.AttrBool; - document.writeln("Setting AttrBool: " + arrBool.toString() + "<p>"); - document.writeln("Getting AttrBool: " + arrBool.toString()); break; - - case 203: oletest.AttrShort= arr; - ret= oletest.AttrShort; - document.writeln("Setting AttrShort: " + arr.toString() + "<p>"); - document.writeln("Getting AttrShort: " + arr.toString()); break; - - case 204: oletest.AttrUShort= arr; - ret= oletest.AttrUShort; - document.writeln("Setting AttrUShort: " + arr.toString() + "<p>"); - document.writeln("Getting AttrUShort: " + arr.toString()); break; - - case 205: oletest.AttrLong= arr; - ret= oletest.AttrLong; - document.writeln("Setting AttrLong: " + arr.toString() + "<p>"); - document.writeln("Getting AttrLong: " + arr.toString()); break; - - case 206: oletest.AttrULong= arr; - ret= oletest.AttrULong; - document.writeln("Setting AttrULong: " + arr.toString() + "<p>"); - document.writeln("Getting AttrULong: " + arr.toString()); break; - - case 207: oletest.AttrChar= arrChar; - ret= oletest.AttrChar; - document.writeln("Setting AttrChar: " + arrChar.toString() + "<p>"); - document.writeln("Getting AttrChar: " + arrChar.toString()); break; - - case 208: oletest.AttrString= arrString; - ret= oletest.AttrString; - document.writeln("Setting AttrString: " + arrString.toString() + "<p>"); - document.writeln("Getting AttrString: " + arrString.toString()); break; - - case 209: oletest.AttrAny= arrAny; - ret= oletest.AttrAny; - document.writeln("Setting AttrAny: " + arrAny.toString() + "<p>"); - document.writeln("Getting AttrAny: " + arrAny.toString()); break; - - case 210: oletest.AttrSequence= arrSeq; - ret= oletest.AttrSequence; - document.writeln("Setting AttrSequence: " + arrSeq.toString() + "<p>"); - document.writeln("Getting AttrSequence: " + arrSeq.toString()); break; - - case 211: oletest.AttrSequence2= arrSeq2; - ret= oletest.AttrSequence2; - document.writeln("Setting AttrSequence2: " + arrSeq2.toString() + "<p>"); - document.writeln("Getting AttrSequence2: " + arrSeq2.toString()); break; - - case 212: oletest.AttrFloat= arrDouble; - ret= oletest.AttrFloat; - document.writeln("Setting AttrFloat: " + arrDouble.toString() + "<p>"); - document.writeln("Getting AttrFloat: " + arrDouble.toString()); break; - - - - // Out-parameter ------------------------------------------------------------ - case (2000): - oletest.testout_methodByte( arrout1 ); - alert("byte: " + arrout1[0] ); break; - case (2001): - oletest.testout_methodDouble( arrout1 ); - alert( "double: " + arrout1[0] ); break; - case (2002): - oletest.testout_methodBool( arrout1 ); - alert( "boolean: " + arrout1[0] ); break; - case (2003): - oletest.testout_methodShort( arrout1 ); - alert( "short: " + arrout1[0] ); break; - case (2004): - oletest.testout_methodUShort( arrout1 ); - alert( "unsigned short: " + arrout1[0] ); break; - case (2005): - oletest.testout_methodLong( arrout1 ); - alert( "long: " + arrout1[0] ); break; - case (2006): - oletest.testout_methodULong( arrout1 ); - alert( "unsigned long: " + arrout1[0] ); break; - case (2007): - oletest.testout_methodChar( arrout1 ); - alert( "char: " + arrout1[0] ); break; - case (2008): - oletest.testout_methodString( arrout1 ); - alert( "string: " + arrout1[0] ); break; - case (2009): - oletest.testout_methodAny( arrout1 ); - alert( "any: " + arrout1[0] ); break; - case (2010): - oletest.testout_methodSequence( arrout1 ); - var sfarray= new VBArray( arrout1[0]); - arr= sfarray.toArray(); - document.writeln("use the browser's back arrow to go to the previous page <p>"); - document.writeln( arr.toString()); - break; - case (2011): - oletest.testout_methodSequence2( arrout1 ); - var sfarray= new VBArray( arrout1[0]); - arr= sfarray.toArray(); - var i; - for( i=0; i < arr.length; i++) - { - var sfarray= new VBArray( arr[i]); - var arr2= new Array(); - arr2= sfarray.toArray(); - document.writeln( arr2.toString() + "<br>" ); - } - break; - case (2012): - oletest.testout_methodMulParams1( arrout1, arrout2 ); - document.writeln( "int : " + arrout1[0] + " int :" + arrout2[0] ); break; - case (2013): - oletest.testout_methodMulParams2( arrout1, arrout2, arrout3 ); - document.writeln( "int: " + arrout1[0] + " int: " + arrout2[0] + " string: " + arrout3[0] ); break; - case (2014): - oletest.testout_methodMulParams3( "hallo", arrout1 ); - document.writeln( "string: " + arrout1[0] ); break; - case (2015): - oletest.testout_methodXInterface( arrout1 ); - var outVal= arrout1[0]; - alert( outVal.AttrAny2); - document.writeln( "string: " + arrout1[0].AttrAny2); break; - case (2016): - oletest.testout_methodFloat( arrout1 ); - alert( "float: " + arrout1[0] ); break; - case (2017): - var in1= 3.14; - var in2= 1111; - var in3= -2222; - oletest.testout_methodMulParams4( in1, arrout1, in2, arrout2, in3 ); - document.write("param1 [in] float: " + in1 + " param2 [out] float: " + arrout1[0] + - " param3 [in] long: " + in2 + " param4 [out] long: " + arrout2[0] + - " param5 [in] long: " + in3); - break; - - - // INOUT - Parameter ------------------------------------------------------------------------------- - // The in value has to be placed on index 0 of the passed in array - case (500): - arrout1[0]= 100; - oletest.testinout_methodByte( arrout1 ); - alert("byte: " + arrout1[0] ); break; - case (501): - arrout1[0]= 3.14; - oletest.testinout_methodDouble( arrout1 ); - alert( "double: " + arrout1[0] ); break; - case (502): - arrout1[0]= false; - oletest.testinout_methodBool( arrout1 ); - alert( "boolean: " + arrout1[0] ); break; - case (503): - arrout1[0]= 200; - oletest.testinout_methodShort( arrout1 ); - alert( "short: " + arrout1[0] ); break; - case (504): - arrout1[0]= 300; - oletest.testinout_methodUShort( arrout1 ); - alert( "unsigned short: " + arrout1[0] ); break; - case (505): - arrout1[0]= 400; - oletest.testinout_methodLong( arrout1 ); - alert( "long: " + arrout1[0] ); break; - case (506): - arrout1[0]= 500; - oletest.testinout_methodULong( arrout1 ); - alert( "unsigned long: " + arrout1[0] ); break; - case (507): - arrout1[0]= "A"; - oletest.testinout_methodChar( arrout1 ); - alert( "char: " + arrout1[0] ); break; - case (508): - arrout1[0]= "I am a string"; - oletest.testinout_methodString( arrout1 ); - alert( "string: " + arrout1[0] ); break; - case (509): - arrout1[0]= arr; - oletest.testinout_methodAny( arrout1 ); // the method simply returns the argument - sfarray= new VBArray( arrout1[0]); - arr= sfarray.toArray(); - alert( "any: " + arr.toString() ); break; - case (510): - arrout1[0]= arr; - oletest.testinout_methodSequence( arrout1 ); - var sfarray= new VBArray( arrout1[0]); - arr= sfarray.toArray(); - document.writeln("use the browser's back arrow to go to the previous page <p>"); - document.writeln( arr.toString()); - break; - case (511): - arrout1[0]= arrSeq; - oletest.testinout_methodSequence2( arrout1 ); - var sfarray= new VBArray( arrout1[0]); - arr= sfarray.toArray(); - var i; - for( i=0; i < arr.length; i++) - { - var sfarray= new VBArray( arr[i]); - var arr2= new Array(); - arr2= sfarray.toArray(); - document.writeln( arr2.toString() + "<br>" ); - } - break; - case 512: - var ob= new Object(); - ob.value= "this is a string"; - - arrout1[0]= ob; - alert (arrout1[0].value); - oletest.testinout_methodXInterface( arrout1); - alert (arrout1[0].value); - var outValue= arrout1[0]; - for ( key in outValue) - { - document.write( outValue[key] ); - } - document.write("Out value: " + outValue ); - document.write("Out 1 value: " + arrout1[1]); - break; - -// var ob= new Object(); -// ob.value= "this is a string"; -// inoutValue.Set( "object", ob); -// oletest.testinout_methodXInterface( inoutValue); -// document.write("Out value: " + inoutValue.Get().value ); -// break; - - case (513): - arrout1[0]= 3.14; - oletest.testinout_methodFloat( arrout1 ); - alert( "float: " + arrout1[0] ); break; + // Array in-param @@ -1114,44 +1110,8 @@ end sub <h2> JScript </h2> <p> -Out Parameter <br> -<button onclick='callOleTest( 2000)'>byte </Button> -<button onclick='callOleTest( 2016)'>float</Button> -<button onclick='callOleTest( 2001)'>double</Button> -<button onclick='callOleTest( 2002)'>boolean</Button> -<button onclick='callOleTest( 2003)'>short</Button> -<button onclick='callOleTest( 2004)'>unsigned short</Button> -<button onclick='callOleTest( 2005)'>long</Button> -<button onclick='callOleTest( 2006)'>unsigned long</Button> -<button onclick='callOleTest( 2007)'>char</Button> -<button onclick='callOleTest( 2008)'>string</Button> -<button onclick='callOleTest( 2009)'>any</Button> -<button onclick='callOleTest( 2010)'>sequence<long> </Button> -<button onclick='callOleTest( 2011)'>sequence<sequence<long> > </Button> -<button onclick='callOleTest( 2012)'>2 out </Button> -<button onclick='callOleTest( 2013)'>3 out </Button> -<button onclick='callOleTest( 2014)'>1 in & 1 out </Button> -<button onclick='callOleTest( 2015)'>XInterface </Button> -<button onclick='callOleTest( 2017)'>mixed out and in </Button> - <p> -In Out Parameter <br> -<button onclick='callOleTest( 500)'>byte </Button> -<button onclick='callOleTest( 513)'>float</Button> -<button onclick='callOleTest( 501)'>double</Button> -<button onclick='callOleTest( 502)'>boolean</Button> -<button onclick='callOleTest( 503)'>short</Button> -<button onclick='callOleTest( 504)'>unsigned short</Button> -<button onclick='callOleTest( 505)'>long</Button> -<button onclick='callOleTest( 506)'>unsigned long</Button> -<button onclick='callOleTest( 507)'>char</Button> -<button onclick='callOleTest( 508)'>string</Button> -<button onclick='callOleTest( 509)'>any</Button> -<button onclick='callOleTest( 510)'>sequence<long> </Button> -<button onclick='callOleTest( 511)'>sequence<sequence<long> > </Button> -<button onclick='callOleTest( 512)'>XInterface </Button> -<p> Tests Array/Sequence conversion with Attributes. All params are of type Sequence and the element type of the Sequence is written on the buttons. <br> |