function RunExec(Value: string): integer;
function RunExecNoWait(Value: string): boolean;
procedure RunShell(Value: string);
function BrowseURL(const URL: string): boolean
procedure Sleep(Value: integer);
function GetTick: longword;
function HttpAsk(const Method, Url, UploadType, Upload: string; var Download: string): boolean;
function HttpAskUA(const Method, Url, UploadType, Upload, UserAgent: string; var Download: string): boolean;
HttpAsk()
umožňuje nastavit hodnotu User Agent //běžně by se použilo Url:=https://uživatel:heslo@server.com/...; //ale je také možné použít běžné Url a nastavit UserAgent:=CRLF+'Authorization uživatel heslo';
false
, do návratové proměnné Download nepřepíše vrácený text a nebude možné zjisti podrobnosti o chybě ani její číslo (do verze 2.11.5), od verze 2.11.6 je výsledný dokument vrácen vždy, pokud bylo něco posláno, i když funkce skončí chybou HttpResultCode():integerl
HttpResultHeaders():string;
function UDPAsk(target, port, value: AnsiString; timeout:integer): AnsiString;
timeout
milisekund na odpověď, pokud nepřijde, vrací prázdný string 2.9.13function FormatFloat(const Format: string; Value: extended): string;
function FlToStr(Value: extended): string;
function StrToFl(Value: string): extended;
function DateToInt(Value: TDateTime): string;
function IntToDate(Value: string): TDateTime;
function SrtmElevation(x, y: extended; srtmpath: string): integer;
ParseWgsStr(const Value: string; var X, Y: extended): boolean;
Value
na desetinný formát. Zvládá velké množství formátů souřadnic jako funkce CoordEdit().procedure WGStoUTM(Lat, Lon: extended; Force33u: boolean; out Northing, Easting: extended; out Zone: integer; out ZoneChar: char);
procedure UTMtoWGS(Northing, Easting: extended; Zone: integer; Zonechar: char; out Lat, Lon: extended);
procedure UTMtoMCZ(Northing, Easting: extended; out North, East: string);
function FormatCoordNum(X, Y: extended): string;
N50°12.345' E015°12.345
'). Výstup je kódován v ANSI. Pozor na význam Ansi!function zCompress(const Value: string): string;
function zDecompress(const Value: string): string;
function ExpandEnvir(Value: string): string;
function GetEnvir(Name: string): string;
procedure ConsoleInfo(Value: string);
procedure ConsoleError(Value: string);
function PostMessage(hWnd: integer; Msg: integer; wParam: integer; lParam: integer): longbool;
function SendMessage(hWnd: integer; Msg: integer; wParam: integer; lParam: integer): integer;
procedure GeoSetFilteredSearch(value: integer);
Geoget_FilteredSearch
.2.9.1GetListing(const value: TStrings; prefix: string);
SQLiteRegisterUDF(const value: TSQLiteDatabase);
Od verze 2.10 již GeoGet funkce GC.Live nepodporuje, proto některé byly převedeny a vnitřně používají GC.API a některé byly zrušeny. Převedené funkce mohou mít funkčnost mírně pozměněnou v závislosti na možnostech GC.API.
function GcLiveGetLogs(const ID: string; Numlogs: integer; StopOnFound, Refine: boolean): integer;
ID
.2.6.2procedure GcLiveUpdateStatus(const IDs: string)
ID
je jeden GC kód, IDs
může být více kódů najednou, oddělené odřádkováním.2.6.2procedure GcLiveUpdateListing(const IDs: string; Lite: boolean)
ID
je jeden GC kód, IDs
může být více kódů najednou, oddělené odřádkováním.2.6.2procedure GcLiveUpdateListing2(const IDs: string; mode:integer)
ID
je jeden GC kód, IDs
může být více kódů najednou, oddělené odřádkováním.2.9.4mode
definuje režim získámí dat (0=FULL, 1=LITE, 2=SUMMARY)procedure GCLiveGetListing(par: TGCLSearch) TGCLSearch = record cx: double; //souřadnice středu kruhu (Latitude), v kterém budou keše vyhledávány cy: double; //(Lognitude) cr: double; //poloměr kruhu v km, hledani podle souradnic se vypne cr=0. islite: boolean; //plný (false) nebo lite (true) listing !! od verze 2.9.2 nahrazeno položkou mode cachetypes: string; //seznam typů keší (plné stringy používané na GC, oddělovač ''CRLF'') cachesizes: string; //seznam požadovaných velikostí (plné stringy používané na GC, oddělovač ''CRLF'') available: integer; //0=jen neaktivní, 1=jen aktivní, 2=aktivní i neaktivní archived: integer; //0=jen nearchivované, 1=jen archivované, 2=archivované i nearchivované pmo: integer; //0=jen nePMO, 1=jen PMO, 2=PMO i nePMO ignorelist: boolean; //true=aplikovat nastavený ignorelist notfoundby: string; //seznam nicků, které keš nesmějí mít nalezenou (oddělovačem je ''CRLF'') hiddenby: string; //seznam nicků ownerů keší (oddělovačem je ''CRLF'') nothiddenby: string; //seznam nicků, kteří nesmějí být ownery keší (oddělovačem je ''CRLF'') //od verze 2.9.2+: mode: integer; //0=full, 1=lite, 2=summary country: string; //seznam jmen států (oddělovačem je ''CRLF'') state: string; //seznam jmen krajů (oddělovačem je ''CRLF'') end;
function GCLiveGetUserLogs(const value: string): integer
function GCLiveUpdateUserLogs(const value: string): integer
GCLiveGetUserLogs
. Jméno uživatele musí být v UTF-8. 2.7.9function GCLiveSelectBookmark: string
function GCLiveAddToBookmark(const ids: string; guid: string)
procedure GCLiveLoadBookmark(guid: string)
procedure GCLiveImportBookmark(guid: string)
function GCLiveGetBookmark(guid: string): string
CRLF
.2.7.3
Zobrazit nepodporované funkce GC.Live
Skrýt nepodporované funkce GC.Live
function GCliveCall(DataFormat: integer; ApiFunction, ApiUrlParam, ApiData: string; var ApiResponse: string): integer
AccessToken
! Ani v URL parametrech, ani v ApiData
! Ten si GeoGet doplní sám. Pokud Token není, GeoGet sám vyvolá přihlášení. Při chybě sám ukáže chybový dialog, pro vybrané chybové kódy sám nabízí opakování operace, atd. prostě tak, jak to znáte z funkcí GeoGetu.DataFormat
: 0-XML, 1-JSONApiFunction
: název APi funkce. Třeba GetAPILimits
ApiUrlParam
: URL parametry pro volání (pro GET požadavky)ApiData
: Odesílaný dokument. (pro POST) Musí být kódovaný dle DataFormat
!ApiResponse
: odpověď serveru, bude opět kódovaná v DataFormat
.Result
: z odpovědi vytáhnutý stavový kód odpovědi. 0=OK.var r: string; x: integer; begin x := GCliveCall(0, 'GetAPILimits', '', '', r); showmessage(inttostr(x)); stringtofile(r, 'gclive.txt'); end;
procedure GCLiveDoSearch(const value: string; mode: integer);
ID
.2.9.7 - 2.9value
je JSON string s API dotazem pro SearchForGeocaches()
(funkce GC.LIve API) vcetne IsLite parametru (i kdyz je to jeste v parametru mode
!). Geoget před voláním doplní do stringu token
mode
je 0=full, 1=lite, 2=summaryGetMoreGeocaches()
(funkce GC.LIve API) a keše importuje do databázePro volání jsou třeba parametry:
function GCliveRest(ApiMethod, ApiUri, ApiData, ApiDataMime: string; var ApiResponse: string): integer;
function GCliveRestPaged(ApiMethod, ApiUri, ApiData, ApiDataMime: string; PageSize: integer; var ApiResponse: string): integer;
function GCLImportCachePaged(const value: string): integer;
S API se komunikuje výhradně ve formátu JSON. Pro zpracování odpovědí existuje v GeoGetu parser, po jeho vložení
uses simplejson;
je k dispozici objekt:
type TSimpleJSon = class(TObject) public constructor create; procedure Free; function ParseString(value: AnsiString): Boolean; function AsString(path: string): String; function AsInteger(path: string): int64; function AsDouble(path: string): double; function AsArraySize(path: string): integer; end;
Funkce asBoolean neexistuje, lze ji nahradit konstrukcí:
b:boolean; json:TSimpleJSON; ... b:=(json.AsInteger(path)=1);
K jednotlivým prvkům v objektu je pak přístup přes path
, např.:
foo // objekt foo.list // vlastnost objektu foo[123] // prvek pole objektu. Indexováno od nuly, počet prvků pole by mělo vrátit volání metody AsArraySize.
Pro jednodužší zpracování vrácených polí je rozumné vrácenému poli předřadit fiktivní jméno prvku a na něj se pak odkazovat.
uses simplejson; ... var rJson:TSimpleJSon; ... if(GcLiveRest('GET',sRequest,'','',sJson)=200) then begin //predpokladejme, ze je vraceno pole '[{..},{..},...]', udelame z nej pole prvku 'root' sJson:='{root:'+sJson+'}'; rJson:=TSimpleJson.Create(); try if(rJson.ParseString(sJson)) then begin nLogs:=rJSon.AsArraySize('root'); for i:=0 to nLogs-1 do begin //zpracujeme vsechny logy //odkazujeme se na prislusne pole prvku 'root[i]' a jeho vnorenou hodnotu 'geocacheCode' sGcId:=rJson.asString('root['+IntToStr(i)+'].geocacheCode'); ... end; end; finally rJson.Free(); end; end;
function UTCtoLocal(Value: TDateTime): TDateTime;
function LocalToUTC(Value: TDateTime): TDateTime;
function UTCtoTimezone(Value: TDateTime; Timezone: string): TDateTime;
Value
. 2.7.4function TimezoneToUTC(Value: TDateTime; Timezone: string): TDateTime;
Value
. 2.7.4function GetTimeZoneByCoord(x, y: extended): string;
AnsiToUtf()
nebo UtfToAnsi()
. Ansi je ve jménech funkcí zachováno pro zpětnou kompatibilitu s předchozími verzemi GeoGetu.function UtfToAscii(Value: string): string;
function UtfToGps(Value: string): string;
function UtfToAnsi(Value: string): string;
function AnsiToOem(const Value: string): string;
function UtfToCharset(const Value, Charset: string): string;
function CharsetToUtf(const Value, Charset: string): string;
function UnicodeBOM(const Charset: string): string;
function AnsiToUtf(const Value: string): string;
function IsUtf(const Value: AnsiString): boolean
function IsValidID(Value: string): boolean;
function IsValidGC(Value: string): boolean;
function IsValidWM(Value: string): boolean;
function IsGuid(Value: string): boolean;
function ReplaceString(Value, Search, Replace: string): string;
function Fetch(var Value: string; const Delimiter: string): string;
Value
kus řetězce až po nejbližší Delimiter
. Po ukousnutí je zbytek Value
ještě zbaven koncových a počátečních bílých znaků (Trim
).function FetchBin(var Value: string; const Delimiter: string): string;
Value
kus řetězce až po nejbližší Delimiter
. Zbytek Value
není zbaven počátečních a koncových bílých znaků (Trim
). Vhodné pro zpracování binárních dat.function SeparateLeft(const Value, Delimiter: string): string;
Value
vlevo od zadaného separátoru (Delimiter
).function SeparateRight(const Value, Delimiter: string): string;
Value
vpravo od zadaného separátoru (Delimiter
).function Rot13(Value: string): string;
function Reverse(Value: string): string;
Value
pozpátku.function CData(Value: string): string;
function QuoteStr(const Value: string; Quote: char): string;
function DecodeBase64(const Value: string): string;
function EncodeBase64(const Value: string): string;
function HtmlImg2Link(const Value: string): string;
function Html2Text(const Value: string): string;
function EncodeUrlElement(const Value: string): string;
function CompareVer(ValueAsk, ValueCur: string): boolean;
ValueAsk
> ValueCur
.function HtmlEntityDecode(const Value: string): string;
function HtmlEntityEncode(const Value: string): string;
function HtmlEntityEncodeAll(const Value: string): string;
function XMLEntityDecode(const Value: string): string;
function XMLEntityEncode(const Value: string): string;
function MDtoHTML(value: string): string;
function JSEntityDecode(const value: ansistring): ansistring;
function JSEntityEncode(const value: ansistring): ansistring;
Regulární výrazy používají syntaxi podobnou Perlu.
function RegexFind(const ARegExpr, AInputStr: string): boolean;
ARegExpr
masce.function RegexExtract(const ARegExpr, AInputStr: string): string;
ARegExpr
masce. 2.2.4function RegexReplace(const ARegExpr, AInputStr, AReplaceStr: string; AUseSubstitution: boolean): string;
RegExpr
bude nahrazeno ReplaceStr
. Pokud je zapnuta substituce, pak ReplaceStr
obsahuje masku pro nahrazení.function RegexQuote(const AStr: string): string;
function RegExSubstitute(const Expr, Value, Template: string): string;
s:=RegexSubstitute('(?i)<a\s*href="(.*?)">(.*?)</a>','Text pred tagem<a href="url_adresa">jmeno odkazu</a> text za tagem','$2');
vrátí “jmeno odkazu”.
function RegExSplit(const Expr, Value: string): string;
Value
podle regulárního výrazu. 2.4.2function RenameFile(const OldName, NewName: string): boolean;
function CopyFile(const OldName, NewName: string): boolean;
procedure shCopyFile(FromDir, ToDir: string);
procedure CopyTree(FromDir, ToDir: string);
function DeleteFile(const FileName: string): boolean;
procedure DeleteFiles(Value: string);
function FileExists(const FileName: string): boolean;
function DirectoryExists(const Directory: string): boolean;
function ForceDirectories(Dir: string): boolean;
function DelTree(const Path: string): boolean;
procedure StringToFile(Value, FileName: string);
function FileToString(filename: string): string;
procedure FileList(Dir: string; const Value: TStrings);
StringList
seznamem souborů v adresáři. Jména podadresářů končí zpětným lomítkem.function GetFileSize(Value: string): integer;
function GetFileTime(Value: string): TDateTime;
function FtpGetFile(const IP, Port, FileName, LocalFile, User, Pass: string): boolean;
function FtpPutFile(const IP, Port, FileName, LocalFile, User, Pass: string): boolean;
function DiskInDrive(Drive: char): boolean;
Drive
momentálně přítomen disk? Vhodné např. pro čtečky SD karet a podobně. 2.3.4function GetDriveTypeStr(const Drive: char): string;
DiskName(Drive: Char): string;
procedure GeoDBNames(const Value: TStrings);
StringList
seznamem všech databází (včetně záložních). 2.2.5procedure GeoDBSelect(Value: string);
function AttributeToIcon(Value: string): string;
function AttributeIDToIcon(Value: string): string;
function IconToAttributePQ(Value: string): string;
function IconToAttributeWEB(Value: string): string;
function IconToAttributeID(Value: string): string;
function GeoInstallScriptFile(const FileName: string): string;
function GeoInstallScriptURL(const Url: string): string;
meta
souboru definován).function GeoGetPackages: string;
CRLF
oddělený seznam nainstalovaných balíčků (plné cesty k meta
souborům). 2.5.0function GeoGetPackageVersion(PackageMeta: string): string;
PackageMeta
je plná cesta k meta
souboru. 2.5.0function GeoGetPackagePreviousVersion(PackageMeta: string): string;
InstallWork
instalačního skriptu. V opačném případě vrací verzi aktuálně nainstalovanou.plver.txt
v datovém adresáři GeoGetu.PackageMeta
může být plná cesta k meta
souboru, ale i jen jeho název či název balíčku.function GeoGetPackageUpdateVersion(PackageMeta: string): string;
PackageMeta
je plná cesta k meta
souboru. 2.5.0function GeoUpdatePackage(PackageMeta: string): string;
PackageMeta
je plná cesta k meta
souboru. 2.5.0function GeoUninstallPackage(PackageMeta: string): boolean;
PackageMeta
je plná cesta k meta
souboru. 2.5.0procedure GeoReloadPlugins;
procedure GeoRefreshHeaders;
plugin
je vždy plná cesta k GGP
pluginu.refresh toolbaru i menu
pomocí procedury GeoReloadPlugins
.function GeoGetToolbar(Plugin: string): boolean;
Plugin
zařazen na toolbar.procedure GeoSetToolbar(Plugin: string; Value: boolean);
Plugin
z toolbaru.function GeoGetPluginGroup(Plugin: string): string;
Plugin
zařazen.function GeoGetDefaultGroup: string;
procedure GeoSetPluginGroup(Plugin, Value: string);
Plugin
do skupiny Value
.function GeoListPluginGroups: string;
CRLF
oddělený seznam existujících skupin pluginů.function GeoGetPopupMenu(plugin: string): boolean;
Plugin
zařazen do popup menu. 2.8.8procedure GeoSetPopupMenu(plugin: string; value: boolean;
Plugin
do položky Value
popup menu. 2.8.8procedure GeoTagDelCategory(Value: string);
TagCategories
, TagHaveCategory
, TagValues
, TagAdd
, TagReplace
, TagReplaceList
, TagDel
, TagClear
metody třídy TGeo.
Všechny funkce této skupiny počítají hodnoty na elipsoidu WGS84.
procedure PointProject(const Px, Py, Angle, Distance: extended; out Nx, Ny: extended);
Nx
, Ny
, který je od zadaného výchozího bodu Px
, Py
vzdálen Distance
(v kilometrech) v azimutu Angle
(ve stupních). 2.2.3function PointDistanceEx(X1, Y1, X2, Y2: extended; var Azimut: extended): extended;
Azimut
bude uložen azimut dvou bodů (ve stupních). 2.2.3function PointDistance(X1, Y1, X2, Y2: extended): extended;
function PointAzimuth(X1, Y1, X2, Y2: extended): extended;
Možnost použití tříd TRegistry
, TRegIniFile
a TRegistryIniFile
. Pro třídu RootKey se používají tyto hodnoty: (např. reg.RootKey := $80000001;
) 2.4.3
HKEY_CLASSES_ROOT = $80000000; HKEY_CURRENT_USER = $80000001; HKEY_LOCAL_MACHINE = $80000002; HKEY_USERS = $80000003; HKEY_PERFORMANCE_DATA = $80000004; HKEY_CURRENT_CONFIG = $80000005; HKEY_DYN_DATA = $80000006; KEY_READ = 131097;
Pro zápis do HKEY_LOCAL_MACHINE
jsou běžně potřeba administrátorská práva. Pokud potřebujete z HKLM pouze číst, pak stačí objektu třídy TRegistry
nastavit property Access
na KEY_READ
. V opačném případě nelze z HKLM
jako běžný uživatel ani číst.
Všechny následující funkce pro manipulaci s obrázky pracují s jejich textovou interpretací (
string
) na místo objektů třídy TImage
nebo TBitmap
. Automaticky je rozpoznáno a podporováno mnoho grafických bitmapových formátů.
function ImageResize(const Value: string; Width, Height: integer; FixAspect, HiQuality: boolean): string;
Width
a Height
nové rozměry. Parametry FixAspect
a HiQuality
určují, zda má být při změně velikosti zachován poměr stran a zda má být použito kvalitnějšího (a pomalejšího a časově náročnějšího) módu konverze. Návratová hodnota je stringová reprezentace upraveného obrázku. 2.4.0function ImageRotate(const Value: string; Angle: double): string;
function ImageConvert(const Value: string; FileName: string): string;
procedure ImageInfo(const Value: string; out ImageType: string; out Width, Height, BPP: integer);
ImageType
vrací název druhu obrázku třeba JPEG. Width
a Height
je snad jasné. BPP
je BitsPerPixel. 2.5.6procedure ImageGPSRead(const Value: string; out X, Y: extended);
X
a Y
načte GPS souřadnice z EXIF v obrázku. (X - Lat, Y - Lon). 2.5.6function ImageGPSWrite(const Value: string; X, Y: extended): string;
X
a Y
zapíše GPS souřadnice do EXIF v obrázku. (X - Lat, Y - Lon). 2.5.6function ImageMerge(const background, foreground: string; x, y: integer): string;
background
(libovolného podporovaného typu) je na pozici [x,y]
přenesen obrázek foregroung
. Výsledný obrázek je ve stejném formátu jako background
. Funkce má následující podmínky:background
nesmí mít nastavenou průhlednost v alfakanálu (PNG) ani v paletě (GIF)background
musí mít minimálně stejnou barevnou hloubku jako foreground
foreground
je není možné použít BMP truecolor (24bit). Je třeba použít formát s paletou (BMP 8bit, GIF, …)nebo s alfakanálem (PNG, …)foregroung
může mít průhlednost definovanou v alfakanálu (PNG), v paletě (GIF) nebo pokud není průhlednost definovaná a je použita paleta (BMP), pak se za průhlednou považuje barva FF00FF, kterou interpretují GPS Garmin jako průhlednou.function ClipboardReadText: string;
UtfToAnsi()
. Pozor na význam Ansi! 2.8.3procedure ClipboardWriteText(value: string);
value
do schránky. Pracuje s nativními unicode stringy. Pokud je třeba do schránky zkopírovat UTF-8 string, musí se string napřed převést na na “falešný ansistring” funkcí UtfToAnsi()
(viz význam Ansi!) 2.8.3function ClipboardHasText: boolean;
true
pokud schránka obsahuje text. 2.8.3procedure RefPointNames(const Value: TStrings);
StringList
seznamem uložených referenčních bodů.function RefPointSet(Value: string; X, Y: extended): boolean;
function RefPointGet(Value: string; var X, Y: extended): boolean;
function RefPointDel(Value: string): boolean;
function RefPointSelect(Value: string): boolean;
function RefPointSelectTemp(Value: string; X, Y: extended): boolean;
function ReferencePointCoord(Name: string, var: X, Y: extended): boolean;
X
' a Y
' dosadí souřadnice referenčního bodu se jménem Name
. Pokud se dosazení povede, vrátí true
. 2.2.1function AddReferencePoint(Name: string; X, Y: extended): boolean;
Name
a souřadnicemi X
' a Y
. Pokud se přidání povede, vrátí true
. 2.2.1function LoadReferencePoint(Name: string): boolean;
true
. 2.2.1function EditReferencePoint(Name: string; NewX, NewY: extended): boolean;
newX
a newY
. Pokud se to povede, vrátí true
. 2.2.1function RemoveReferencePoint(Name: string): boolean;
true
. 2.2.1procedure ShowMessage(const Msg: string);
procedure ShowLongMessage(const Caption: string; const Msg: string);
procedure ShowHTMLMessage(const Caption: string; const Msg: string);
ShowLongMessage
obsahuje jednoduchý HTML renderer, stejný, v jakém se zobrazují listingy. Takže řetězec může obsahovat HTML tagy.procedure ShowHTMLMessageSize(const title, value: string; width, height: integer);
ShowLongMessage
obsahuje jednoduchý HTML renderer, stejný, v jakém se zobrazují listingy. Takže řetězec může obsahovat HTML tagy. width
a height
definuje velikost okna se zobrazenou zprávou. 2.9.4function InputBox(const ACaption, APrompt, ADefault: string): string;
ADefault
.function SaveDlg(Title, InitialDir, Options, Filter: string; var FileName: string):boolean;
SaveDialog
.function OpenDlg(Title, InitialDir, Options, Filter: string; var FileName: string):boolean;
OpenDialog
.function SelectDir(InitialDir, Caption: string): string;
function MessBox(Text, Caption: string; Flags: integer): integer;
MessageBox
. Konstantou ve Flags
se určuje, jaká tlačítka budou použita: 0 = OK, 1 = OK+Cancel, 2 = Abort+Retry+Ignore, 3 = Yes+No+Cancel, 4 = Yes+No, 5 = Retry+Cancel. Návratová hodnota určuje, jaké tlačítko bylo zmáčknuto: 1 = OK, 2 = Cancel, 3 = Abort, 4 = Retry, 5 = Ignore, 6 = Yes, 7 = No.function CoordEdit(const Title, Caption: string; var X, Y: extended): boolean;
procedure GeoBusyStart;
procedure GeoBusyCaption(Value: string);
procedure GeoBusyKind(Value: string);
procedure GeoBusyValue(Value: string);
procedure GeoBusyProgress(Value, Max: integer);
function GeoBusyTest: boolean;
ShowModal()
ModalResult
, tím dojde po volbě funkce k ukončení formulářeShowModal()
obsloužit spuštěním příslušné funkce a v ní testovat GeoBusyTest()
ShowModal()
zobrazit formulářfunction _(const SzMsgId: string): string;
string
do právě používaného jazyka. Pomocí této funkce je třeba obalit jakýkoliv text v kódu makra, který chcete překládat.procedure TextDomain(const SzDomain: string);
function GetCurrentTextDomain: string;
procedure BindTextDomain(const SzDomain: string; const SzDirectory: string);
procedure UseLanguage(LanguageCode: string);
function GetCurrentLanguage: string;
procedure RetranslateComponent(AnObject: TComponent; const TextDomain:string);
function GetTranslatorNameAndEmail: widestring;
procedure GeoStopWork;
PluginWork
již nebude voláno. 2.2.1procedure GeoAbort;
procedure GeoImportFile(Value: string);
temp
, kam archiv rozbalí. Mělo by to pracovat i s archivy v archivech.procedure GeoImportDir(Value: string);
ImportFile
. Pokud je soubor archiv, tak viz. výše, rozbalí se do temp
a obsah se naimportuje.procedure GeoImportBegin;
procedure GeoImportEnd;
procedure GeoImportPQ;
procedure GeoDownImportPQ;
procedure GeoExport(Exporter, FileName: string);
Exporter
do souboru FileName
.procedure GeoListUpdateID(value: string);
procedure GeoListUpdateAll;
procedure GeoListClear;
procedure GeoListLoad;
procedure GeoListLoadAdd;
procedure GeoListLoadSub;
procedure GeoFilterLoadFile(Value: string);
procedure GeoListFileAdd(Value: string);
procedure GeoListFileSub(Value: string);
procedure GeoListSave(Value: string);
procedure GeoListByFileAdd(Value: string);
procedure GeoListByFileSub(Value: string);
procedure GeoCallGGP(FileName: string);
procedure GeoCallGGC(FileName: string; const Geo: TGeo);
procedure GeoExport(Exporter, FileName: string);
function GetCountryID(Value: string): integer;
CountryID
číslo. 2.2.1function GetCountryName(Value: string): string;
function GetCountryAbbr(Value: string): string;
function GetStateID(Value: string): integer;
StateID
číslo. 2.2.1procedure GetCountryList(const List: TStrings);
StringList
seznamem známých států.procedure GetStateList(Value: string; const List: TStrings);
StringList
seznamem známých území pro požadovaný stát.procedure GetDBCountryList(const List: TStrings);
StringList
seznamem států vyskytujících se v databázi kešek.procedure GetDBStateList(Value: string; const List: TStrings);
StringList
seznamem známých území pro požadovaný stát, podle výskytu v databázi kešek.Druhy výjimek jsou definovány následujícím výčtovým typem:
TIFException = (ErNoError, ErCannotImport, ErInvalidType, ErInternalError, ErInvalidHeader, ErInvalidOpcode, ErInvalidOpcodeParameter, ErNoMainProc, ErOutOfGlobalVarsRange, ErOutOfProcRange, ErOutOfRange, ErOutOfStackRange, ErTypeMismatch, ErUnexpectedEof, ErVersionError, ErDivideByZero, ErMathError, ErCouldNotCallProc, ErOutofRecordRange, ErOutOfMemory, ErException, ErNullPointerException, ErNullVariantError, ErInterfaceNotSupported, ErCustomError);
Výjimky lze v kódu skriptu odchytit pomocí konstrukce:
try //kód, který chceme chránit except //zde budeme jen když nastala výjimka end;
procedure RaiseLastException;
procedure RaiseException(Ex: TIFException; Param: string);
function ExceptionType: TIFException;
function ExceptionParam: string;
function ExceptionToString(er: TIFException; Param: string): string;
function Crc32(const Value: AnsiString): integer;
function MD5(const Value: AnsiString): AnsiString;
function SHA1(const Value: AnsiString): AnsiString;
function MurmurHash(const Value: string): cardinal;
function StrToHex(const Value: Ansistring): string;
function ArcTan2(const Y, X: extended): extended;
function Tan(const X: extended): extended;
function Cotan(const X: extended): extended;
function Cot(const X: extended): extended;
function TanH(const X: extended): extended;
function CotH(const X: extended): extended;
function IntToStr(I: longint): string; function StrToInt(S: string): longint; function StrToIntDef(S: string; Def: longint): longint; function copy(S: string; IFrom, ICount: longint): string; function pos(SubStr, S: string): longint; procedure delete(var S: string; IFrom, ICount: longint); procedure insert(S: string; var S2: string; IPos: longint); function StrGet(var S: string; I: integer): char; function StrGet2(S: string; I: integer): char; procedure StrSet(C: char; I: integer; var S: string); function AnsiUppercase(S: string): string; function AnsiLowercase(S: string): string; function Uppercase(S: string): string; function Lowercase(S: string): string; function Trim(S: string): string; function Length(S: string): longint; procedure SetLength(var S: string; L: longint); function Sin(E: extended): extended; function Cos(E: extended): extended; function Tan(E: extended): extended; function Cot(E: extended): extended; function Sinh(E: extended): extended; function Cosh(E: extended): extended; function Tanh(E: extended): extended; function Coth(E: extended): extended; function ArcSin(E: extended): extended; function ArcCos(E: extended): extended; function ArcTan2(x, y: extended): extended; //ArcTan2 calculates ArcTan(Y/X) function ArcCot(E: extended): extended; function ArcSinh(E: extended): extended; function ArcCosh(E: extended): extended; function ArcTanh(E: extended): extended; function ArcCoth(E: extended): extended; function Power(x, y: extended): extended; //mocnina x^y function Sqrt(E: extended): extended; function Round(E: extended): longint; function Trunc(E: extended): longint; function Int(E: extended): extended; function Frac(const X: extended): extended; function Pi: extended; function Abs(E: extended): extended; function StrToFloat(S: string): extended; function FloatToStr(E: extended): string; function Padl(S: string; I: longInt): string; function Padr(S: string; I: longInt): string; function Padz(S: string; I: longInt): string; function Replicate(C: char; I: longInt): string; function StringOfChar(C: char; I: longInt): string; function StrToInt64(S: string): int64; function Int64ToStr(I: int64): string; function EncodeDate(Year, Month, Day: word): TDateTime; //pro převod String -> Word je možno použít funkci ''StrToInt'' function EncodeTime(Hour, Min, Sec, MSec: word): TDateTime; //pro převod String -> Word je možno použít funkci ''StrToInt'' function TryEncodeDate(Year, Month, Day: word; var Date: TDateTime): boolean; //pro převod String -> Word je možno použít funkci ''StrToInt'' function TryEncodeTime(Hour, Min, Sec, MSec: word; var Time: TDateTime): boolean; //pro převod String -> Word je možno použít funkci ''StrToInt'' procedure DecodeDate(const DateTime: TDateTime; var Year, Month, Day: word); //pro převod String -> Word je možno použít funkci ''StrToInt'' procedure DecodeTime(const DateTime: TDateTime; var Hour, Min, Sec, MSec: word); //pro převod String -> Word je možno použít funkci ''StrToInt'' function DayOfWeek(const DateTime: TDateTime): word; function Date: TDateTime; function Time: TDateTime; function Now: TDateTime; function DateTimeToUnix(D: TDateTime): int64; function UnixToDateTime(U: int64): TDateTime; function DateToStr(D: TDateTime): string; function StrToDate(const S: string): TDateTime; function FormatDateTime(const FMT: string; D: TDateTime): string;