Автор работы: Пользователь скрыл имя, 26 Февраля 2012 в 14:39, курсовая работа
Delphi-дің негізгі ерекшелігі – онда қосымша құруда компоненттік және объектілік тәсілдер пайдаланылады. Компоненттік тәсілдің мәнісі жеңіл: әр қосымша арнайы іс-әрекеттерді орындайтын компоненттерден жинақталады. Ол жеткіліксіз болса, объектіні өңдеуге арналған үстеме бағдарлама құрылады. Компоненттер визуальды компоненттер кітапханасында (VCL – Visual Component Library) жинақталған. Компоненттер панелінде түрлі кластарға тиісті стандартты компоненттер өте көп. Пайдаланушы жаңа компонент дайындап, оны осы панельге қосуына да болады.
КІРІСПЕ..................................................................................................................3
1 Есептің қойылымы...........................................................................................4
2 Есептің алгоритмі.............................................................................................5
3 Теориялық бөлім ..............................................................................................6
3.1 BDE Administrator ................................................................………….....6
3.2 Database Desktop .......................................................................................7
3.3 Компоненттер палитрасы .......................................................................13
4 ……………………………...............................................................................17
4.1 Жалпы мағлұмат.......................................................................................20
4.2 Функционалдық тағайындалуы ..............................................................21
4.3 Логикалық құрылымның баяндалуы......................................................21
4.4 Шақыру және жүктеу...............................................................................29
4.5 Қажетті техникалық жабдықтар .............................................................29
4.6 Кіріс мәліметтер ......................................................................................29
4.7 Шығыс мәліметтер ................................................................................26 Бақылау мысалдарын баяндау..............................................................................27
ҚОРЫТЫНДЫ.......................................................................................................28
ҚОЛДАНЫЛҒАН ӘДЕБИЕТТЕР ТІЗІМІ......................................................
127) {$R *.dfm}
128) end.
129) unit Unit3;
130) interface
131) uses
132) Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
133) Dialogs, StdCtrls, Buttons, ExtCtrls, DBCtrls, Grids, DBGrids, unit1, unit2;
134) type
135) TForm3 = class(TForm)
136) Panel1: TPanel;
137) Button1: TButton;
138) Button2: TButton;
139) Button3: TButton;
140) Button4: TButton;
141) Button5: TButton;
142) DBGrid1: TDBGrid;
143) DBNavigator1: TDBNavigator;
144) procedure Button1Click(Sender: TObject);
145) procedure Button2Click(Sender: TObject);
146) procedure Button3Click(Sender: TObject);
147) procedure Button4Click(Sender: TObject);
148) procedure Button5Click(Sender: TObject);
149) private
150) { Private declarations }
151) public
152) { Public declarations }
153) end;
154) var
155) Form3: TForm3;
156) implementation
157) {$R *.dfm}
158) procedure TForm3.Button1Click(Sender: TObject);
159) begin
160) DM.Table1.Append;
161) end;
162) procedure TForm3.Button2Click(Sender: TObject);
163) begin
164) DM.Table1.Edit;
165) end;
166) procedure TForm3.Button3Click(Sender: TObject);
167) begin
168) DM.Table1.Delete;
169) end;
170) procedure TForm3.Button4Click(Sender: TObject);
171) begin
172) DM.Table1.Post;
173) end;
174) procedure TForm3.Button5Click(Sender: TObject);
175) begin
176) Form3.Close;
177) end;
178) end.
179) unit Unit4;
180) interface
181) uses
182) Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
183) Dialogs, StdCtrls, Buttons, ExtCtrls, DBCtrls, Grids, DBGrids, unit1, unit2;
184) type
185) TForm4 = class(TForm)
186) Panel1: TPanel;
187) DBGrid1: TDBGrid;
188) Button1: TButton;
189) Button2: TButton;
190) Button3: TButton;
191) Button4: TButton;
192) Button5: TButton;
193) procedure Button1Click(Sender: TObject);
194) procedure Button2Click(Sender: TObject);
195) procedure Button3Click(Sender: TObject);
196) procedure Button4Click(Sender: TObject);
197) procedure Button5Click(Sender: TObject);
198) private
199) { Private declarations }
200) public
201) { Public declarations }
202) end;
203) var
204) Form4: TForm4;
205) implementation
206) {$R *.dfm}
207) procedure TForm4.Button1Click(Sender: TObject);
208) begin
209) DM.Table2.Append;
210) end;
211) procedure TForm4.Button2Click(Sender: TObject);
212) begin
213) DM.Table2.Edit;
214) end;
215) procedure TForm4.Button3Click(Sender: TObject);
216) begin
217) DM.Table2.Delete;
218) end;
219) procedure TForm4.Button4Click(Sender: TObject);
220) begin
221) DM.Table2.Post;
222) end;
223) procedure TForm4.Button5Click(Sender: TObject);
224) begin
225) Form4.Close;
226) end;
227) end.
228) unit Unit5;
229) interface
230) uses
231) Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
232) Dialogs, StdCtrls, Buttons, ExtCtrls, DBCtrls, Grids, DBGrids, unit1, unit2;
233) type
234) TForm5 = class(TForm)
235) Panel1: TPanel;
236) DBGrid1: TDBGrid;
237) Button1: TButton;
238) Button2: TButton;
239) Button3: TButton;
240) Button4: TButton;
241) Button5: TButton;
242) procedure Button1Click(Sender: TObject);
243) procedure Button2Click(Sender: TObject);
244) procedure Button3Click(Sender: TObject);
245) procedure Button4Click(Sender: TObject);
246) procedure Button5Click(Sender: TObject);
247) private
248) { Private declarations }
249) public
250) { Public declarations }
251) end;
252) var
253) Form5: TForm5;
254) implementation
255) {$R *.dfm}
256) procedure TForm5.Button1Click(Sender: TObject);
257) begin
258) DM.Table3.Post;
259) end;
260) procedure TForm5.Button2Click(Sender: TObject);
261) begin
262) DM.Table3.Edit;
263) end;
264) procedure TForm5.Button3Click(Sender: TObject);
265) begin
266) DM.Table3.Append;
267) end;
268) procedure TForm5.Button4Click(Sender: TObject);
269) begin
270) DM.Table3.Delete;
271) end;
272) procedure TForm5.Button5Click(Sender: TObject);
273) begin
274) form5.Close;
275) end;
276) end.
277) unit Unit6;
278) interface
279) uses
280) Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
281) Dialogs, DB, DBTables, Grids, DBGrids, unit1, unit2, StdCtrls, ExtCtrls,
282) DBCtrls, Buttons;
283) type
284) TForm6 = class(TForm)
285) Query1: TQuery;
286) DataSource1: TDataSource;
287) DBGrid1: TDBGrid;
288) Label1: TLabel;
289) Label2: TLabel;
290) Label3: TLabel;
291) DBNavigator1: TDBNavigator;
292) Button1: TButton;
293) procedure Button1Click(Sender: TObject);
294) private
295) { Private declarations }
296) public
297) { Public declarations }
298) end;
299) var
300) Form6: TForm6;
301) implementation
302) {$R *.dfm}
303) procedure TForm6.Button1Click(Sender: TObject);
304) begin
305) form6.Close;
306) end;
307) end.
308) unit Unit7;
309) interface
310) uses
311) Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
312) Dialogs, unit1, StdCtrls;
313) type
314) TForm7 = class(TForm)
315) Label1: TLabel;
316) Label2: TLabel;
317) Button1: TButton;
318) procedure Button1Click(Sender: TObject);
319) private
320) { Private declarations }
321) public
322) { Public declarations }
323) end;
324) var
325) Form7: TForm7;
326) implementation
327) {$R *.dfm}
328) procedure TForm7.Button1Click(Sender: TObject);
329) begin
330) form7.Close;
331) end;
332) end.
333) unit Unit8;
334) interface
335) uses
336) Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
337) Dialogs, unit1, StdCtrls;
338) type
339) TForm8 = class(TForm)
340) Label1: TLabel;
341) Label2: TLabel;
342) Label3: TLabel;
343) Label4: TLabel;
344) private
345) { Private declarations }
346) public
347) { Public declarations }
348) end;
349) var
350) Form8: TForm8;
351) implementation
352) {$R *.dfm}
353) end.
354) unit Unit9;
355) interface
356) uses
357) Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
358) Dialogs, StdCtrls, DBCtrls, Grids, DBGrids, ExtCtrls, DB, DBTables,
359) RpCon, RpConDS, RpConBDE, RpDefine, RpRave;
360) type
361) TForm9 = class(TForm)
362) Panel1: TPanel;
363) Panel2: TPanel;
364) DBNavigator1: TDBNavigator;
365) Button1: TButton;
366) Query1: TQuery;
367) DBGrid1: TDBGrid;
368) DataSource1: TDataSource;
369) RvProjectKSU: TRvProject;
370) RvQueryConnection1: TRvQueryConnection;
371) procedure Button1Click(Sender: TObject);
372) private
373) { Private declarations }
374) public
375) { Public declarations }
376) end;
377) var
378) Form9: TForm9;
379) implementation
380) {$R *.dfm}
381) procedure TForm9.Button1Click(Sender: TObject);
382) begin
383) RvProjectKSU.Execute;
384) end;
385) end.
386) unit Unit10;
387) interface
388) uses
389) Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
390) Dialogs, RpCon, RpConDS, RpConBDE, RpDefine, RpRave, DBTables,
391) StdCtrls,
392) Buttons, DBCtrls, Grids, DBGrids, ExtCtrls, DB;
393) type
394) TForm10 = class(TForm)
395) Panel1: TPanel;
396) Panel2: TPanel;
397) DBNavigator1: TDBNavigator;
398) BitBtn1: TBitBtn;
399) Query1: TQuery;
400) RvProjec: TRvProject;
401) RvQueryConnection1: TRvQueryConnection;
402) DataSource1: TDataSource;
403) DBGrid1: TDBGrid;
404) procedure BitBtn1Click(Sender: TObject);
405) private
406) { Private declarations }
407) public
408) { Public declarations }
409) end;
410) var
411) Form10: TForm10;
412) implementation
413) {$R *.dfm}
414) procedure TForm10.BitBtn1Click(Sender: TObject);
415) begin
416) RvProjec.Execute;
417) end;
418) end.
419) unit Unit11;
420) interface
421) uses
422) Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
423) Dialogs, RpCon, RpConDS, RpConBDE, RpDefine, RpRave, Grids,
424) DBGrids, DB,
425) DBTables, StdCtrls, Buttons;
426) type
427) TForm11 = class(TForm)
428) DBGrid1: TDBGrid;
429) RvProjectd: TRvProject;
430) Query1: TQuery;
431) DataSource1: TDataSource;
432) RvQueryConnection1: TRvQueryConnection;
433) BitBtn1: TBitBtn;
434) procedure BitBtn1Click(Sender: TObject);
435) private
436) { Private declarations }
437) public
438) { Public declarations }
439) end;
440) var
441) Form11: TForm11;
442) implementation
443) {$R *.dfm}
444) procedure TForm11.BitBtn1Click(Sender: TObject);
445) begin
446) RvProjectd.Execute;
447) end;
448) end.
449) unit Unit12;
450) interface
451) uses
452) Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
453) Dialogs, RpCon, RpConDS, RpConBDE, RpDefine, RpRave, StdCtrls,
454) Buttons, ExtCtrls, DBCtrls, Grids, DBGrids, DB, DBTables, unit1, unit2;
455) Type
456) TForm12 = class(TForm)
457) Query1: TQuery;
458) DataSource1: TDataSource;
459) DBGrid1: TDBGrid;
460) DBNavigator1: TDBNavigator;
461) BitBtn1: TBitBtn;
462) RvProjectst: TRvProject;
463) RvQueryConnection1: TRvQueryConnection;
464) procedure BitBtn1Click(Sender: TObject);
465) private
466) { Private declarations }
467) Public
468) { Public declarations }
469) end;
470) var
471) Form12: TForm12;
472) Implementation
473) {$R *.dfm}
474) procedure TForm12.BitBtn1Click(Sender: TObject);
475) begin
476) RvProjectst.Execute;
477) end;
478) end.
479) unit Unit13;
480) interface
481) uses
482) Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
483) Dialogs, RpCon, RpConDS, RpConBDE, RpDefine, RpRave, StdCtrls,
484) Buttons,
485) Grids, DBGrids, DB, DBTables;
486) type
487) TForm13 = class(TForm)
488) Query1: TQuery;
489) DataSource1: TDataSource;
490) DBGrid1: TDBGrid;
491) BitBtn1: TBitBtn;
492) RvProjecta: TRvProject;
493) RvQueryConnection1: TRvQueryConnection;
494) Query2: TQuery;
495) DataSource2: TDataSource;
496) procedure BitBtn1Click(Sender: TObject);
497) private
498) { Private declarations }
499) public
500) { Public declarations }
501) end;
502) var
503) Form13: TForm13;
504) implementation
505) {$R *.dfm}
506) procedure TForm13.BitBtn1Click(Sender: TObject);
507) begin
508) RvProjecta.Execute;
509) end;
510) end.
511) unit Unit14;
512) interface
513) uses
514) Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
515) Dialogs, StdCtrls, Buttons, DBCtrls, DBTables, Grids, DBGrids, DB, Mask,
516) ExtCtrls;
517) type
518) TForm14 = class(TForm)
519) Panel1: TPanel;
520) Panel2: TPanel;
521) Label1: TLabel;
522) Label2: TLabel;
523) DBEdit1: TDBEdit;
524) Query1: TQuery;
525) DataSource1: TDataSource;
526) Label3: TLabel;
527) DBEdit2: TDBEdit;
528) Label4: TLabel;
529) DBEdit3: TDBEdit;
530) Label5: TLabel;
531) DBGrid1: TDBGrid;
532) Table1: TTable;
533) DataSource2: TDataSource;
534) Label6: TLabel;
535) Query2: TQuery;
536) DataSource3: TDataSource;
537) Label7: TLabel;
538) DBEdit4: TDBEdit;
539) DBNavigator1: TDBNavigator;
540) BitBtn1: TBitBtn;
541) procedure BitBtn1Click(Sender: TObject);
542) private
543) { Private declarations }
544) public
545) { Public declarations }
546) end;
547) var
548) Form14: TForm14;
549) implementation
550) {$R *.dfm}
551) procedure TForm14.BitBtn1Click(Sender: TObject);
552) begin
553) form14.Close;
554) end;
555) end.
Информация о работе Конференция туралы мәліметтер базасын құру