534______________________________________________ 9

, 

Tablel->IndexFieldNames = "Fam";

Tablel->SetRangeStart () ;

Tablel->FieldByName("Fam")->AsString = "A";

Tablel->SetRangeEnd() ;

Tablel->FieldByName("Fam")->AsString = "";

Tablel->ApplyRange() ;

  ,      ,  -
    , , ».

    SetRangeStart  SetRangeEnd   -
     KeyExclusive.  ,   -
       ( KeyExclusive = false, 
   ),    ( KeyExclusive = true).
 ,  KeyExclusive = false    >, <, 
 KeyExclusive = true  >, < ,     ,  -
       ,   

Tablel->IndexFieldNames = "Year b";

Tablel->SetRangeStart();       ~
Tablel->FieldByName("Year_b")->AsInteger = 1950;

Tablel->SetRangeEnd() ;

Tablel->FieldByName("Year_b")->AsInteger = 1960;

Tablel->ApplyRange() ;

  ,        1950  1960,
  1950  1960.   

Tablel->IndexFieldNames = "Year_b";

Tablel->SetRangeStart() ;

Tablel->FieldByName("Year_b")->AsInteger = 1950;

Tabiel->KeyExclusive = true;

Tablel->SetRangeEnd();

Tablel->FieldByName("Year_b")->AsInteger = 1960;

Tablel->ApplyRange() ;

,  1950 ,     .

         SetRange. 
  :

void   fastcall SetRange(const System::TVarRec * StartValues,
const int StartValues Size,
const System:: TVarRec * EndValues,
const int EndValues Size) ;

  StartValues  EndValues   -
      ,  . -
 ,  SetRange     
SetRangeStart, SetRangeEnd  ApplyRange. ,   -
,      ,   
:

Tablel->IndexFieldNames = "Fam";

Tablel->SetRange(&TVarRec("A"),0,&TVarRec("") ,0);

, ,        
 TVarRec ( ,  OPENARRAY),    9.11.6.

        ,  
    »,     ,     1,  -
      :

Tablel->IndexFieldNames = "Dep;Fam";

Tablel->SetRange(OPENARRAY(TVarRec,(" I","A")),

OPENARRAY(TVarRec,(" 1","")));