Skriptovací jazyk - funkce: Porovnání verzí
Z K.A.P.
Skočit na navigaciSkočit na vyhledáváním (nové funkce ExtracrFileName a další) |
m |
||
Řádek 66: | Řádek 66: | ||
|'''''Function IfL(Condition: Boolean; IfTrue, IfFalse: Integer) : Integer '''''||colspan=2|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 IfL(Condition: Boolean; IfTrue, IfFalse: Integer) : Integer '''''||colspan=2|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. | ||
|-valign=top | |-valign=top | ||
− | |'''''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 IniReadString(Sekce: String; Promenna: Byte; TestUzivatel: Boolean; Sklad: integer; Default: String): String'''''||colspan=2|vrací textovou hodnotu proměnné z CISELNIK.BTR (číselník 161) |
|-valign=top | |-valign=top | ||
− | |''''' 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 IniWriteString(Sekce : String; Promenna : Byte; TestUzivatel: Boolean; Sklad: integer; Hodnota: String): Boolean'''''||colspan=2|zapisuje hodnotu proměnné (TestUzivatel=true: platí jen pro akt.uživatele; Sklad=0:platí pro všechny sklady) |
|-valign=top | |-valign=top | ||
− | |''''' Function IniReadInteger(Sekce : String; Promenna : Byte; TestUzivatel: Boolean; Sklad: integer; Default: integer): integer'''''||vrací číselnou hodnotu proměnné | + | |''''' Function IniReadInteger(Sekce : String; Promenna : Byte; TestUzivatel: Boolean; Sklad: integer; Default: integer): integer'''''||colspan=2|vrací číselnou hodnotu proměnné |
|-valign=top | |-valign=top | ||
− | |''''' Function IniWriteInteger(Sekce : String; Promenna : Byte; TestUzivatel: Boolean; Sklad: integer; Hodnota: integer): Boolean'''''||zapisuje číselnou hodnotu proměnné | + | |''''' Function IniWriteInteger(Sekce : String; Promenna : Byte; TestUzivatel: Boolean; Sklad: integer; Hodnota: integer): Boolean'''''||colspan=2|zapisuje číselnou hodnotu proměnné |
|-valign=top | |-valign=top | ||
− | |''''' Procedure LogWrite(Msg : String)'''''||zapisuje informaci Msg do textového logu aplikace | + | |''''' Procedure LogWrite(Msg : String)'''''||colspan=2|zapisuje informaci Msg do textového logu aplikace |
|-valign=top | |-valign=top | ||
− | |''''' 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 ExtractFileName(FileName: String):String'''''||colspan=2|Z textového parametru FileName obsahujícího celé jméno souboru vrátí jen jméno souboru včetně přípony |
|-valign=top | |-valign=top | ||
− | |''''' 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 ExtractFileExt(FileName: String):String'''''||colspan=2|Z textového parametru FileName obsahujícího celé jméno souboru vrátí jen příponu souboru včetně případné tečky |
|-valign=top | |-valign=top | ||
− | |''''' 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 ChangeFileExt(FileName, NewExt: String):String'''''||colspan=2|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. |
|-valign=top | |-valign=top | ||
− | |''''' 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 RunExternalCommand(CmdLine: String; WaitToEnd: Boolean = False; CurrentDirectory: String = ''; AppName: String = ''): Cardinal'''''||colspan=2|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. |
|} | |} |
Verze z 1. 12. 2012, 21:48
Funkce | Popis | |
Function DelAll(s: String) : String | Do skriptovacího jazyka doplněny 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 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 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. |