TDataSet

Razred TDataSet vsebuje informacije o nizih podatkov v podatkovni plasti.

Lastnosti niza podatkov

Lastnosti niza podatkov se običajno nastavljajo v Urejevalnik niza podatkov, možen pa je tudi dostop do vseh podatkov preko basica.

Dim L as TLayer, D As TDataSet, I As Long
L = [Neka plast]
For I = 0 To L.DataSetCount - 1
  D = L.DataSets (I)
  Message ("Lastnosti niza podatkov", 
    "Ime: " + D.Name + Line +
    "Dodatno ime: " + D.Alias + Line +
    "Komentar: " + D.Comment + Line +
    "ID: $" + IntToHex (D.ID) + Line +
    "Podatkovna plast: " + D.Parent.Name
  )
Next

Name

Lastnost Name določa ime niza podatkov v podatkovni plasti.

Property TDataSet.Name As String
Result	String	Ime niza podatkov.

Alias

Lastnost Alias določa dodatno ime niza podatkov v podatkovni plasti, ki se ga lahko uporabi v TLayer.DataSetsByName.

Property TDataSet.Alias As String
Result	String	Dodatno ime.

Comment

Lastnost Comment določa komentar niza podatkov.

Property TDataSet.Comment As String
Result	String	Komentar.

ID

Lastnost ID vrne unikatni identifikator niza podatkovne plasti, ki se samodejno kreira pri kreiranju dataseta in se nikdar ne spremeni.

RO Property TDataSet.ID As Long
Result	Long	Identifikator.

Identifikator niza podatkovne plasti se uporablja interno v bazah podatkovnih plasti kot identifikator podatkov. Vsebovan je tudi pri identifikatorju polja TField.ID kot HiWord.

Parent

Lastnost Parent določa kateri podatkovni plasti imenovan niz podatkov pripada.

Property TDataSet.Parent As TLayer
Result	TLayer	Podatkovna plast.

DatasetType

Lastnost DatasetType določa tip dataseta.

Property TDataSet.DatasetType As Long
Result	Long	Tip dataseta.

Uporablja se lahko naslednje vrednosti:

• 0 Enojni niz podatkov
• 1 Večkratni niz podatkov
• 2 Navidezni v tabelo
• 3 Navidezni v podatkovno plast
• 4 Navidezni v ODBC
• 5 Navidezni v index podatkovne plasti
• 6 Navidezni v polje

Lookup

Lastnost Lookup določa definicijo navideznega dataseta.

Property TDataSet.Lookup As String
Result	String	Definicija navideznega dataseta.

Polja

Dim L as TLayer, D As TDataSet, F As TField
// primer izbriše vsa polja prvega niza in doda 2 polji
L = [Neka plast]
D = L.Datasets (0)
While D.FieldCount > 0 
  D.Fields(0).Delete
Wend
F = D.FieldAdd
F.Name = 'Dodano polje'
F = D.FieldInsert(0)
F.Name = 'Vrinjeno polja'
L.Store

FieldCount

Lastnost FieldCount vrne število polj v nizu podatkov.

RO Property TDataSet.FieldCount As Long
Result	Long	Število polj.

Fields

Lastnost Fields vrne index-to polje v nizu podatkov.

RO Property TDataSet.Fields (Index As Long) As TField
Index	Long	Index polja. Prvo polje ima index 0.
Result	TField	TField objekt.

FieldAdd

Lastnost FieldAdd doda novo polje v niz podatkov.

RO Property TDataSet.FieldAdd As TField
Result	TField	Novo polje.

FieldInsert

Lastnost FieldInsert vrine novo polje v obstoječi niz podatkov.

RO Property TDataSet.FieldInsert (Index As Long) As TField
Index	Long	Mesto novega polja. Prvo polje ima index 0.
Result	TField	Novo polje.

AddFieldsFromFile

Metoda AddFieldsFromFile doda v niz podatkov vsa polja in njihove tipe iz DBase datoteke (*.dbf). DBF datoteka je vedno podatkovni del SHP datotek.

Method TDataSet.AddFieldsFromFile (FileName As String)
FileName	String	Ime datoteke.

Razno

CurrentRecord

Lastnost CurrentRecord Lastnost vsebuje kazalec na tekoči zapis podatkovne plasti, in je enaka za TLayer.CurrentRecord in TField.CurrentRecord lastnosti ter CurrentRecord lastnosti vseh nizov podatkovne plasti. Če jo spremenite, se spremeni tudi v obeh naštetih objektih. Uporabna je npr v TField.AsString lastnosti in v nekaterih drugih za ta razred.

Property TDataSet.CurrentRecord As TRecord
Result	TRecord	Trenutni zapis.

Dim L as TLayer
L = [Neka plast]
L.Datasets (0).CurrentRecord = L.AllRecords.Items (0)