Skriptovací jazyk - funkce
Z K.A.P.
Skočit na navigaciSkočit na vyhledávání| Funkce | Popis | |
| Function DelAll(s: String) : String | Ve skriptovacím jazyce jsou k dispozici funkce zajišťující kompatibilitu s množinou funkcí dostupnou v rámci vyhodnocování výrazů v jiných částech programu (např. generátor sestav,filtrování pomocí výběrových podmínek). Syntaxe je stejná nebo obdobná. | |
| Function DelLeft(s: String) : String | ||
| Function DelRight(s: String) : String | ||
| Function EnumStr(s: String; Index: integer; Delimiter:Char = '/‘) : String | ||
| Function GetVar(VarName: String) : String | ||
| Function Left(s: String; Count: Integer) : String | ||
| Function Len(s: String) : Integer | ||
| Function Mid(s: String; Index, Count: Integer) : String | ||
| Function PosUp(SubStr, Source: String) : Integer | ||
| Procedure SetVar(Name: String; Value: Variant) | ||
| Function Str(Num: Extended; Size, Decimal: integer) : String | ||
| Function Right(s: String; Count: Integer) : String | ||
| Function Using(s: String, Size: Integer) : String | ||
| Function Val(s: String) : Extended | ||
| Function WinFmt(s: String) : String | ||
| Function DateValue(Datum: String):Integer | ||
| Function DV(Datum: String):Integer | ||
| Function StrDate(Datum: Integer):String | ||
| Function Abs(e: Extended): Extended | ||
| Function Trim(s: String): String | ||
| Function Conv(s: String; CP: Byte) : String | Převede text v kódování Windows do jiné kódové stránky.
Hodnoty pro CP: | |
| 0 | ASCII | |
| 1 | Kamenický (CP 895) | |
| 2 | ASCII2 (ASCII s rámečky) | |
| 3 | LATIN2 (CP 852) | |
| 4 | Windows 1250 | |
| Function Date: TDateTime | Vrací hodnotu aktuálního data (jako číslo). | |
| Function Time: TDateTime | Vrací hodnotu aktuálního času (jako číslo). | |
| Function Now: TDateTime | Vrací hodnotu aktuálního data a času (jako číslo). | |
| Function IfS(Condition: Boolean; IfTrue, IfFalse: String) : String | Funkce vyhodnotí podmínku, pokud bude hodnota True, tak vrátí text z parametru IfTrue, při False vrátí text z IfFalse. Parametry IfTrue, IfFalse i výsledek funkce jsou typu string | |
| Function IfL(Condition: Boolean; IfTrue, IfFalse: Integer) : Integer | Funkce vyhodnotí podmínku, pokud bude hodnota True, tak vrátí číslo z parametru IfTrue, při False vrátí číslo z IfFalse. Parametry IfTrue, IfFalse i výsledek funkce jsou typu celé číslo. | |
| Function IniReadString(Sekce: String; Promenna: Byte; TestUzivatel: Boolean; Sklad: integer; Default: String): String | vrací textovou hodnotu proměnné z CISELNIK.BTR (číselník 161) | |
| Function IniWriteString(Sekce : String; Promenna : Byte; TestUzivatel: Boolean; Sklad: integer; Hodnota: String): Boolean | zapisuje hodnotu proměnné (TestUzivatel=true: platí jen pro akt.uživatele; Sklad=0:platí pro všechny sklady) | |
| Function IniReadInteger(Sekce : String; Promenna : Byte; TestUzivatel: Boolean; Sklad: integer; Default: integer): integer | vrací číselnou hodnotu proměnné | |
| Function IniWriteInteger(Sekce : String; Promenna : Byte; TestUzivatel: Boolean; Sklad: integer; Hodnota: integer): Boolean | zapisuje číselnou hodnotu proměnné | |
| Procedure LogWrite(Msg : String) | zapisuje informaci Msg do textového logu aplikace | |
| Function FileExists(FileName: String):String | Testuje, jestli soubor specifikovaný parametrem FileName existuje | |
| Function FileAge(FileName: string): TDateTime | Vrací datum a čas poslední změny souboru nebo zápornou hodnotu, pokud soubor neexistuje | |
| Function DeleteFile(FileName: string): Boolean | Smaže soubor FileName z disku | |
| Function RemoveDir(Dir: string): Boolean | Smaže neprázdnou složku Dir z disku | |
| Function DirectoryExists(Dir: String):String | Testuje, jestli složka specifikovaná parametrem Dir existuje | |
| Function CreateDir(Dir: string): Boolean | Vytvoří složku specifikovanou parametrem Dir | |
| Function RenameFile(OldName: string; NewName: string): Boolean | Přejmenuje soubor OldName na soubor NewName | |
| Function ExtractFileName(FileName: String):String | Z textového parametru FileName obsahujícího celé jméno souboru vrátí jen jméno souboru včetně přípony | |
| Function ExtractFileExt(FileName: String):String | Z textového parametru FileName obsahujícího celé jméno souboru vrátí jen příponu souboru včetně případné tečky | |
| Function ChangeFileExt(FileName, NewExt: String):String | Funkce vezme textového parametru FileName obsahujícího celé jméno souboru a vrátí jméno souboru , ve kterém je nahrazena přípona souboru dle přípony určené parametrem NewExt. Parametr NewExt může obsahovat počáteční tečku. Funkce nepřejmenovává samotný soubor, jen vrací text obsahující jméno souboru se změněnou příponou. | |
| Function SetCurrentDir(Dir: string): Boolean | Nastaví aktuální pracovní adresář podle parametru Dir | |
| Function GetCurrentDir: string | Vrací aktuální pracovní adresář | |
| Function GetEnvironmentVariable(Name: string): string | Vrací hodnotu proměnné Name z prostředí | |
| Function ParamStr(Index: Integer): string | Vrací parametr ze seznamu parametrů určených při spouštění programu | |
| Function ParamCount: Integer | Vrací počet parametrů v seznamu parametrů určených při spouštění programu | |
| Function RunExternalCommand(CmdLine: String; WaitToEnd: Boolean = False; CurrentDirectory: String = ' '; AppName: String = ' ' ): Cardinal | Funkce spustí externí aplikaci (s případnými parametry) určenou parametrem CmdLine pomocí CreateProcess. Pokud je parametr WaitToEnd nastaven na true, tak program čeká na dokončení externí aplikace. | |
| Function GSRunReport(SkupinaSestav : Integer; SestavaCislo : Integer; Parametry: String): String; | Funkce spustí určenou sestavu z generátoru sestav. Parametry sestavy jsou složeny v jednom textovém parametru. | |
| Function GSRunReportV(SkupinaSestav : Integer; SestavaCislo : Integer; JmenaParametru: Array of String; Hodnoty: array of Variant): String; | Funkce spustí určenou sestavu z generátoru sestav. Parametry sestavy jsou předávány formou seznamu jmen proměnných a druhého seznamu obsahující odpovídající hodnoty proměnných. | |
| Function SendMailBySMTP(From, SendTo, FileAttach, Subject, SMTPServer, SMTPSenderName, SMTPPassword, BodyString : String; var ErrMessage : String) : Boolean; | Funkce pošle e-mail na určenou adresu pomocí protokolu SMTP | |
| Function MsgDlg(AText, ACaption: String; DlgType: TMsgDlgType; Buttons: Integer; btnCaptions: String = ' '): TModalResult; | zobrazí dialog s jedním nebo více tlačítky | |
| Function CreateADOConnectionStringDlg(ConnectionString: String): String; | zobrazí dialog pro nastavení ConnectionString v databázovém prostředí ADO | |
| Function GetAppBaseRegistryKey: String; | vrací základní klíč aplikace, ve kterém jsou ukládány vybrané parametry (v registru Windows) | |
| Function BtrBeginTransaction: Boolean; | Zahájí transakci (pro práci s BTR tabulkami). Každá transakce musí být ukončena pomocí BtrEndTransaction nebo BtrAbortTransaction. | |
| Procedure BtrEndTransaction; | ukončí transakci a potvrdí změny (pro práci s BTR tabulkami) | |
| Procedure BtrAbortTransaction; | zruší transakci a případné změny od zahájení transakce vrátí zpět (pro práci s BTR tabulkami) | |