> if fld_value= then begin.ADD ( select * from + ntable + WHERE + fld_name + =: s_kod );//[0].Value:=DS.FieldByName(fld_name).AsString;.ADD(laquo;select * From + ntable + WHERE + fld_name + =@@identity ); //end dsInsertbegin
//dsUpdate
//Умова пошуку змінною запісі.ADD ( WHERE + fld_name + =: kod ); //laquo;raquo;laquo;+DS.FieldByName(fld).AsString+raquo;laquo;raquo;')[0].Value:=fld_value;;;;.Clear;
//Формуємо оператор зчитування зміненої запісі.ADD ( select * from + ntable + WHERE + fld_name + =: kod ); //laquo;=raquo;laquo;raquo;+DS.FieldByName(fld_name).AsString+laquo;raquo;laquo;raquo;);[0].Value:=DS.FieldByName(fld_name).AsString;;// End dsUpdate
//3. Прочитуємо змінену запис
open;
//4. перечитують поля зміненої записи в поля редагованого НД
for i:=0 to DS.FieldCount - 1 do begin:=DS.Fields [i];:=FindField (q.FieldName); f lt; gt; nil then begin:=q.readOnly;:=q.OnValidate;.readOnly:=false;.OnValidate:=NIL;.value:=f.value;.readOnly:=r;.OnValidate:=o;;;;;.cursor:=crDefault;;end.Urpt;Windows, SysUtils, Messages, Classes, Graphics, Controls ,, ExtCtrls, Forms, QuickRpt, QRCtrls;=class (TQuickRep): TQRBand ;: TQRLabel ;: TQRLabel ;: TQRBand ;: TQRLabel ;: TQRLabel ;: TQRShape ;: TQRShape ;: TQRBand ;: TQRDBText ;: TQRBand ;: TQRSysData ;: TQRBand ;: TQRSysData ;: TQRLabel ;: TQRLabel ;: TQRLabel ;: TQRLabel ;: TQRShape ;: TQRShape ;: TQRDBText ;: TQRDBText ;: TQRGroup ;: TQRLabel ;: TQRDBText ;: TQRBand ;: TQRExpr ;: TQRExpr ;: TQRBand ;: TQRExpr ;: TQRExpr ;: TQRLabel ;: TQRLabel ;: TQRShape ;: TQRShape ;: TQRShape ;: TQRShape ;: TQRShape ;;: TFrmRpt; uDM;
{$ R * .DFM}
end.
Висновки
У ході виконання курсової роботи розроблено і налагоджений програмний проект для здійснення автоматизованого обліку оплати навчання. У його рамках була спроектована база даних, що включає в себе інформацію про студентів, факультетах, групах, договорах, а також інформація про оплату і вартості навчання.
Розроблена програма дозволяє вести облік оплати навчання в кількісному і вартісному вираженні, вести облік відсотка оплати та заборгованостей, здійснювати зручний перегляд і редагування даних, а також дозволяє отримати звіт про заборгованості на певну дату заданого курсу.
програмний навчання алгоритм звіт
Список використаних джерел
1.Голованов М., Веселов Створення компонентів у средеDelphi. Керівництво розробника; Е .; Рік: 2004, 320 с.;
2.Кренке Д. Теорія і практика побудови баз даних: [пер.с англ]/Д. Кренке.- 9 - е вид.- СПб .: Питер, 2005. - 858 с.
3.Delphi +2006 на прикладах (CD-ROM): Володимир Шупрута - Москва, БХВ-Петербург, 2006 р - 528 с.
4.Delphi 7. Основи програмування. Рішення типових задач. Самовчитель: Л.М. Климова - Санкт-Петербург, КУДИЦ-Образ, 2006 - 480 с.
.Delphi. Професійне програмування: Дмитро Осипов - Москва, Символ-Плюс, 2006 - 1056 с.
.Основи програмування в інтегрованому середовищі Delphi. Практикум: А. Желонкин - Санкт-Петербург, Біном. Лабораторія знань, 2006 - 240 с.
.Программірованіе в Turbo Pascal. Перехід до Delphi (+ CD-ROM): Ю. А. Шпак - Санкт-Петербург, МК-Пресс, 2006 - 416 с.
.Программіруем в Turbo Delphi: С.А. Любавін - Москва, НТ Пресс, 2008 - 320 с.