Таырыбы: QUERY мліметтер жиыны.
Масаты: SQL-сранысыны кмегімен мліметтер базасыны кестесін ру.
Query компоненті SQL-сранысыны орындалуы нтижесінде жазбалары рылатын мліметтер жиынын білдіреді. Сраныс мтіні SQL асиеттерінде орналасады, оны негізінде мліметтер жиынына жазбалар іріктеледі.
Сраныс SQL тіліндегі командалардан трады жне мліметтер жиыны ашылан кезде орындалады. Сраныс бл сраты анааттандыратын жазба немесе кптеген жазбаларды айтаратын мліметтер базасына ойылатын сра.
адам1. Жаа каталог рыыз жне оан Demo-Query атты псевдоним крсетііз. Delphi7 бадарламасын жктеп, форма бетіне суретте крсетілгендей етіп DBGrid1, Button1, Button2, Button3, Button4, DataSource1, Query1 компоненттерін орналастырыыз.
Сур.10. Сраныс кмегімен кесте ру терезесі
адам2. Пндер кестесін ру батырмасыны OnClick оиасыны деуішін рып, оан тмендегі келесі кодты жазыыз:
procedure TForm1.Button1Click(Sender: TObject); begin
Query1.DatabaseName:='Demo-Query';
with Query1 do
begin
SQL.Clear;
SQL.Add('Create Table Predmet ('); SQL.Add('Cod char (10) ,'); SQL.Add('Nazvanie char (15) ,'); SQL.Add('Prepodavatel char (15));');
try
ExecSQL;
except
on E:EDBEngineError do
begin
ShowMessage('МБ кестесін ру кезіндегі ате'+#13+E.Меssage);
end;
end;
end;
Query 1. Active :=false; Query1.SQL.Clear;
Query 1. S QL .Add('select*from predmet .db');
Query1.ExecSQL;
Query1.Active:=true;
end;
Осылайша біз Пндер кестесін рды.
адамЗ. Осындай жолмен крші екі батырмаа Магистранттер жне Баалар деген екі кесте рыыз.
«Пндер» кестесі
| Пнні коды | Пнні аты | Оытушы |
«Магистранттер» кестесі
| Сына кітапшасыны № | Фамилия | Аты |
«Баалар» кестесі
| № | Магистрантті фамилиясы | Пнні аты | Баа |
адам4. айтадан жаа форма рып, оны негізгі ылыыз жне оан Button компоненттерін орналастырыыз.
SQL-сранысыны кмегімен кесте ру батырмасыны OnClick оиасыны деуішіне келесі кодты жазыыз:
form1.show; form2.Hide;
Батырмалара сйкес форма рып, олара да осындай код жазыыз.
Таырыпа байланысты баылау сратары:
1. Query компоненті андай ызмет атарады?
2. Сраныс дегеніміз не?
3. SQL-сранысы нені антайды?
6. Магистранттарды зіндік жмыстарыны таырыптары