FastScript Developer Manual.docx

FastScript Developers Manual1. Types 1. TNumGlyphs : Int; 2. Byte : Int; 3. Word : Int; 4. Integer : Int; 5. Longint : Int; 6. Cardinal : Int; 7. TColor : Int; 8. Boolean : Bool; 9. Real : Float; 10. Single : Float; 11. Double : Float; 12. Extended : Float; 13. Currency : Float; 14. TDate : Float; 15. TTime : Float; 16. TDateTime : Float; 17. Char : Char; 18. String : String; 19. Variant : Variant; 20. Pointer : Variant; 21. Array : Array; 22. Constructor : Constructor; 23. WideString : Variant; 24. TAutoSizeType : Int; 25. TGradientType : Int; 26. TVAlignment : Int; 27. TFormBorderStyle : Int; 28. TBorderStyle : Int; 29. WordBool : Bool; 30. OleVariant : Variant;2. Consts (1). varEmpty: Integer = 0; (2). varNull: Integer = 1; (3). varSmallint: Integer = 2; (4). varInteger: Integer = 3; (5). varSingle: Integer = 4; (6). varDouble: Integer = 5; (7). varCurrency: Integer = 6; (8). varDate: Integer = 7; (9). varOleStr: Integer = 8; (10). varDispatch: Integer = 9; (11). varError: Integer = 10; (12). varBoolean: Integer = 11; (13). varVariant: Integer = 12; (14). varUnknown: Integer = 13; (15). varShortInt: Integer = 16; (16). varByte: Integer = 17; (17). varWord: Integer = 18; (18). varLongWord: Integer = 19; (19). varInt64: Integer = 20; (20). varStrArg: Integer = 72; (21). varString: Integer = 256; (22). varAny: Integer = 257; (23). varTypeMask: Integer = 4095; (24). varArray: Integer = 8192; (25). varByRef: Integer = 16384; (26). ANSI_CHARSET: Integer = 0; (27). DEFAULT_CHARSET: Integer = 1; (28). SYMBOL_CHARSET: Integer = 2; (29). SHIFTJIS_CHARSET: Integer = 80; (30). HANGEUL_CHARSET: Integer = 129; (31). GB2312_CHARSET: Integer = 134; (32). CHINESEBIG5_CHARSET: Integer = 136; (33). OEM_CHARSET: Integer = 255; (34). JOHAB_CHARSET: Integer = 130; (35). HEBREW_CHARSET: Integer = 177; (36). ARABIC_CHARSET: Integer = 178; (37). GREEK_CHARSET: Integer = 161; (38). TURKISH_CHARSET: Integer = 162; (39). VIETNAMESE_CHARSET: Integer = 163; (40). THAI_CHARSET: Integer = 222; (41). EASTEUROPE_CHARSET: Integer = 238; (42). RUSSIAN_CHARSET: Integer = 204; (43). MAC_CHARSET: Integer = 77; (44). BALTIC_CHARSET: Integer = 186; (45). True: Boolean = -1; (46). False: Boolean = 0; (47). nil: Variant = 0; (48). Null: Variant = ; (49). fmCreate: Integer = 65535; (50). fmOpenRead: Integer = 0; (51). fmOpenWrite: Integer = 1; (52). fmOpenReadWrite: Integer = 2; (53). fmShareExclusive: Integer = 16; (54). fmShareDenyWrite: Integer = 32; (55). fmShareDenyNone: Integer = 64; (56). soFromBeginning: Integer = 0; (57). soFromCurrent: Integer = 1; (58). soFromEnd: Integer = 2; (59). mrNone: Integer = 0; (60). mrOk: Integer = 1; (61). mrCancel: Integer = 2; (62). mrAbort: Integer = 3; (63). mrRetry: Integer = 4; (64). mrIgnore: Integer = 5; (65). mrYes: Integer = 6; (66). mrNo: Integer = 7; (67). mrAll: Integer = 8; (68). mrNoToAll: Integer = 9; (69). mrYesToAll: Integer = 10; (70). crDefault: Integer = 0; (71). crNone: Integer = -1; (72). crArrow: Integer = -2; (73). crCross: Integer = -3; (74). crIBeam: Integer = -4; (75). crSize: Integer = -22; (76). crSizeNESW: Integer = -6; (77). crSizeNS: Integer = -7; (78). crSizeNWSE: Integer = -8; (79). crSizeWE: Integer = -9; (80). crUpArrow: Integer = -10; (81). crHourGlass: Integer = -11; (82). crDrag: Integer = -12; (83). crNoDrop: Integer = -13; (84). crHSplit: Integer = -14; (85). crVSplit: Integer = -15; (86). crMultiDrag: Integer = -16; (87). crSQLWait: Integer = -17; (88). crNo: Integer = -18; (89). crAppStart: Integer = -19; (90). crHelp: Integer = -20; (91). crHandPoint: Integer = -21; (92). crSizeAll: Integer = -22; (93). bsNone: Integer = 0; (94). bsSingle: Integer = 1; (95). bsSizeable: Integer = 2; (96). bsDialog: Integer = 3; (97). bsToolWindow: Integer = 4; (98). bsSizeToolWin: Integer = 5; (99). VK_RBUTTON: Integer = 2; (100). VK_CANCEL: Integer = 3; (101). VK_MBUTTON: Integer = 4; (102). VK_BACK: Integer = 8; (103). VK_TAB: Integer = 9; (104). VK_RETURN: Integer = 13; (105). VK_SHIFT: Integer = 16; (106). VK_CONTROL: Integer = 17; (107). VK_MENU: Integer = 18; (108). VK_PAUSE: Integer = 19; (109). VK_CAPITAL: Integer = 20; (110). VK_ESCAPE: Integer = 27; (111). VK_SPACE: Integer = 32; (112). VK_PRIOR: Integer = 33; (113). VK_NEXT: Integer = 34; (114). VK_END: Integer = 35; (115). VK_HOME: Integer = 36; (116). VK_LEFT: Integer = 37; (117). VK_UP: Integer = 38; (118). VK_RIGHT: Integer = 39; (119). VK_DOWN: Integer = 40; (120). VK_INSERT: Integer = 45; (121). VK_DELETE: Integer = 46; (122). VK_HELP: Integer = 47; (123). VK_LWIN: Integer = 91; (124). VK_RWIN: Integer = 92; (125). VK_APPS: Integer = 93; (126). VK_NUMPAD0: Integer = 96; (127). VK_NUMPAD1: Integer = 97; (128). VK_NUMPAD2: Integer = 98; (129). VK_NUMPAD3: Integer = 99; (130). VK_NUMPAD4: Integer = 100; (131). VK_NUMPAD5: Integer = 101; (132). VK_NUMPAD6: Integer = 102; (133). VK_NUMPAD7: Integer = 103; (134). VK_NUMPAD8: Integer = 104; (135). VK_NUMPAD9: Integer = 105; (136). VK_MULTIPLY: Integer = 106; (137). VK_ADD: Integer = 107; (138). VK_SEPARATOR: Integer = 108; (139). VK_SUBTRACT: Integer = 109; (140). VK_DECIMAL: Integer = 110; (141). VK_DIVIDE: Integer = 111; (142). VK_F1: Integer = 112; (143). VK_F1: Integer = 112; (144). VK_F3: Integer = 114; (145). VK_F4: Integer = 115; (146). VK_F5: Integer = 116; (147). VK_F6: Integer = 117; (148). VK_F7: Integer = 118; (149). VK_F8: Integer = 119; (150). VK_F9: Integer = 120; (151). VK_F10: Integer = 121; (152). VK_F11: Integer = 122; (153). VK_F12: Integer = 123; (154). VK_NUMLOCK: Integer = 144; (155). VK_SCROLL: Integer = 145; (156). crDefault: Integer = 0; (157). crNone: Integer = -1; (158). crArrow: Integer = -2; (159). crCross: Integer = -3; (160). crIBeam: Integer = -4; (161). crSize: Integer = -22; (162). crSizeNESW: Integer = -6; (163). crSizeNS: Integer = -7; (164). crSizeNWSE: Integer = -8; (165). crSizeWE: Integer = -9; (166). crUpArrow: Integer = -10; (167). crHourGlass: Integer = -11; (168). crDrag: Integer = -12; (169). crNoDrop: Integer = -13; (170). crHSplit: Integer = -14; (171). crVSplit: Integer = -15; (172). crMultiDrag: Integer = -16; (173). crSQLWait: Integer = -17; (174). crNo: Integer = -18; (175). crAppStart: Integer = -19; (176). crHelp: Integer = -20; (177). crHandPoint: Integer = -21; (178). crSizeAll: Integer = -22; (179). asVertical: Integer = 0; (180). asHorizontal: Integer = 1; (181). asBoth: Integer = 2; (182). gtFullHorizontal: Integer = 0; (183). gtFullVertical: Integer = 1; (184). gtBottomLine: Integer = 2; (185). gtCenterLine: Integer = 3; (186). gtTopLine: Integer = 4; (187). tvaTop: Integer = 0; (188). tvaCenter: Integer = 1; (189). tvaBottom: Integer = 2; (190). dsFocus: Integer = 0; (191). dsSelected: Integer = 1; (192). dsNormal: Integer = 2; (193). dsTransparent: Integer = 3; (194). itImage: Integer = 0; (195). itMask: Integer = 1;3. Enums (1). TShapeType=(stRectangle,stSquare,stRoundRect,stRoundSquare,stEllipse,stCircle); (2). TBevelStyle=(bsLowered,bsRaised); (3). TBevelShape=(bsBox,bsFrame,bsTopLine,bsBottomLine,bsLeftLine,bsRightLine,bsSpacer); (4). TResizeStyle=(rsNone,rsLine,rsUpdate,rsPattern); (5). TButtonLayout=(blGlyphLeft,blGlyphRight,blGlyphTop,blGlyphBottom); (6). TButtonState=(bsUp,bsDisabled,bsDown,bsExclusive); (7). TButtonStyle=(bsAutoDetect,bsWin31,bsNew); (8). TBitBtnKind=(bkCustom,bkOK,bkCancel,bkHelp,bkYes,bkNo,bkClose,bkAbort,bkRetry,bkIgnore,bkAll); (9). TTabPosition=(tpTop,tpBottom,tpLeft,tpRight); (10). TTabStyle=(tsTabs,tsButtons,tsFlatButtons); (11). TStatusPanelStyle=(psText,psOwnerDraw); (12). TStatusPanelBevel=(pbNone,pbLowered,pbRaised); (13). TSortType=(stNone,stData,stText,stBoth); (14). TTrackBarOrientation=(trHorizontal,trVertical); (15). TTickMark=(tmBottomRight,tmTopLeft,tmBoth); (16). TTickStyle=(tsNone,tsAuto,tsManual); (17). TProgressBarOrientation=(pbHorizontal,pbVertical); (18). TIconArrangement=(iaTop,iaLeft); (19). TListArrangement=(arAlignBottom,arAlignLeft,arAlignRight,arAlignTop,arDefault,arSnapToGrid); (20). TViewStyle=(vsIcon,vsSmallIcon,vsList,vsReport); (21). TToolButtonStyle=(tbsButton,tbsCheck,tbsDropDown,tbsSeparator,tbsDivider); (22). TDateTimeKind=(dtkDate,dtkTime); (23). TDTDateMode=(dmComboBox,dmUpDown); (24). TDTDateFormat=(dfShort,dfLong); (25). TDTCalAlignment=(dtaLeft,dtaRight); (26). TCalDayOfWeek=(dowMonday,dowTuesday,dowWednesday,dowThursday,dowFriday,dowSaturday,dowSunday,dowLocaleDefault); (27). Tsp_BorderStyle=(bs_None,bs_Raised,bs_Lowered,bs_Gutter,bs_BlackRect,bs_BoldRect,bs_FocusRect); (28). Tsp_zpDirections=(zpdNone,zpdHorizontal,zpdVertical,zpdBoth); (29). Tsp_ShiftKeys=ssShift,ssAlt,ssCtrl; (30). TSP_WhatXAxis=(dsxBottom,dsxTop); (31). TSP_WhatYAxis=(dsyLeft,dsyRight); (32). TIP_Reason=(rsDataChanged,rsAttrChanged); (33). TSP_WhenDrawMarker=(dmBeforeSeries,dmAfterSeries); (34). TPointKind=(ptRectangle,ptEllipse,ptDiamond,ptCross,ptCustom,ptTriangle,ptDownTriangle); (35). Tsp_LMOrientation=(loVertical,loHorizontal); (36). Tsp_YOrigin=(yoBaseLine,yoXAxises); (37). Tsp_WhatValues=(wvXValues,wvYValues); (38). TFontStyles=fsBold,fsItalic,fsUnderline,fsStrikeout; (39). TFontPitch=(fpDefault,fpVariable,fpFixed); (40). TPenStyle=(psSolid,psDash,psDot,psDashDot,psDashDotDot,psClear,psInsideFrame); (41). TPenMode=(pmBlack,pmWhite,pmNop,pmNot,pmCopy,pmNotCopy,pmMergePenNot,pmMaskPenNot,pmMergeNotPen,pmMaskNotPen,pmMerge,pmNotMerge,pmMask,pmNotMask,pmXor,pmNotXor); (42). TBrushStyle=(bsSolid,bsClear,bsHorizontal,bsVertical,bsFDiagonal,bsBDiagonal,bsCross,bsDiagCross); (43). TFillStyle=(fsSurface,fsBorder); (44). TOpenOptions=ofReadOnly,ofOverwritePrompt,ofHideReadOnly,ofNoChangeDir,ofShowHelp,ofNoValidate,ofAllowMultiSelect,ofExtensionDifferent,ofPathMustExist,ofFileMustExist,ofCreatePrompt,ofShareAware,ofNoReadOnlyReturn,ofNoTestFileCreate,ofNoNetworkButton,ofNoLongNames,ofOldStyleDialog,ofNoDereferenceLinks,ofEnableIncludeNotify,ofEnableSizing; (45). TFileEditStyle=(fsEdit,fsComboBox); (46). TColorDialogOptions=cdFullOpen,cdPreventFullOpen,cdShowHelp,cdSolidColor,cdAnyColor; (47). TFontDialogOptions=fdAnsiOnly,fdTrueTypeOnly,fdEffects,fdFixedPitchOnly,fdForceFontExist,fdNoFaceSel,fdNoOEMFonts,fdNoSimulations,fdNoSizeSel,fdNoStyleSel,fdNoVectorFonts,fdShowHelp,fdWysiwyg,fdLimitSize,fdScalableOnly,fdApplyButton; (48). TFontDialogDevice=(fdScreen,fdPrinter,fdBoth); (49). TPrintRange=(prAllPages,prSelection,prPageNums); (50). TPrintDialogOptions=poPrintToFile,poPageNums,poSelection,poWarning,poHelp,poDisablePrintToFile; (51). TDuplicates=(dupIgnore,dupAccept,dupError); (52). TShiftState=ssShift,ssAlt,ssCtrl,ssLeft,ssRight,ssMiddle,ssDouble; (53). TAlignment=(taLeftJustify,taRightJustify,taCenter); (54). TAlign=(alNone,alTop,alBottom,alLeft,alRight,alClient); (55). TMouseButton=(mbLeft,mbRight,mbMiddle); (56). TAnchors=akLeft,akTop,akRight,akBottom; (57). TBevelCut=(bvNone,bvLowered,bvRaised,bvSpace); (58). TTextLayout=(tlTop,tlCenter,tlBottom); (59). TEditCharCase=(ecNormal,ecUpperCase,ecLowerCase); (60). TScrollStyle=(ssNone,ssHorizontal,ssVertical,ssBoth); (61). TComboBoxStyle=(csDropDown,csSimple,csDropDownList,csOwnerDrawFixed,csOwnerDrawVariable); (62). TCheckBoxState=(cbUnchecked,cbChecked,cbGrayed); (63). TListBoxStyle=(lbStandard,lbOwnerDrawFixed,lbOwnerDrawVariable); (64). TWindowState=(wsNormal,wsMinimized,wsMaximized); (65). TFormStyle=(fsNormal,fsMDIChild,fsMDIForm,fsStayOnTop); (66). TBorderIcons=biSystemMenu,biMinimize,biMaximize,biHelp; (67). TPosition=(poDesigned,poDefault,poDefaultPosOnly,poDefaultSizeOnly,poScreenCenter,poDesktopCenter); (68). TCloseAction=(caNone,caHide,caFree,caMinimize); (69). TPersistFormat=(pfADTG,pfXML); (70). TDataType=(ftUnknown,ftString,ftSmallint,ftInteger,ftWord,ftBoolean,ftFloat,ftCurrency,ftBCD,ftDate,ftTime,ftDateTime,ftBytes,ftVarBytes,ftAutoInc,ftBlob,ftMemo,ftGraphic,ftFmtMemo,ftParadoxOle,ftDBaseOle,ftTypedBinary,ftCursor,ftFixedChar,ftWideString,ftLargeint,ftADT,ftArray,ftReference,ftDataSet,ftOraBlob,ftOraClob,ftVariant,ftInterface,ftIDispatch,ftGuid,ftTimeStamp,ftFMTBcd); (71). TAffectRecords=(arCurrent,arFiltered,arAll,arAllChapters); (72). TADOLockType=(ltUnspecified,ltReadOnly,ltPessimistic,ltOptimistic,ltBatchOptimistic); (73). TBlobStreamMode=(bmRead,bmWrite,bmReadWrite); (74). TExecuteOption=(eoAsyncExecute,eoAsyncFetch,eoAsyncFetchNonBlocking,eoExecuteNoRecords); (75). TSeekOption=(soFirstEQ,soLastEQ,soAfterEQ,soAfter,soBeforeEQ,soBefore); (76). TCursorOption=(coHoldRecords,coMovePrevious,coAddNew,coDelete,coUpdate,coBookmark,coApproxPosition,coUpdateBatch,coResync,coNotify,coFind,coSeek,coIndex); (77). TUpdateStatus=(usUnmodified,usModified,usInserted,usDeleted); (78). TCursorType=(ctUnspecified,ctOpenForwardOnly,ctKeyset,ctDynamic,ctStatic); (79). TCursorLocation=(clUseServer,clUseClient);4. Variables (1). Unassigned: Variant = Unassigned; (2). Null: Variant = Null; (3). EmptyParam: Variant = EmptyParam;5. Functions (1). function AddressToObject(Address: Integer): TObject; (2). function ObjectToAddress(Obj: TObject): Integer; (3). function IntToStr(i: Integer): String; (4). function FloatToStr(e: Extended): String; (5). function DateToStr(e: Extended): String; (6). function TimeToStr(e: Extended): String; (7). function DateTimeToStr(e: Extended): String; (8). function VarToStr(v: Variant): String; (9). procedure FreeAndNil(Obj: TObject); (10). function StrToInt(s: String): Integer; (11). function StrToFloat(s: String): Extended; (12). function StrToDate(s: String): Extended; (13). function StrToTime(s: String): Extended; (14). function StrToDateTime(s: String): Extended; (15). function Format(Fmt: String; Args: array): String; (16). function FormatFloat(Fmt: String; Value: Extended): String; (17). function FormatDateTime(Fmt: String; DateTime: TDateTime): String; (18). function FormatMaskText(EditMask: string; Value: string): string; (19). function EncodeDate(Year, Month, Day: Word): TDateTime; (20). procedure DecodeDate(Date: TDateTime; var Year, Month, Day: Word); (21). function EncodeTime(Hour, Min, Sec, MSec: Word): TDateTime; (22). procedure DecodeTime(Time: TDateTime; var Hour, Min, Sec, MSec: Word); (23). function Date: TDateTime; (24). function Time: TDateTime; (25). function Now: TDateTime; (26). function DayOfWeek(aDate: DateTime): Integer; (27). function IsLeapYear(Year: Word): Boolean; (28). function DaysInMonth(nYear, nMonth: Integer): Integer; (29). function Length(s: String): Integer; (30). function Copy(s: String; from, count: Integer): String; (31). function Pos(substr, s: String): Integer; (32). procedure Delete(var s: String; from, count: Integer): String; (33). procedure Insert(s: String; var s2: String; pos: Integer): String; (34). function Uppercase(s: String): String; (35). function Lowercase(s: String): String; (36). function Trim(s: String): String; (37). function TrimLeft(s: String): String; (38). function TrimRight(s: String): String; (39). function VarIsEmpty(const V: Variant): Boolean; (40). function NameCase(s: String): String; (41). function CompareText(s, s1: String): Integer; (42). function Chr(i: Integer): Char; (43). function Ord(ch: Char): Integer; (44). procedure SetLength(var S: String; L: Integer); (45). function Round(e: Extended): Integer; (46). function Trunc(e: Extended): Integer; (47). function Int(e: Extended): Integer; (48). function Frac(X: Extended): Extended; (49). function Sqrt(e: Extended): Extended; (50). function Abs(e: Extended): Extended; (51). function Sin(e: Extended): Extended; (52). function Cos(e: Extended): Extended; (53). function ArcTan(X: Extended): Extended; (54). function Tan(X: Extended): Extended; (55). function Exp(X: Extended): Extended; (56). function Ln(X: Extended): Extended; (57). function Log10(X: Extended): Extended; (58). function Pi: Extended; (59). procedure Inc(var i: Integer; incr: Integer = 1); (60). procedure Dec(var i: Integer; decr: Integer = 1); (61). procedure RaiseException(Param: String); (62). procedure ShowMessage(Msg: Variant); (63). procedure Randomize; (64). function Random: Extended; (65). function ValidInt(cInt: String): Boolean; (66). function ValidFloat(cFlt: String): Boolean; (67). function ValidDate(cDate: String): Boolean; (68). function CreateOleObject(ClassName: String): Variant; (69). function VarArrayCreate(Bounds: Array; Typ: Integer): Variant; (70). function MutualCase(value : string): string; (71). function FirstUpperCase(value : string): string; (72). function SBCCase(value : widestring): string; (73). function DBCCase(value : widestring): string; (74). function StrTrimCtrlChar(value : widestring): string; (75). function StrTrimLineBreak(value : widestring): string; (76). function OemToAnsi(value : AnsiString): AnsiString; (77). function AnsiToOem(value : AnsiString): AnsiString; (78). function Utf7ToAnsi(value : AnsiString): WideString; (79). function AnsiToUtf7(value : WideString): AnsiString; (80). function AnsiToUni