13. Утилиты¶
-
Interpret(Param_1: Variant)¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует
-
SetOf(Param_1: Variant): Set¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Set
-
Assigned(X: Variant): Variant¶ Метод проверяет указатель или переменную на nil, если значение не присвоено, тогда возращает False, в противном случае True. Также работает со значениями типа Variant - varUnknown и varDispatch (IDispatch - представление OLE-объектов в скриптере)
Parameters: X (Variant) – Описание отсутствует Return type: Variant
13.1. TatSysUtilsLibrary¶
-
class
TatSysUtilsLibrary¶ Системные утилиты
13.1.1. Файловая система¶
-
GetFolderPath(FolderConst: Integer): String¶ Описание отсутствует
Parameters: FolderConst (Integer) – Метод позволяет получить полный путь к системным папкам. В качестве FolderConst можно передать следующие константы:
- CSIDL_PERSONAL
- CSIDL_APPDATA
- CSIDL_LOCAL_APPDATA
- CSIDL_INTERNET_CACHE
- CSIDL_COOKIES
- CSIDL_HISTORY
- CSIDL_COMMON_APPDATA
- CSIDL_WINDOWS
- CSIDL_SYSTEM
- CSIDL_PROGRAM_FILES
- CSIDL_MYPICTURES
- CSIDL_PROGRAM_FILES_COMMON
- CSIDL_COMMON_DOCUMENTS
- CSIDL_FLAG_CREATE
- CSIDL_COMMON_ADMINTOOLS
- CSIDL_ADMINTOOLS
Значение констант можно посмотреть в MSDN а также можно получить путь к специфической системной директории используя целочисленные значения констант описанных в MSDN.
Return type: String
-
ExtractFileExt(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
ChangeFileExt(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
ExtractShortPathName(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
FileIsReadOnly(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
RemoveDir(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
FindNext(Param_1: Variant): Integer¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Integer
-
FileAge(Param_1: Variant): Integer¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Integer
-
FileOpen(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
ExtractFilePath(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
RenameFile(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
DeleteFile(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
FileSetReadOnly(FileName: String; ReadOnly: Boolean): Variant¶ Описание отсутствует
Parameters: - FileName (String) – Полное имя файла.
- ReadOnly (Boolean) –
Значение свойства ReadOnly.
- True
- включено
- False
- выключено
Return type: Variant
-
FileSetAttr(FileName: String; Attr: Integer): Integer¶ Позволяет задать файлу FileName атрибуты Attr.
Parameters: - FileName (String) – Имя файла.
- Attr (Integer) –
- faReadOnly
- Только чтение. Текущий пользователь не имеет прав на запись
- faHidden
- Скрытый файл, начинается с “.”
- faSysFile
- Системный файл, ссылка, файл устройства, файл сокет
- faVolumeID
- не испольузется
- faDirectory
- Каталог
- faArchive
- Архив
- faSymLink
- Символьная ссылка
- faAnyFile
- Прочий файл
Return type: Integer
-
FileGetAttr(Param_1: Variant): Integer¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Integer
-
FileGetDate(Param_1: Variant): Integer¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Integer
-
FindClose(Param_1: Variant)¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует
-
FindFirst(Param_1, Param_2, Param_3: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
Return type: Integer
-
ForceDirectories(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
DirectoryExists(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
FileExists(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
FileClose(Param_1: Variant)¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует
-
FileWrite(Param_1, Param_2, Param_3: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
Return type: Integer
-
FileRead(Param_1, Param_2, Param_3: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
Return type: Integer
-
GetFileVersion(Param_1: Variant): Integer¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Integer
-
CreateDir(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
SetCurrentDir(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
GetCurrentDir(): Variant¶ Описание отсутствует
Return type: Variant
-
DiskSize(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
DiskFree(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
FileSearch(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
ExtractRelativePath(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
ExpandUNCFileName(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
ExpandFileNameCase(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
ExpandFileName(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
ExtractFileName(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
ExtractFileDrive(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
ExtractFileDir(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
13.1.2. Строки¶
-
StrByteType(Param_1, Param_2: Variant): Enumeration¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Enumeration
-
GetLocaleStr(Param_1, Param_2, Param_3: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
Return type: Variant
-
StrToBool(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
StrToIntDef(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
AnsiExtractQuotedStr(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
WideCompareText(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
WideLowerCase(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
AnsiStrLower(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
AnsiStrComp(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
LoadStr(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
BoolToStr(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
TryStrToBool(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
StrToBoolDef(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
TryStrToInt64(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
StrToInt64Def(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
StrToInt64(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
TryStrToInt(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
StrToInt(Param_1: Variant): Integer¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Integer
-
AdjustLineBreaks(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
AnsiDequotedStr(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
AnsiQuotedStr(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
QuotedStr(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
WideSameText(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
WideSameStr(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
WideCompareStr(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
WideUpperCase(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
AnsiStrLastChar(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
AnsiLastChar(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
AnsiStrUpper(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
AnsiStrLIComp(Param_1, Param_2, Param_3: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
Return type: Integer
-
AnsiStrLComp(Param_1, Param_2, Param_3: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
Return type: Integer
-
AnsiStrIComp(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
AnsiSameText(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
AnsiCompareText(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
AnsiSameStr(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
AnsiCompareStr(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
AnsiLowerCase(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
AnsiUpperCase(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
SameText(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
CompareText(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
CompareStr(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
LowerCase(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
UpperCase(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
AppendStr(Param_1, Param_2: Variant)¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
-
GUIDToString(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
StringToGUID(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
StringReplace(SourceString, OldPattern, NewPattern: String; Flags: TReplaceFlags): Variant¶ Описание отсутствует
Parameters: - SourceString (String) – Описание отсутствует
- OldPattern (String) – Описание отсутствует
- NewPattern (String) – Описание отсутствует
- Flags (TReplaceFlags) – Описание отсутствует
Return type: Variant
-
AnsiStrScan(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
AnsiStrRScan(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
AnsiStrPos(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
AnsiPos(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
AnsiUpperCaseFileName(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
AnsiLowerCaseFileName(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
SameFileName(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
AnsiCompareFileName(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
LastDelimiter(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
ExcludeTrailingBackslash(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
ExcludeTrailingPathDelimiter(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
IncludeTrailingBackslash(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
IncludeTrailingPathDelimiter(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
IsDelimiter(Param_1, Param_2, Param_3: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
Return type: Variant
-
IsPathDelimiter(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
NextCharIndex(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
CharLength(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
StrNextChar(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
StrCharLength(Param_1: Variant): Integer¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Integer
-
CharToByteIndex(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
ByteToCharIndex(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
CharToByteLen(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
ByteToCharLen(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
GetLocaleFormatSettings(Param_1, Param_2: Variant)¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
-
GetFormatSettings()¶ Описание отсутствует
-
GetLocaleChar(Param_1, Param_2, Param_3: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
Return type: Variant
-
StrDispose(Param_1: Variant)¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует
-
StrNew(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
StrBufSize(Param_1: Variant): Integer¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Integer
-
StrAlloc(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
StrPas(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
StrLower(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
StrUpper(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
StrPos(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
StrRScan(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
StrScan(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
StrLIComp(Param_1, Param_2, Param_3: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
Return type: Integer
-
StrLComp(Param_1, Param_2, Param_3: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
Return type: Integer
-
StrIComp(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
StrComp(Param_1, Param_2: Variant): Integer¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Integer
-
StrLCat(Param_1, Param_2, Param_3: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
Return type: Variant
-
StrCat(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
StrPLCopy(Param_1, Param_2, Param_3: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
Return type: Variant
-
StrPCopy(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
StrLCopy(Param_1, Param_2, Param_3: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
Return type: Variant
-
StrECopy(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
StrCopy(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
StrMove(Param_1, Param_2, Param_3: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
Return type: Variant
-
StrEnd(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
StrLen(Param_1: Variant): Integer¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Integer
-
13.1.3. Дата и время¶
-
TryFloatToDateTime(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
FloatToDateTime(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
IsLeapYear(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
ReplaceDate(Param_1, Param_2: Variant)¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
-
ReplaceTime(Param_1, Param_2: Variant)¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
-
IncAMonth(Param_1, Param_2, Param_3, Param_4: Variant)¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
- Param_4 (Variant) – Описание отсутствует
-
IncMonth(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
CurrentYear(): Integer¶ Описание отсутствует
Return type: Integer
-
Now(): Variant¶ Описание отсутствует
Return type: Variant
-
GetTime(): Variant¶ Описание отсутствует
Return type: Variant
-
Time(): Variant¶ Описание отсутствует
Return type: Variant
-
Date(): Variant¶ Описание отсутствует
Return type: Variant
-
DayOfWeek(Param_1: Variant): Integer¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Integer
-
SystemTimeToDateTime(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
DateTimeToSystemTime(Param_1, Param_2: Variant)¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
-
DecodeTime(Param_1, Param_2, Param_3, Param_4, Param_5: Variant)¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
- Param_4 (Variant) – Описание отсутствует
- Param_5 (Variant) – Описание отсутствует
-
DecodeDateFully(Param_1, Param_2, Param_3, Param_4, Param_5: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
- Param_4 (Variant) – Описание отсутствует
- Param_5 (Variant) – Описание отсутствует
Return type: Variant
-
DecodeDate(Param_1, Param_2, Param_3, Param_4: Variant)¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
- Param_4 (Variant) – Описание отсутствует
-
TryEncodeTime(Param_1, Param_2, Param_3, Param_4, Param_5: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
- Param_4 (Variant) – Описание отсутствует
- Param_5 (Variant) – Описание отсутствует
Return type: Variant
-
TryEncodeDate(Param_1, Param_2, Param_3, Param_4: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
- Param_4 (Variant) – Описание отсутствует
Return type: Variant
-
EncodeTime(Param_1, Param_2, Param_3, Param_4: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
- Param_4 (Variant) – Описание отсутствует
Return type: Variant
-
EncodeDate(Param_1, Param_2, Param_3: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
Return type: Variant
-
TimeStampToMSecs(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
MSecsToTimeStamp(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
TimeStampToDateTime(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
DateTimeToTimeStamp(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
DateTimeToFileDate(Param_1: Variant): Integer¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Integer
-
FileDateToDateTime(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
13.1.4. Системные¶
-
Sleep(Param_1: Variant)¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует
-
IsValidIdent(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
Languages()¶ Описание отсутствует
-
CheckWin32Version(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
IsEqualGUID(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
CreateGUID(Param_1: Variant): Integer¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Integer
-
FreeAndNil(Param_1: Variant)¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует
-
ByteType(Param_1, Param_2: Variant): Enumeration¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Enumeration
-
Beep()¶ Описание отсутствует
-
Abort()¶ Описание отсутствует
-
GetModuleName(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
SysErrorMessage(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
FloatToDecimal(Param_1, Param_2, Param_3, Param_4, Param_5: Variant)¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
- Param_3 (Variant) – Описание отсутствует
- Param_4 (Variant) – Описание отсутствует
- Param_5 (Variant) – Описание отсутствует
-
TryFloatToCurr(Param_1, Param_2: Variant): Variant¶ Описание отсутствует
Parameters: - Param_1 (Variant) – Описание отсутствует
- Param_2 (Variant) – Описание отсутствует
Return type: Variant
-
FloatToCurr(Param_1: Variant): Variant¶ Описание отсутствует
Parameters: Param_1 (Variant) – Описание отсутствует Return type: Variant
-
13.2. TbtkScriptSystemObject¶
-
class
TbtkScriptSystemObject¶ Класс имплементирует методы работы с системными функциями Windows.
-
SetForegroundWindow(Handle: Integer): Boolean¶ Метод выносит окно наверх по идентификатору окна. Функция возвращает true в случае успешного выполнения операции.
Parameters: Handle (Integer) – Идентификатор окна. Return type: Boolean
-
FindWindow(ClassName, WindowCaption: String): Integer¶ Метод возвращает идентификатор окна в системе.
Parameters: - ClassName (String) – Имя класса окна. Имя класса можно узнать с попощью различных программ, например WinID, WManager.
- WindowCaption (String) – Заголовок окна.
Return type: Integer
-
13.3. TatWindowsLibrary¶
-
class
TatWindowsLibrary¶ Функции Windows
-
FreeLibrary(Ahandle: Integer)¶ Метод выгружает библиотеку по хендлу.
Parameters: Ahandle (Integer) – Хендл загруженной библиотеки полученный через метод LoadLibrary.Пример использования¶<pascal> { declaration of external functions } function CreateCustomForm(caption: AnsiString; color: integer): TObject; stdcall; external 'CustomLib.dll'; procedure ShowForm(form: TObject); external 'CustomLib.dll'; procedure GetBounds(form: TObject; var l, t, w, h: integer); cdecl; external 'CustomLib.dll' name 'FormGetBounds'; function DecodeToday(var year, month, day: integer): boolean; stdcall; external 'CustomLib.dll'; function tsr(x, y: double): double; external 'CustomLib.dll' name 'TimesSquareRoot'; const clRed = $0000FF; begin { explicit dynamic load of the library } dll := LoadLibrary('CustomLib'); try ShowMessage(Format('CustomLib.dll loaded: handle = %d', [dll])); frm := CreateCustomForm('My form', clRed); try ShowForm(frm); l := 0; t := 0; w := 0; h := 0; GetBounds(frm, l, t, w, h); ShowMessage(Format('Form bounds: left=%d, top=%d, width=%d, height=%d', [l, t, w, h])); finally frm.Free; end; finally FreeLibrary(dll); { unload } ShowMessage(Format('DLL %d unloaded', [dll])); end; { automatic load of the library on demand } y := 0; m := 0; d := 0; leap := DecodeToday(y, m, d); ShowMessage(Format('Today: day=%d, month=%d, year=%d', [d, m, y])); if leap then ShowMessage(Format('%d is leap', [y])) else ShowMessage(Format('%d is not leap', [y])); ShowMessage('Square root of ' + IntToStr(m * d) + ' is ' + FloatToStr(tsr(m, d))); end; </pascal>
-
LoadLibrary(LibraryName: String): Integer¶ Метод загружает библиотеку dll и возвращает Handle на нее. Если загрузить не удалось будет сгенерено исключение.
Parameters: LibraryName (String) – Системное имя библиотеки. Return type: Integer Пример использования¶<pascal> { declaration of external functions } function CreateCustomForm(caption: AnsiString; color: integer): TObject; stdcall; external 'CustomLib.dll'; procedure ShowForm(form: TObject); external 'CustomLib.dll'; procedure GetBounds(form: TObject; var l, t, w, h: integer); cdecl; external 'CustomLib.dll' name 'FormGetBounds'; function DecodeToday(var year, month, day: integer): boolean; stdcall; external 'CustomLib.dll'; function tsr(x, y: double): double; external 'CustomLib.dll' name 'TimesSquareRoot'; const clRed = $0000FF; begin { explicit dynamic load of the library } dll := LoadLibrary('CustomLib'); try ShowMessage(Format('CustomLib.dll loaded: handle = %d', [dll])); frm := CreateCustomForm('My form', clRed); try ShowForm(frm); l := 0; t := 0; w := 0; h := 0; GetBounds(frm, l, t, w, h); ShowMessage(Format('Form bounds: left=%d, top=%d, width=%d, height=%d', [l, t, w, h])); finally frm.Free; end; finally FreeLibrary(dll); { unload } ShowMessage(Format('DLL %d unloaded', [dll])); end; { automatic load of the library on demand } y := 0; m := 0; d := 0; leap := DecodeToday(y, m, d); ShowMessage(Format('Today: day=%d, month=%d, year=%d', [d, m, y])); if leap then ShowMessage(Format('%d is leap', [y])) else ShowMessage(Format('%d is not leap', [y])); ShowMessage('Square root of ' + IntToStr(m * d) + ' is ' + FloatToStr(tsr(m, d))); end; </pascal>
-