.


:




:

































 

 

 

 


қ ұ 13




қ: ә құ.

қ: Filter, FilterOptions, IndexName, IndexFieldName қң ә ixDescending ң қ ң

 

ү () - ұ ә ғ қ. ү () қ ә ғ құ қғ қғ ә ү . ғ ү () ү, қ Table ә ә қң қ ұ. Delphi ү ү () ө ә ү ү . ү ү Filter қ қ. ү () FilterOptions қң ө . ү ү ү () ү.

Қ 1. ң: 3 RadioButton ққ, Edit RadioGroup, 2 Data TimePicker (Win32 ) ә Button.

ү () ү ң:

procedure TForm2.Button4Click(Sender: TObject); begin

Table1.FilterOptions:=[foCaseInsensitive]; Table1.Filtered:=true;

//

if RadioButton1.Checked then Table1.Filter:=TamU- ' '+Edit1.Text+' ' '

//

if RadioButton2.Checked then Table1.Filter:='DataStU >=' ' ' +DateToStr(DateTimePicker1.Date)+' ' ' and DataStU <=' ' '

+DateToStr(DateTimePicker2.Date)+' ' ' ';

if RadioButton3.Checked then Table1.Filter:=' end;

 

Қ 2. () қғ ө ү , ө () ү ү ө қ қ.

() ғ ғғ ң ixDescending қ, ө ә әң ө . ғғ IndexName ә IndexFieldName қң ө . ұ қ - ққ ғ . IndexName қң ә ө, IndexFieldName қң ә , ә құ, ө ө.

Delphi- , Database Desktop ғ ү, Ү ң қ ң ө, , ә, ғ, ө ә indNZachet, indFamU, indPredU, indOcenkaU, indDataStU құң.

 

Қ 3. Қ Delphi ү ү, RadioGroup String List Editor ң ө ә ә ң ә OnClick қғң өң ң:

procedure TForm2.RadioGroup1Click(Sender: TObject);

begin

case RadioGroup1.ItemIndex of 0: Table1.IndexName:='indNZachet'; 1: Table1.IndexName:='indFamU'; 2: TableUndexName:-indPredU'; 3: Table1.IndexName:='indOcenka'; 4: Table1.IndexName:='indDataStU'; end; end;

 

:

1. қ ү ұң.

2. қ ұң.

 

ққ қ ұқ:

1. ү ?

2. ?

3. ү қ ұ?

4. қ ұ?





:


: 2016-12-05; !; : 479 |


:

:

, , 1:10
==> ...

1712 - | 1645 -


© 2015-2024 lektsii.org - -

: 0.008 .