Dynamické hodnoty v rozbalovacím seznamu: Porovnání verzí

Z enTeam
Skočit na navigaci Skočit na vyhledávání
 
(Není zobrazena jedna mezilehlá verze od stejného uživatele.)
Řádek 8: Řádek 8:
 
declare procedure FileDelete dll "ActualDocument" (string)
 
declare procedure FileDelete dll "ActualDocument" (string)
  
script testMasky (): Boolean
+
script TestMasky(): boolean
var temp : String
+
var
 +
  TEMP: string
 +
  FileName: string
 
begin
 
begin
   GetTemp(temp)   //nalezení windows temp adresáře
+
   GetTemp(TEMP) // Nalezení Windows temp adresáře
   temp += "\file.txt"
+
   FileName := TEMP + "\Users.txt"
   SaveUsersToFileExt ("allUsers", temp, actualdocument)   //uložení seznamu všech uživatelů do souboru %temp%\file.txt, jehož obsah maska zobrazí v rozbalovacím seznamu
+
   SaveUsersToFileExt("allUsers", FileName, actualdocument) // Uložení seznamu všech uživatelů do souboru %temp%\Users.txt, jehož obsah maska zobrazí v rozbalovacím seznamu
   idx("testMasky")
+
   idx("TestMasky")
   FileDelete(temp)   //smazání dočasného souboru
+
   FileDelete(FileName) // Smazání dočasného souboru
 
end
 
end
 
</pre>
 
</pre>
  
  
Maska "testMasky" obsahuje ovládací prvek "rozbalovací seznam", který načítá hodnoty ze souboru "%temp%\file.txt"
+
Maska "TestMasky" obsahuje ovládací prvek "rozbalovací seznam", který načítá hodnoty ze souboru "%temp%\Users.txt"
  
 
Zpět na stránku [[Prováděcí skripty]]
 
Zpět na stránku [[Prováděcí skripty]]
[[Category: MTB skripty]]
+
[[Category: enTeam skripty]]

Aktuální verze z 22. 12. 2020, 21:32

Ovládací prvek masky zvaný "Rozbalovací seznam" může mít pevně definován seznam výběrových hodnot a nebo je možné tento seznam ve skriptu dynamicky vytvořit před zobrazením masky. Dynamický seznam je třeba uložit do txt souboru, kde každá hodnota je uložena na samostatném řádku. Tento soubor je možné umístit do libovolného umístění, na které se lze odkázat pomocí Windows proměnné.


Ukázka skriptu, který připraví hodnoty pro rozbalovací seznam

declare procedure GetTemp dll "ActualDocument" (string)
declare procedure SaveUsersToFileExt dll "ActualDocument" (string, string, pointer)
declare procedure FileDelete dll "ActualDocument" (string)

script TestMasky(): boolean
var
  TEMP: string
  FileName: string
begin
  GetTemp(TEMP) // Nalezení Windows temp adresáře
  FileName := TEMP + "\Users.txt"
  SaveUsersToFileExt("allUsers", FileName, actualdocument) // Uložení seznamu všech uživatelů do souboru %temp%\Users.txt, jehož obsah maska zobrazí v rozbalovacím seznamu
  idx("TestMasky")
  FileDelete(FileName) // Smazání dočasného souboru
end


Maska "TestMasky" obsahuje ovládací prvek "rozbalovací seznam", který načítá hodnoty ze souboru "%temp%\Users.txt"

Zpět na stránku Prováděcí skripty