Delphi（i）のScriptControlの高度なアプリケーション

Windowsシステムは、ScriptControlと呼ばれるOCXコンポーネントを提供します。これは、スクリプトストーリーテリングの素晴らしい世界を実現するために使用できます。

1. ScriptControlコンポーネントサービスを作成します

まず、このコンポーネントがどのような方法と特性を持っているかを見てみましょう。図001、002に示すように。 図001 図002

次に、Delphiを使用してコンポーネントサービスを作成します。 図001から、このコンポーネントのプロビッドが「msscriptcontrol.scriptcontrol」であることがわかります。 .1 " 。したがって、次のようなコンポーネントを作成できます：var sc：olevariant; begin sc：= createoleobject（ 'msscriptcontrol.scriptcontrol.1'）; vbscript、javascript（jscriptとして省略することもできます）// <script言語= 'jscript'>に等価HTML ... </scipt> sc.language：= 'javascript'; end;

2。eval（）を使用して、最も単純な数学式の計算を実装します

eval（）は、このコンポーネントで最も一般的に使用される方法であり、数学的式を計算するために人々がよく使用する方法でもあります。 デモ関数計算：integer：olevariant：= '100+5* 3 ' ; createoleobject（msscriptcontrol.1 '）：=' javascript（sc.eval）; * 3 ' ）;

3.漢字暗号化を実装します

JavaScript、Escape、Unescapeには、一般にHTMLコードのスクリプトの暗号化として使用されます。 図003暗号化：単語：= 'これは、脱出で暗号化された漢字情報の一部です！ '; //結果：％u8fd9％u 662f ％U4E00％U6BB5％U7528ESCAPE％u 52a 0％U5BC6％U7684％U 6c 49％U5B57％U4Fe1％U 606f ％uff01 result：= sc.eval（ 'escase（' '+words+' ''） '）;

4.JavaScriptの正規式を使用して、IPアドレスの仕様を確認する

ここでは、ScriptControlのAddCodeメソッドを使用して、カスタムメソッドを追加する必要があります。 IPアドレスのルールはからです0.0.0 .0-255.255.255.255.255。 以下は、IPアドレスを確認するためのコードです：var idict、script：string; begin // ipレギュラーidict：= '^（[01]？[0-9] [0-9] | [01]？[0 -9]？[0-9] | 2 [0-4] [0-9] | 25 [0-5]）/.'+ '（[01]？[0-9] [0-9] | [01]？[0-9]？[0-9] | 2 [0-4] [0-9] | 25 [0-5]）/.'+ '（[01]？[0-9] [0 -9] | [01]？[0-9]？[0-9] | 2 [0-4] [0-9] | 25 [0-5]）/.'+ '（[01] ？[0-9] [0-9] | [01]？[0-9]？[0-9] | 2 [0-4] [0-9] | 25 [0-5]）$ '; // javascriptカスタム関数スクリプト：= '関数ipreg（str）{'+ 'var re = new regexp（' '+ ipreg+' ''）; '+' return re.test（str）;} '; （script） ; end; ------------------------------ Joecom（Juwuyi ）2005-03-19