Registryzugriff über API (iScript)
Zurück | Ebene zurück
Es gibt in der Eulanda die Möglichkeit, die Registry über die
vorgegebenen APIs zu verändern.
Ein Registry-Objekt wird über die Methode
CreateRegistry des Client-Objektes
erzeugt.
Methoden
- function OpenKey(const Key:
string): LongBool;
- function DeleteKey(const Key: string): LongBool;
- function CreateKey(const Key: string): LongBool;
- function RenameKey(const OldKey,NewKey: string): LongBool;
- function HasSubKeys: LongBool;
- function KeyExists(const Key: string): LongBool;
- function GetKeyNames: string;
- function GetTimestamp(const Key: string): string;
- function DeleteValue(const Name: string): LongBool;
- function RenameValue(const OldName,NewName: string): LongBool;
- function ValueExists(const Name: string): LongBool;
- function GetValueNames: string;
- function GetDataType(const Name: string): LongInt;
- function GetDataSize(const Name: string): LongInt;
- function Clone(FLags: Cardinal): Variant;
Die wichtigsten Methoden:
-
function Read(const Name:
string): variant;
-
function ReadDef(const Name: string; Def: Variant): variant;
-
function Write(const Name: string; Value: Variant): LongBool;
-
function OpenCreateKey(const
Key: string): LongBool;
- procedure LoadFromFile(Filename: string);
- procedure SaveToFile(Filename: string);
Eigenschaften
- property Rootname: string read FRootname write SetRootname;
A. Beispiel zur Erstellung eines Schlüssels in der Eulanda Registry
Das Beispiel erstellt einen Schlüssel (Seminar) im Verzeichnis: USER\
\ VENDOR \ cnsoft \ Seminar. In diesen Schlüssel wird dann
auch gleich noch eine Zeichenfolge erstellt. Zum Schluss wird dann die
Zeichenfolge noch durch eine Message-Box angezeigt.
Option Explicit
dim Reg
Set Reg = Client.CreateRegistry("ROOT","",0)
Set Reg = Client.CreateRegistry("CURRENT_USER","",0)
Reg.OpenCreateKey("VENDOR\cnsoft\Seminar")
Reg.Write "Homepagetitel", "Willkommen zum EULANDA Seminar!"
MsgBox Reg.Read("Homepagetitel")
Set Reg = Nothing