Erweiterte Anwendung von SkriptControl in Delphi (i)

Unser Windows -System bietet eine OCX -Komponente namens ScriptControl, mit der wir die wundervolle Welt des Skript -Geschichtenerzählens erkennen können.

1. Erstellen Sie Skriptcontrol -Komponentendienst

Schauen wir uns zunächst an, welche Methoden und Eigenschaften diese Komponente haben. Wie in Abbildung 001, 002 gezeigt. Abbildung 001 Abbildung 002

Als nächstes verwenden wir Delphi, um Komponentendienste zu erstellen. Aus Abbildung 001 ist ersichtlich, dass der Progid dieser Komponente "MSScriptControl.ScriptControl" ist. .1 ” . So können wir eine Komponente wie folgt erstellen: var sc: olevariant; begin sc: = createLoBject ('MSScriptControl.ScriptControl.1'); // Verwenden Sie die Spracheigenschaft, um die von der Komponente verwendete Sprache festzulegen // Die Sprache kann sein: VBScript, JavaScript (kann auch als JScript abgekürzt werden) // Äquivalent zu <script langual = 'jscript'> In Html ... </scipt> sc.sprach: = 'JavaScript'; Ende;

2. Verwenden Sie Eval (), um die einfachste Berechnung der mathematischen Expression zu implementieren

Eval () ist die am häufigsten verwendete Methode in dieser Komponente und ist auch eine Methode, die häufig von Personen zur Berechnung mathematischer Ausdrücke verwendet wird. Demo -Funktion (const Ausdruck: String): Ganzzahl; 3 ' ; sc: = createLeObject ('MSScriptControl.ScriptControl.1'); * 3 ' );

3.. Implementieren Sie die chinesische Charakterverschlüsselung

Es gibt zwei Funktionen in JavaScript, Escape und Undecape, die im Allgemeinen als Verschlüsselung für das Skript im HTML -Code verwendet werden. Abbildung 003 Verschlüsselung: Wörter: = 'Dies ist ein mit der Flucht verschlüsselter chinesischer Charakterinformationen! '; // Ergebnis:%U8FD9%U. 662f %U4E00%U6BB5%U7528Scape%U 52a 0%U5BC6%U7684%U 6c 49%U5B57%U4FE1%U 606f %UFF01 Ergebnis: = sc.eval ('Escape (' '+Words+' ')');

4. Verwenden Sie reguläre Ausdrücke von JavaScript, um die Spezifikation von IP -Adressen zu überprüfen

Hier müssen wir die AddCode -Methode von scriptControl verwenden, um benutzerdefinierte Methoden hinzuzufügen. Die Regeln für IP -Adressen stammen aus 0.0.0 .0-255.255.255.255.255. Im Folgenden finden Sie den Code, um die IP-Adresse zu überprüfen: var idict, Skript: String; begin // IP reguläre Idict: = '^([01]? [0-9] [0-9] | [01]? [0 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 Custom Function Skript: = 'Funktion iPreg (str) {'+ 'var re = new Regexp (' '+ ipreg+' ');'+ 'return re.Test (str);}'; (Skript); // Funktion ausführen, wenn sc.eval ('ipreg (' '+edit1.Text+' ')') dann ShowMessage ('IP -Adressformat!') Anlässige ShowMessage ('illegales IP -Adressformat！') ; Ende; ------------------------ Joecom （Juwuyi） 2005-03-19