Promotic
WikipediaLinkedInYoutubeTwitterFacebook

FieldValues - vlastnost objektu PmDatabase

Popis:
Vlastnost reprezentuje hodnotu aktuálního řádku (určeného například voláním metody Move) a daného sloupce tabulky (určeného parametrem vField).
Syntaxe:
FieldValues([vField As Variant]) As Variant
Volání:
x = oDb.FieldValues(vField)
Parametry:
vField[nepovinné] (Variant) Název sloupce tabulky nebo jeho index (indexováno od 0). Pokud tento parametr není zadán, pak vlastnost čte celý řádek tabulky/zapisuje do celého řádku tabulky proměnnou typu Array (pole).
Poznámka:
Vlastnost je určena pro čtení i zápis. Pokud je touto vlastností čtena z tabulky 'prázdná hodnota' (<Null>), lze definovat metodou SetNullValue náhradní hodnotu, jenž bude vrácena místo této prázdné hodnoty. Tato náhradní hodnota je platná až do příštího volání SetNullValue.
Příklad1:
Dim x
' čtení ze sloupce s názvem "column1" prvního řádku tabulky
If oDb.IsOpen Then
  oDb.MoveFirst
  x = oDb.FieldValues("column1")
  Pm.Debug x
' čtení z prvního sloupce druhého řádku tabulky
  oDb.MoveNext
  x = oDb.FieldValues(0)
  Pm.Debug x
' zápis do třetího sloupce druhého řádku tabulky
  x = 100
  oDb.FieldValues(2) = x
  Pm.Debug x
End If
Příklad2:
Zápis do více sloupců v prvním řádku tabulky pomocí metody Edit. V tomto případě je to lepší způsob, než nastavovat vlastnost FieldValues opakovaně samostatně bez Edit.
If oDb.IsOpen Then
  oDb.MoveFirst
  oDb.Edit
  oDb.FieldValues(0)= 1
  oDb.FieldValues(1)= 12
  oDb.FieldValues(2)= "Text"
  oDb.Update
End If
Příklad3:
Zápis do více sloupců v prvním řádku tabulky pomocí Array (pole) hodnot.
Dim arr
If oDb.IsOpen Then
  arr = Array(1,12,"Note")
  oDb.MoveFirst
  oDb.FieldValues = arr
End If
© MICROSYS, spol. s r. o.Tavičská 845/21 703 00 Ostrava-Vítkovice