Lape

Magic Functions

ASSERT

procedure ASSERT

BREAK

procedure BREAK

CONTINUE

procedure CONTINUE

COPY

procedure COPY

DEC

procedure DEC

DEFAULT

procedure DEFAULT

DELETE

procedure DELETE

DISPOSE

procedure DISPOSE

EXIT

procedure EXIT

GETARRAYLENGTH

procedure GETARRAYLENGTH

HALT

procedure HALT

HIGH

procedure HIGH

INC

procedure INC

INSERT

procedure INSERT

ISSCRIPTMETHOD

procedure ISSCRIPTMETHOD

LAPIFY

procedure LAPIFY

LENGTH

procedure LENGTH

LOW

procedure LOW

NATIFY

procedure NATIFY

NATIVE

procedure NATIVE

NEW

procedure NEW

ORD

procedure ORD

PRED

procedure PRED

SETARRAYLENGTH

procedure SETARRAYLENGTH

SETLENGTH

procedure SETLENGTH

SIZEOF

procedure SIZEOF

SUCC

procedure SUCC

SWAP

procedure SWAP

WRITELN

procedure WRITELN

WRITE

procedure WRITE

Standard Library Functions

AdjustLineBreaks

function AdjustLineBreaks(s: string; Style: TTextLineBreakStyle): string

AllocMem

function AllocMem(i: SizeInt): Pointer

AnsiCompareStr

function AnsiCompareStr(s1, s2: string): Int32

AnsiCompareText

function AnsiCompareText(s1, s2: string): Int32

AnsiDequotedStr

function AnsiDequotedStr(s: string; AQuote: Char): string

AnsiLowerCase

function AnsiLowerCase(s: string): string

AnsiQuotedStr

function AnsiQuotedStr(s: string; Quote: Char): string

AnsiSameStr

function AnsiSameStr(s1, s2: string): EvalBool

AnsiSameText

function AnsiSameText(s1, s2: string): EvalBool

AnsiUpperCase

function AnsiUpperCase(s: string): string

ArcCos

function ArcCos(x: Extended): Extended

ArcCosH

function ArcCosH(x: Extended): Extended

ArcSin

function ArcSin(x: Extended): Extended

ArcSinH

function ArcSinH(x: Extended): Extended

ArcTan2

function ArcTan2(x, y: Extended): Extended

ArcTan

function ArcTan(x: Extended): Extended

ArcTanH

function ArcTanH(x: Extended): Extended

Assigned

function Assigned(constref p): EvalBool

Ceil

function Ceil(x: Extended): Int64

Chr

function Chr(IntValue: UInt16): WideChar
function Chr(IntValue: UInt8): AnsiChar

CompareMem

function CompareMem(constref p1, p2; Length: SizeInt): EvalBool

CompareStr

function CompareStr(s1, s2: string): Int32

CompareText

function CompareText(s1, s2: string): Int32

Cosecant

function Cosecant(x: Extended): Extended

Cos

function Cos(x: Extended): Extended

CosH

function CosH(x: Extended): Extended

Cotan

function Cotan(x: Extended): Extended

CurrToStr

function CurrToStr(Value: Currency): string

Date

function Date: TDateTime

DateTimeToStr

function DateTimeToStr(const DateTime: TDateTime): string

DateToStr

function DateToStr(const DateTime: TDateTime): string

DebugLn

procedure DebugLn(s: string)

DecodeDateFully

function DecodeDateFully(DateTime: TDateTime; var Year, Month, Day, DOW: UInt16): Boolean

DecodeDate

procedure DecodeDate(DateTime: TDateTime; var Year, Month, Day: UInt16)

DecodeTime

procedure DecodeTime(DateTime: TDateTime; var Hour, Min, Sec, MSec: UInt16)

EncodeDate

function EncodeDate(Year, Month, Day: UInt16): TDateTime

EncodeTime

function EncodeTime(Hour, Min, Sec, MSec: UInt16): TDateTime

ExceptionTostring

function ExceptionTostring(Ex: TIFException; Param: string): string

Exp

function Exp(x: Extended): Extended

FillMem

procedure FillMem(var p; s: SizeInt; b: UInt8= 0)

Floor

function Floor(x: Extended): Int64

FormatCurr

function FormatCurr(Format: string; Value: Currency): string

FormatDateTime

function FormatDateTime(Format: string; DateTime: TDateTime): string

FormatFloat

function FormatFloat(Format: string; Value: Extended): string

Frac

function Frac(x: Extended): Extended

FreeLibrary

function FreeLibrary(Lib: TLibHandle): EvalBool

FreeMem

procedure FreeMem(p: Pointer)

GetCurrThreadID

function GetCurrThreadID: PtrUInt

GetGlobal

function GetGlobal(Name: string): Variant

GetGlobalName

function GetGlobalName(Ptr: ConstPointer): string

GetGlobalPtr

function GetGlobalPtr(Name: string): ConstPointer

GetMem

function GetMem(i: SizeInt): Pointer

GetProcAddress

function GetProcAddress(Lib: TlibHandle; const ProcName: string): ConstPointer

GetSystemTime

function GetSystemTime: LongWord

GetTickCount

function GetTickCount: UInt64

Hypot

function Hypot(x,y: Extended): Extended

Int64ToStr

function Int64ToStr(i: Int64): string

Int

function Int(x: Extended): Extended

IsDelimiter

Function IsDelimiter(Delimiters, s: string; Index: SizeInt): EvalBool

LastDelimiter

function LastDelimiter(Delimiters, s: string): SizeInt

Ln

function Ln(x: Extended): Extended

LoadLibrary

function LoadLibrary(const Name: string): TLibHandle

LowerCase

function LowerCase(s: string): string

Move

procedure Move(constref Src; var Dst; s: SizeInt)

Now

function Now: TDateTime

Pos

function Pos(Substr: string; Source: string): SizeInt

Power

function Power(Base, Exponent: Extended): Extended

QuotedStr

function QuotedStr(s: string): string

Randomize

procedure Randomize

ReallocMem

procedure ReallocMem(var p: Pointer; s: SizeInt)

ReplaceDate

procedure ReplaceDate(var DateTime: TDateTime; NewDate: TDateTime)

ReplaceTime

procedure ReplaceTime(var DateTime: TDateTime; NewTime: TDateTime)

Replicate

function Replicate(c: Char; l: SizeInt): string

SameText

function SameText(s1, s2: string): EvalBool

Secant

function Secant(x: Extended): Extended

Sin

function Sin(x: Extended): Extended

SinH

function SinH(x: Extended): Extended

Sqrt

function Sqrt(x: Extended): Extended

StrGet2

function StrGet2(s: string; Index: SizeInt): Char

StrGet

function StrGet(var s: string; Index: SizeInt): Char

StringOfChar

function StringOfChar(c: Char; l: SizeInt): string

StringReplace

function StringReplace(S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string

StrSet

procedure StrSet(c: Char; Index: SizeInt; var s: string)

StrToCurrDef

function StrToCurrDef(s: string; Def: Currency): Currency

StrToCurr

function StrToCurr(s: string): Currency

StrToDateDef

function StrToDateDef(s: string; Default: TDateTime): TDateTime

StrToDate

function StrToDate(s: string): TDateTime

StrToDateTimeDef

function StrToDateTimeDef(s: string; Default: TDateTime): TDateTime

StrToDateTime

function StrToDateTime(s: string): TDateTime

StrToInt64Def

function StrToInt64Def(s: string; Def: Int64): Int64

StrToInt64

function StrToInt64(s: string): Int64

StrToTimeDef

function StrToTimeDef(s: string; Default: TDateTime): TDateTime

StrToTime

function StrToTime(s: string): TDateTime

StrToUInt64Def

function StrToUInt64Def(s: string; Def: UInt64): UInt64

StrToUInt64

function StrToUInt64(s: string): UInt64

Sync

procedure Sync(Proc: TSyncMethod)

Tan

function Tan(x: Extended): Extended

TanH

function TanH(x: Extended): Extended

Time

function Time: TDateTime

TimeToStr

function TimeToStr(const DateTime: TDateTime): string

ToString

function ToString(constref p: Pointer): string

Trim

function Trim(s: string): string

TrimLeft

function TrimLeft(s: string): string

TrimRight

function TrimRight(s: string): string

Trunc

function Trunc(x: Extended): Int64

UInt64ToStr

function UInt64ToStr(i: UInt64): string

UpperCase

function UpperCase(s: string): string

VarArrayAsPSafeArray

function VarArrayAsPSafeArray(const A: Variant): Pointer

VarArrayCreate

function VarArrayCreate(Bounds: array of SizeInt; aVarType: TVarType): Variant

VarArrayDimCount

function VarArrayDimCount(const A: Variant): SizeInt

VarArrayGet

function VarArrayGet(const A: Variant; Indices: array of Int32): Variant

VarArrayGet

function VarArrayGet(var s: Variant; Index: Int32): Variant

VarArrayHighBound

function VarArrayHighBound(const A: Variant; Dim: SizeInt): SizeInt

VarArrayLock

function VarArrayLock(const A: Variant): Pointer

VarArrayLowBound

function VarArrayLowBound(const A: Variant; Dim: SizeInt): SizeInt

VarArrayOf

function VarArrayOf(Values: array of Variant): Variant

VarArrayRedim

procedure VarArrayRedim(var A: Variant; HighBound: SizeInt)

VarArrayRef

function VarArrayRef(const A: Variant): Variant

VarArraySet

procedure VarArraySet(c: Variant; Index: Int32; var s: Variant)

VarArraySet

procedure VarArraySet(var A: Variant; const Value: Variant; Indices: array of Int32)

VarArrayUnlock

procedure VarArrayUnlock(const A: Variant)

VarAsError

function VarAsError(AResult: HRESULT): Variant

VarAsType

function VarAsType(const V: Variant; aVarType: TVarType): Variant

VarCompareValue

function VarCompareValue(const A, B: Variant): TVariantRelationship

VarCopyNoInd

procedure VarCopyNoInd(var Dest: Variant; const Source: Variant)

VarEnsureRange

function VarEnsureRange(const AValue, AMin, AMax: Variant): Variant

VarFromDateTime

function VarFromDateTime(DateTime: TDateTime): Variant

VariantInvoke

function VariantInvoke(Name: string; Params: array of Variant=[]): Variant

VarInRange

function VarInRange(const AValue, AMin, AMax: Variant): EvalBool

VarIsArray

function VarIsArray(const A: Variant; AResolveByRef: EvalBool= True): EvalBool

VarIsByRef

function VarIsByRef(const V: Variant): EvalBool

VarIsClear

function VarIsClear(const V: Variant): EvalBool

VarIsCustom

function VarIsCustom(const V: Variant): EvalBool

VarIsEmpty

function VarIsEmpty(const V: Variant): EvalBool

VarIsError

function VarIsError(const V: Variant; out AResult: HRESULT): EvalBool

VarIsFloat

function VarIsFloat(const V: Variant): EvalBool

VarIsNull

function VarIsNull(const V: Variant): EvalBool

VarIsNumeric

function VarIsNumeric(const V: Variant): EvalBool

VarIsOrdinal

function VarIsOrdinal(const V: Variant): EvalBool

VarIsStr

function VarIsStr(const V: Variant): EvalBool

VarSameValue

function VarSameValue(const A, B: Variant): EvalBool

VarToDateTime

function VarToDateTime(const V: Variant): TDateTime

VarToStrDef

function VarToStrDef(const V: Variant; ADefault: string): string

VarToStr

function VarToStr(const V: Variant): string

VarToUnicodeStrDef

function VarToUnicodeStrDef(const V: Variant; ADefault: UnicodeString): UnicodeString

VarToUnicodeStr

function VarToUnicodeStr(const V: Variant): UnicodeString

VarToWideStrDef

function VarToWideStrDef(const V: Variant; ADefault: WideString): WideString

VarToWideStr

function VarToWideStr(const V: Variant): WideString

VarType

function VarType(const V: Variant): TVarType

VarTypeIsValidArrayType

function VarTypeIsValidArrayType(aVarType: TVarType): EvalBool

VarTypeIsValidElementType

function VarTypeIsValidElementType(aVarType: TVarType): EvalBool

WrapText

function WrapText(Line, BreakStr: string; BreakChars: set of AnsiChar; MaxCol: Int32): string

WStrGet

function WStrGet(var s: WideString; Index: SizeInt): WideChar