Up

 

  

 
Interface
Property Page - Items:

On the Items tab the items are defined

Property Page - Appearence:

The font, colors and margins are defined on the appearence tab.

Frontpage ActiveX footprint:

 <object classid="clsid:8D7A9359-C186-4731-AB41-75E67D5A168C" id="SimpleStatX" width="437" height="123">
<param name="_Version" value="131072">
<param name="_ExtentX" value="11562">
<param name="_ExtentY" value="3254">
<param name="_StockProps" value="0">
<param name="ConfigXml" value="&lt;SPB name=&quot;SimpleStatConfig&quot;&gt;
&lt;NTP_BOOL name=&quot;FontItalic&quot; value=&quot;false&quot;/&gt;
&lt;NTP_BOOL name=&quot;ShowInsideBorder&quot; value=&quot;false&quot;/&gt;
&lt;NTP_BOOL name=&quot;ShowOutsideBorder&quot; value=&quot;false&quot;/&gt;
&lt;NTP_BOOL name=&quot;ShowResetButton&quot; value=&quot;false&quot;/&gt;
&lt;NTP_INT name=&quot;BackgroundColour&quot; value=&quot;16777215&quot;/&gt;
&lt;NTP_INT name=&quot;Column1Percent&quot; value=&quot;70&quot;/&gt;
&lt;NTP_INT name=&quot;FontHeight&quot; value=&quot;-19&quot;/&gt;
&lt;NTP_INT name=&quot;FontWeight&quot; value=&quot;700&quot;/&gt;
&lt;NTP_INT name=&quot;InnerMargin&quot; value=&quot;8&quot;/&gt;
&lt;NTP_INT name=&quot;LineHeight&quot; value=&quot;32&quot;/&gt;
&lt;NTP_INT name=&quot;OuterMargin&quot; value=&quot;14&quot;/&gt;
&lt;NTP_INT name=&quot;TextColour&quot; value=&quot;0&quot;/&gt;
&lt;NTP_TXT name=&quot;FontName&quot; value=&quot;Tahoma&quot;/&gt;
&lt;/SPB&gt;
">
<param name="ItemsXml" value="&lt;SPB name=&quot;SimpleStatItems&quot;&gt;
&lt;SPB name=&quot;item000&quot;&gt;
&lt;NTP_INT name=&quot;InitialValue&quot; value=&quot;0&quot;/&gt;
&lt;NTP_TXT name=&quot;Name&quot; value=&quot;OK&quot;/&gt;
&lt;/SPB&gt;
&lt;SPB name=&quot;item001&quot;&gt;
&lt;NTP_INT name=&quot;InitialValue&quot; value=&quot;0&quot;/&gt;
&lt;NTP_TXT name=&quot;Name&quot; value=&quot;Error&quot;/&gt;
&lt;/SPB&gt;
&lt;SPB name=&quot;item002&quot;&gt;
&lt;NTP_INT name=&quot;InitialValue&quot; value=&quot;0&quot;/&gt;
&lt;NTP_TXT name=&quot;Name&quot; value=&quot;Total&quot;/&gt;
&lt;/SPB&gt;
&lt;NTP_INT name=&quot;Items&quot; value=&quot;3&quot;/&gt;
&lt;/SPB&gt;
">
</object>

Methods:

AboutBox;
Configure;
Dec;Item=VT_BSTR;N=VT_I4
Get;Item=VT_BSTR
GetConfigXml;
GetItemsXml;
Inc;Item=VT_BSTR;N=VT_I4
Reset;
Set;Item=VT_BSTR;Value=VT_I4
SetConfigXml;Value=VT_BSTR
SetItemsXml;Value=VT_BSTR
 

Events:

ConfigChange;
ItemsChange;
 

Script Example:

# vb-script on a html-page decoding the strin
#    Statistics;Fail=12;Pass=3;OK=8;

sub ProcessStatistics(Command)
   SendDebugMessage(Command)
   str0 = Mid(Command,11)
   pos = InStr(str0,";")
   Do While pos ' Inner loop.
     str1 = Mid(str0,1,pos-1) 
     pos1 = InStr(str1,"=")
     if (pos1) then
       name = Mid(str1,1,pos1-1)
       value = Mid(str1,pos1+1)
       SendDebugMessage(name + "-" + value)
       SimpleStatX.Set name,value
    end if
    str0 = Mid(str0,pos+1)
    pos = InStr(str0,";")
   Loop
end sub

 

 

Scorpion Vision Version XII : Build 646 - Date: 20170225
Scorpion Vision Software® is a registered trademark of Tordivel AS.
Copyright © 2000 - 2017 Tordivel AS.