Innerfuse Pascal Script
Unit: ifs_var.pas
PVariableManager
PVariableManager used to store variables in the script engine.
type
PVariableManager = ^TVariableManager;
TVariableManager = packed record
Names: TifStringList;
Ptr: TifList;
end;
Helper functions:
function VM_Create(InheritFrom: PVariableManager): PVariableManager;
procedure VM_Destroy(p: PVariableManager);
function VM_Add(P: PVariableManager; D: PIfVariant; const Name: string): PIfVariant;
procedure VM_Delete(p: PVariableManager; Idx: LongInt);
function VM_Get(p: PVariableManager; Idx: LongInt): PIfVariant;
function VM_GetName(p: PVariableManager; Idx: LongInt): String;
procedure VM_SetName(p: PVariableManager; Idx: LongInt; S: string);
procedure VM_Set(p: PVariableManager; Idx: LongInt; N: PIfVariant);
function VM_Count(p: PVariableManager): LongInt;
function VM_Find(p: PVariableManager; const Name: string): LongInt;
procedure VM_Clear(p: PVariableManager);
Copyright (c) 2001 by Carlo Kok
last update: 24-11-01