Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
колледж_каз_лаб.doc
Скачиваний:
0
Добавлен:
01.05.2025
Размер:
1.51 Mб
Скачать

Ол үшін мәліметтер жиыны dsBrowse қарап шығу режимінде болуы қажет.

EditButton батырмасын басқандағы өңдеушіні анықтаймыз:

Procedure TForm 2. EditButtonClick ( Sender : TObject );

Begin

DataModule 5. Table 3. Edit ;

End ;

Edit әдісі Table1-дегі мәліметтер жиынын dsEdit жазба қосу жағдайына көшіреді. Алаңдар мәнін редакторлау DBEdit-1 DBLookupComboBox 1, DBEdit 2 компаненттермен жүзеге асырылады. Ол үшін мәліметтер жиыны dsBrowse жазбаларды қарау режимінде тұру керек.

DeleteButton :батырмасын басқандағы өңдеушіні анықтаймыз:

Procedure TForm 2. DeleteButtonClick ( Sender : TObject );

Begin

IF MessageDlg (' растаудың жазу қашықтауы ', mtConfirmation ,[ mbYes , mbNo ],0)= mrYes THEN DataModule 5. Table 3. Delete ;

End ;

Table мәліметтер жиыны dsBrowse жазбаларды қарау режимінде болса, диалогты терезе шақырылады (Message Dlg функция орындалуда) егер қолданушы Yes батырмасын басса, Table1 мәліметтер жиынындағы жазбаларды өшіруге болады.

PostButton батырмасын басқандағы өңдеушіні анықтаймыз:

Procedure TForm 2. PostButtonClick ( Sender : TObject );

Begin

DataModule 5. Table 3. Post ;

End ;

Егер мәліметтер жиыны жаңа жазба қосу немесе редакторлау режимінде орналасса, ДҚ кестесіндегі ағымды жазба жағдайын еске сақтайтын Post мәліметтер жиыны әдісі орындалады. Мәліметтер жиынын есте сақтағаннан кейін dsBrowse қарау режимі жүргізіледі.

CancelButton батырмасын басқандағы өңдеушіні анықтаймыз:

Procedure TForm 2. CancelButtonClick ( Sender : TObject );

Begin

Close ;

Form 1. Visible := true ;

End ;

Егер мәліметтер жиыны жаңа жазба қосу немесе редакторлау режимінде орналасса, Cancel мәліметтер жиыны әдісі ДҚ кестесіндегі жазбаларды есте сақтауды алып тастайды және мәліметтер жиынын қарау режиміне ауыстырады және меню формасына өтеді.

Мәліметтер жиынына мәліметтер қосу және өзгерту сонымен қатар DBGrid қасиетіне True мәнін орнатамыз. Жаңа жазба қосқан немесе бар алаңды түзету кезінде, DBEdit 1, DBEdit 2 компонентеріне DBLookupComboBox компонентіндегі мәндер тізімінен таңдау жолымен енгізуді қолданып мәндерді енгізуге болады. (28сурет) Жазбаларды өзгерту кезінде диалог терезесі беріледі.(29 сурет)

Сурет 28. Жаңа жазба қосу

Жазбаны өшірген кезде келесі диалогты терезе шығады (сурет 29).

Сурет 29. Жазбаны өшіруді растау терезесі

Дқ мазмұнын ұсыну үшін өте күрделі экрандық формалар Экрандық формадағы tdbGrid модификация варианттары

N_Prih Prihod кестесіндегі уникальдықты қамтамасыз ету үшін N_Prih алаңының мәнін байқауға қажет және басқа ешбір күш түсірмейді. Cондықтан берілген алаңға ең жақсысы DBGrid2 бағаналарының құрамында көрсетпеу. ДҚ кестесі алаңынан қайсысын мәліметтер жиыны үшін қосымшадан қолданудан Delphi-де сілтеудің екі мүмкіндігі бар.

Бірінші әдіс осы мәліметтер жиыны ассоцияланған. ДҚ кестесінен барлық алаңды үнсіздікпен қолдану, бұл әдіс әрқалай үнсіздікпен орындалады және Table1 және Table 2 мәліметтер жиынын құру кезінде анық емес қолданылады.

Екінші әдіс ассоцияланған мәліметтер жиынымен ДҚ кестелерінің бағыныңқы жазба алаңын қолданудан тұрады.

Осы мақсатта мәліметтер жиынының редактор алаңы қолданылады, ол мәліметтер жиынының өңделетін алаңын құру ДҚ кестелерінің бағыныңқы жазба алаңында немесе барлық алаңды қосуға мүмкіндік береді.

DataModule 5 компонентінен тышқан көмегімен Таblе2 компанентін таңдаймыз. Экранда пайда болған қалқыйтын менюден Fields Editor элементін таңдаймыз. Редактор алаңында (сурет 30 ) пайда болған тізімнен тышқанның бірінші бастырмасын менюден Add Fields меню элементін таңдаймыз.

ДҚ Prihod кестесінің барлық алаңдар тізімі көрсетіледі.

N _ Prih (сурет 30.6) алаңынан басқа барлық алаңды белгілеген (мен Shift бастырмасы көмегімен), Add бастырмасын басамыз. Енді редактор алаңы тізіміне белгіленген алаңының бәрі қосылады.(сурет 30.6)

а) б) в)

Сурет.30. Редактор алаңымен жұмыс:

а) редактора алаңының бос тізімі; б)алаң қосу; в) редактора алаңының толтырылған тізімі.

№3 формасындағы DBGrid 2 бағандары құрамында, енді Table 2 мәліметтер жиыны үшін редактор алаңынан қосылған алаңдар ғана бар болатынын байқауға болады.

Редактор алаңдарында мәліметтер жиынының алаңдар тізімін анықтау (Таblе2-нің тышқанның оң батырмасын басып тұрғанда) мынаған келеді, осындай жолмен қосылған Delphi –дегі қосымшаға қосылған алаңға Tfield автоматты түрде құрылады.(мәліметтер жиыны алаңында ) Бұндай әрбір компанент үнсіздік пен уникальдық атпен аталады. Бірінші құрылған алаң мәліметтер жиынының атын алады(2), екінші реттік құрылғандары—ДҚ кестесінің алаңның атын алады.

Сурет.31. DBGrid2 алаңы құрамы редактор алаңы тізімімен анықталады.

Material алаңына сәйкес TField компаненті Таblе2 Material сияқты аталады. Егер алаңдар редакторына сәйкес алаң атына шертсек, онда инспектор объектілерінде алаң қасиетін орналастыруға немесе өзгертуге болады. Сондақтан нақты алаң үшін оқиға өңдеушісін анықтауға болады.

DBGrid2-ң параметрлерін оның бағаналардың атауы орысша болатындай етіп өзгертеміз ол үшін тышқанның оң жағын басып DBGrid2 компонентінде, қалқыитын менюден Columns Editor элементін таңдаймыз. Экранда редактор терезесі пайда болады,(сурет32.а). TDBGrid столы сипатын өзгерту үшін нақты анық емес бағаннан анық бағанға көшу керек . Ол үшін Add All Fields батырмасын басу керек, нәтижесінде Таblе2 компанентінің редактор алаңында анықталған әрқайсысы алаңға сәйкес келетін бағандар қосылады.(сурет 32.б)

Сурет 32. а) DBGrid2 бағандардың бос тізімі;

б) бағандардың толтырылған тізімі

Әрбір бағанның тақырыбын өзгерту үшін тышқан көмегімен бағандар атын таңдау және объектілер инспектрлерінен Caption элементінің Title қасиетін ашу, бұл тізімде бағандар тақырыбы болады; сәйкес түрде тақырыпты өзгертеміз және содан кейін бағандар редакторынан DBGrid2 –ден шығамыз.

Таblе1 мәліметтер жиыны үшін тағыда осыны қайталаймыз.(сурет33)

Сурет 33. DBGrid 1және 2 бағандар тақырыбын орнату

№2 формадағы Таblе3 мәліметтер жиынының жазбаларын сорттау ретін өзгертеміз. Ол үшін объектілер инспектрлерінде Таblе3 копманентіндегі (DataModule5 те) IndexFieldNames қасиетіне “DatPrih Material” мәні қалқитын тізімнен таңдау жолымен өзгертеміз осыдан кейін қайтадан DBGrid редактор колонкасына кіріп, DatPrih бағанын тышқан көмегімен Material бағанын алдындағыдай қылып “перетацим” қосымшаны компилярлаймыз және орындауға жібереміз.34сурет көрсетілген Table2 мәліметтер жиыны ДҚ PrihodДВ кестесімен ассоцияциялған, қосымшада кіріс датасымен сортталған, ал әрбір кіріс датасы ішінде материал атауымен.

Сурет 34. Түсу датасы бойынша сортталған материалдар