Зертханалық жұмыс №1 «Қойма» деректер қорын басқару жүйесін құру


procedure TForm1.Number-ptClick (Sender: TObject); begin



бет98/100
Дата06.02.2022
өлшемі1,89 Mb.
#53051
1   ...   92   93   94   95   96   97   98   99   100
Байланысты:
БД-зертханалық жұмыс

procedure TForm1.Number-ptClick (Sender: TObject);
begin
Form1.Table1.IndexName := ‘Number’;
Form1.Table1.SetKey;
Form1.Table1.GotoNearest;
end;


12. Фамилиясы бойынша сорттауда OnClick оқиғасында келесі кодтты жазу керек:
procedure TForm1.Family2-ptClick (Sender: TObject);
begin
Form1.Table1.IndexName := ‘FamilyIndex’;
Form1.Table1.SetKey;
Form1.Table1.FieldByName(‘Family’).AsString := ‘A’;
Form1.Table1.GotoNearest;
end;


13. Run|Run командасы арқылы бағдарламаны іске қосамыз.


14. Қосымшаны шығу батырмасын басып,немесе файл\шығу арқылы жабамыз.


15. Жобадағы барлық өзгертулерді сақтаймыз.
Зертханалық жұмыс №4 «Кітапхана жүйесі» деректер қорын басқару жүйесін құру


Зертханалық жұмыстың мақсаты: «Кітапхана жүйесі» ДҚБЖ алдын ала жобалап, меңгерілген теориялық мәліметтерге сүйеніп жүйені құру.




Достарыңызбен бөлісу:
1   ...   92   93   94   95   96   97   98   99   100




©engime.org 2024
әкімшілігінің қараңыз

    Басты бет