Delphi

Пән: Информатика, Программалау, Мәліметтер қоры
Жұмыс түрі: Іс-тәжірибеден есеп беру
Тегін: Антиплагиат
Көлемі: 22 бет
Таңдаулыға:

КІРІСПЕ

Оқу тәжірибесі 2014 - 2015 оқу жылдарының күзгі семестрінде өтті.

Оқу тәжірибесінің жалпы өту мерзімі -2 аптаға созылды. (2014 жылдың 1-ші және 14-ші желтоқсан аралығын қамтыды. )

Тәжірибе Қазіргі Заманғы көпсалалы колледжінде өтті.

Қазіргі қолданбалы программаларды дайындау технологияларының өте мықтылығына қарамастан, егер программаның жобасын жасауға, шешілуге тиісті мәселелерді анықтау кезеңіне барынша назар аударып, әбден пысықтамаса, соңында оны жөндеуге көп уақыт кетуі мүмкін. Егер программа құрылымы, жобасы дұрыс келістірілмеген болса, программаға жаңа функция енгізу немесе ондағы кемшіліктерді жөндеу үлкен қаржы шығынына да ұшыратуы мүмкін. «Delphi ортасында мәліметтер қорына рұқсат алу механизмдері», «Мәліметтер қорын құру және басқару», «Delphi7 ортасында локальды деректер қорын қолданып ақпараттық жүйелер құру», «Серверлік мәліметтер қоры және Interbase серверімен танысу» тақырыптары қарастырылып, әрбір тақырыпқа қысқаша теориялық мағлұматтар және оларға сәйкес мысалдар келтірілді. Қазіргі техника мен технологияның дамып, маңызы артқан XXI-ғасыр заманында мәліметтер қоры адамзат баласы өмірінің бір бөлшегіне айналып отыр. Ал мәліметтер қоры қазіргі таңда кез келген сферада қолданылып жүргені бәрімізге мәлім. Бұл туралы тұрақты анықтама жоқ, себебі бұл ұғымның қасиеттеріне байланысты аясы кең болып саналады.

1 БӨЛІМ. ФАЙЛДАР

1. 1 Мәтіндік файлдар

Мәтіндік файл (text file) - құрамында құрылымдалмаған түрдегі ақпарат мәтіні бар файл; әріптерден, цифрлардан және тыныс белгілері мен арнайы символдардан құрастырылған қарапайым мәтіндік файл; онда каретканы қайтару мен келесі жолға ауысудан өзге басқару (пішімдеу) таңбалары болмайды. Көбінесе ASCII кодындағы файлдар деп аталады.

Деректер файлын мәтіндік түрде құруға да болады. Мәтіндік файл - символдық (Char) типті берілгендерден құрылатын файл. Оны сипаттау үлгісі: f : file of char не f : text. Құрылған файл атына . text кеңейтілуі қосылып қойылады. Мәтіндік файл ұзындықтары анықталмаған түрлі жолдардан тұрады, тек әр жол ұщындығы 255 - тен аспаса болғаны. Файл құру кезінде сөз аралықтарында бос орын қалдырып, әр жол соңында Еnd пернесін басу керек.

Сұқбаттар

Delphi компоненты выбора файла Delphi сұқбаттары файлды таңдау кезінде өздігінен жұмыс атқармайды, тек қана қолданушының файл таңдау кезінде жұмыс істеумен ғана құрылымдауларды көрсетеді. Оның ең маңызды тәсілі Execute болып табылады. Ол файлды таңдау терезесіндегі «ашу» және «сақтау» батырмасын басқасн кезде ғана іске қосылады.

1сурет. Сұқбаттар компоненттерін көрсететін терезе

Типтелген файлдар

Барлық типтелген файлдардың элементтері бірдей болуы керек, ал типтелген файл әртүрлі болуы мүмкін.

Типтелген файлдарды оқу read процедурасымен, ал жазу write процедурасымен орындалады.

Rewrite (f) - атауы AssignFile операторында анықталған берілгендер файлын дискіге тиеу үшін файлды ашу операторы (rewrite - жаңадан жазу) . Ол f үшін дискіден арнайы орын ашып, көрсеткішті (бастиекті) осы орынның басына орналастырады.

Write (f, v) - атауы AssignFile операторында f арқылы белгіленген дискілік файлға БФ-тің кезекті элементін (v) тиеу операторы (v орнына мәндері файлға жазылатын үтірлер арқылы бөлінген айнымалылар тізімін енгізуге де болады) .

CloseFile (f) - файлды жабу (оператор БФ-ті дискіге тиеу не дискіден оқу аяқталған кезде енгізіледі) .

Reset (f) - атауы f арқылы белгіленген файлды ашып, бастиекті осы файлдың басына орналастырады (reset - қайта орнату) .

Read (f, n: longint) - бастиекті файлдың n+1 нөмірлі жолының басына орналастырады. Ол файлдың (n+1) - жолын оқу үшін қажет.

CloseFile (f) - файлды жабу (оператор БФ-ті дискіге тиеу не дискіден оқу аяқталған кезде енгізіледі) .

Read (f, n: longint) - бастиекті файлдың n+1 нөмірлі жолының басына орналастырады. Ол файлдың (n+1) - жолын оқу үшін қажет.

1 тапсырма

Delphi - де мәтіндік файлдарды құру бағдарламасы. Бағдарламаны құру кезінде тиісті компоненттерді қолданып, бағдарлама мәтінін құрдым.

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, ExtDlgs, Jpeg, StdCtrls, ExtCtrls, Menus, Math, Buttons,

ComCtrls, Gim02, Gim05;

procedure TFmain. OuvrirUnPaquetClick(Sender: TObject) ;

begin

Odlg. FilterIndex := 1;

ODlg. InitialDir := chemin;

if ODlg. Execute then

ChargerUnPaquet(ODlg. Filename) ;

end;

procedure TFmain. Ajouter;

var ext, nf : string;

typ : integer;

begin

nf := NomImage(ImaFile) ;

ext := ExtractFileExt(ImaFile) ;

typ := QuelType(ext) ;

if typ > -1 then

begin

inc(Nbima) ;

SetLength(tbPima, Nbima+1) ; // on agrandit la table des paramиtres

tbPima[Nbima] := tbPima[0] ; // initialisation а l'aide de l'йlйment 0

tbPima[Nbima] . ftype := typ; // on note le type de fichier image

tbPima[Nbima] . nom := nf;

ImaStrm. Position := ImaStrm. Size;

tbPima[Nbima] . posima := ImaStrm. Position; // position dans le stream

VImage. Picture. LoadFromFile(ImaFile) ;

Image. Assign(VImage. Picture. Graphic) ;

tbPima[Nbima] . imx := Image. Width;

tbPima[Nbima] . imy := Image. Height;

VImage. Picture. Graphic. SaveToStream(ImaStrm) ; // copie de l'image

tbPima[Nbima] . taille := ImaStrm. Position - tbPima[Nbima] . posima;

// la taille de l'image est calculйe par diffйrence entre sa position

// et la taille du stream aprиs ajout de l'image.

end;

procedure TFmain. AjouterDesImagesClick(Sender: TObject) ;

// Ajout d'une ou plusieurs images. Il est possible de modifier la position

// des images en place.

var i, nbi : integer;

begin

if OPDlg. Execute then

begin

nbi := OPDlg. Files. Count;

FileBox. Clear;

FileBox. Items. Assign(OPDlg. Files) ;

if Nbima = 0 then debima := Nbima+1;

for i := 1 to nbi do

begin

ImaFile := FileBox. Items[i-1] ;

Ajouter;

end;

AfficherLesImages(debima) ;

AfficheValeurs;

end;

function TFmain. NomImage(nf : string) : string;

var st : string;

p : integer;

begin

st := ExtractFileName(nf) ;

p := Pos('. ', st) ;

if p > 12 then st:= Copy(st, 1, 11)

else st := Copy(st, 1, p-1) ;

Result := st;

end;

2 сурет. Мәтіндік файлды құру бағдарламасы

Тапсырма

Бұл бағдарлама үйдің шығындарын, яғни кіріс - шығысын есептейтін бағдарлама. Бағдарлама мәтіні төмендегідей:

unit fMain;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, TB97Tlbr, TB97Ctls, TB97, StdActns, ActnList, ImgList, Menus,

ComCtrls, elTree, uChild, VCLUnZip, VCLZip, StdCtrls, TB97Tlwn;

type

TfrmMain = class(TForm)

MainMenu: TMainMenu;

mnmWork: TMenuItem;

mnmCost: TMenuItem;

mnmOptions: TMenuItem;

mnmSplitter3: TMenuItem;

mnmExit: TMenuItem;

mnmView: TMenuItem;

mnmFilterPanel: TMenuItem;

mnmData: TMenuItem;

mnmAdd: TMenuItem;

mnmEdit: TMenuItem;

mnmDelete: TMenuItem;

mnmSplitter5: TMenuItem;

mnmRefresh: TMenuItem;

mnmWindow: TMenuItem;

mnmCascade: TMenuItem;

mnmHorizontal: TMenuItem;

mnmVertical: TMenuItem;

mnmMinimizeAll: TMenuItem;

mnmArrange: TMenuItem;

mnmClose: TMenuItem;

mnmHelp: TMenuItem;

mnmAbout: TMenuItem;

ImageList: TImageList;

StandartActions: TActionList;

AcCost: TAction;

AcShowHideWindow: TAction;

AcWindowCascade: TWindowCascade;

: TWindowTileHorizontal;

AcWindowTileVertical: TWindowTileVertical;

AcWindowArrange: TWindowArrange;

AcWindowMinimizeAll: TWindowMinimizeAll;

AcWindowClose: TWindowClose;

AcOptions: TAction;

AcExit: TAction;

AcAbout: TAction;

ChildActions: TActionList;

AcAdd: TAction;

AcEdit: TAction;

AcDelete: TAction;

AcRefresh: TAction;

AcToExcel: TAction;

AcFilterPanel: TAction;

DockTop: TDock97;

MainToolbar: TToolbar97;

btnRefresh: TToolbarButton97;

btnAdd: TToolbarButton97;

ToolbarSep4: TToolbarSep97;

btnCost: TToolbarButton97;

ToolbarSep5: TToolbarSep97;

StatusBar: TStatusBar;

AcCostType: TAction;

mnmManual: TMenuItem;

mnmCostType: TMenuItem;

btnCostType: TToolbarButton97;

Zip: TVCLZip;

AcGain: TAction;

AcGainType: TAction;

mnmGain: TMenuItem;

mnmGainType: TMenuItem;

btnGainType: TToolbarButton97;

ToolbarSep1: TToolbarSep97;

AcBalance: TAction;

mnmBalance: TMenuItem;

ToolbarSep3: TToolbarSep97;

AcGainCost: TAction;

mnmGainCost: TMenuItem;

AcDebt: TAction;

mnmDebt: TMenuItem;

ToolbarSep2: TToolbarSep97;

AcAddPattern: TAction;

btnAddPattern: TToolbarButton97;

mnmAddPattern: TMenuItem;

AcErrand: TAction;

mnmErrand: TMenuItem;

btnErrand: TToolbarButton97;

mnmSplitter1: TMenuItem;

mnmSplitter2: TMenuItem;

procedure ChildActionsUpdate(Action: TBasicAction;

var Handled: Boolean) ;

//универсальный обработчик событий для дочерних окон

procedure AcChildActionExecute(Sender: TObject) ;

procedure AcCostExecute(Sender: TObject) ;

procedure AcOptionsExecute(Sender: TObject) ;

procedure AcExitExecute(Sender: TObject) ;

procedure AcAboutExecute(Sender: TObject) ;

procedure FormCreate(Sender: TObject) ;

procedure FormShow(Sender: TObject) ;

procedure FormClose(Sender: TObject; var Action: TCloseAction) ;

procedure AcCostTypeExecute(Sender: TObject) ;

procedure AcGainExecute(Sender: TObject) ;

procedure AcGainTypeExecute(Sender: TObject) ;

procedure AcBalanceExecute(Sender: TObject) ;

procedure AcGainCostExecute(Sender: TObject) ;

procedure AcDebtExecute(Sender: TObject) ;

procedure AcErrandExecute(Sender: TObject) ;

private

procedure ExecuteChildAction(Sender: TObject; ac: TChildActions) ;

procedure DisplayHint(Sender: TObject) ;

function Connection: boolean;

procedure BuckUpDataBase;

public

{ Public declarations }

end;

var

frmMain: TfrmMain;

implementation

uses

dmHomeAudit,

uCommon,

fGain,

fGainType,

fCost,

fCostType,

fGainCost,

fDebt,

fErrand,

fBalance,

fOptions,

fAbout,

DateUtils;

{$R *. dfm}

//создание формы

procedure TfrmMain. FormCreate(Sender: TObject) ;

begin

Application. OnHint := DisplayHint;

AcFilterPanel. Tag := integer(childFilterPanel) ;

AcAdd. Tag := integer(childAdd) ;

AcAddPattern. Tag := integer(childAddPattern) ;

AcEdit. Tag := integer(childEdit) ;

AcDelete. Tag := integer(childDelete) ;

AcRefresh. Tag := integer(childRefresh) ;

AcToExcel. Tag := integer(childToExcel) ;

end;

procedure TfrmMain. FormShow(Sender: TObject) ;

begin

if (not Connection) then

begin

Close;

exit;

end;

BuckUpDataBase;

//TfrmCost. Create(self) . Show;

end;

//закрытие формы

procedure TfrmMain. FormClose(Sender: TObject; var Action: TCloseAction) ;

begin

DataMod. IB_Connection. Disconnect;

Action := caFree;

end;

procedure TfrmMain. DisplayHint(Sender: TObject) ;

begin

StatusBar. Panels[1] . Text := GetLongHint(Application. Hint) ;

end;

// Actions

procedure TfrmMain. ExecuteChildAction(Sender: TObject; ac: TChildActions) ;

var

info: PChildInfo;

begin

if ActiveMDIChild = nil then

exit;

info := PChildInfo(ActiveMDIChild. Tag) ;

if Assigned (info. Actions[ac] ) then

if (info <> nil) then

info. Actions[ac] (Sender) ;

end;

2 БӨЛІМ. ГРАФИКА ЖӘНЕ МУЛЬТИМЕДИЯ

2. 1 Графикалық файлдар форматтары

Веб-дизайнер, графиканы пайдалана отырып көптеген эффектілерге қол жеткізуге мүмкіндік береді. Мұндағы құпия негізінен, бейненің қандай да бір текстура, элемент дизайны, сурет, мәтін блогы, логотип, диаграмма, пиктограмма, фотография және т. б. бола алуынан тұрады. Мұндағы жалғыз ғана талап, дизайнердің файлдардың форматтарының бірінде бейнені ең әлгілі браузерлермен көтеруі мүмкін болатын түрінде құру және сақтау қажеттігінен тұрады.

WWW жүйесінде стандарттар ретінде негізінен екі формат - GIF және JPEG қабылданған. Тағы бір формат - PNG (Portable Network Graphics) - мүмкін болатын болашақта қосылатындығы туралы түсініктемелерді қарастыруға тұрарлық. Ол растрлық форматтар болып табылады. Мұнда бейнелер жеке нүктелермен - растрлармен суреттеледі. Экран үшін нүктелер пикселге эквивалентті.

Әрбір пикселмен сандық сипаттама байланысады, ол оның жалпы тақталық түсін (егер бейне ақ қара түсті болса) немесе түсті (түрлі түсті бейнелер үшін) суреттейді.

Delphi - де графикалық файлдарды сақтаудың 2 форматы бар.

Олар: биттік матрицалар, пиктограммалар және метафайлдар.

Биттік матрицалар(bmp файл кеңейтілуі) сақталған суреттің әрбір пиксельін көрсету мүмкіндігі бар. Сондай - ақ сцрет өз сапасын жоғалтпастан кез келген компьютерда ашылады.

Пиктограммалар(ico файл кеңейтілуі) бұл кішкентай биттік матрицалар. Олар қосымша берлгілерін, жылдамдық батырмаларда, мәзірлерде, әртүрлі тізімдерде сипаттау үшін біріктіріліп қолданылады. Оның сақтау үлгісі bmp - ға ұқсайды. Бірақ айырмашылықтары бар. Көп жағдайда пиктограмманы мащтабтау қиын болғандықтан, ол құрылған өлшемінде сақталады.

2. 2. Графикалық ақпараттарды кескіндеу компоненттері

Тәжiрибеде Chart компонентінің параметрлерін анықтау әрекеттері Editing Chart редакторының терезесінде анықталады. Ол терезені шақыру үшін формадағы TСhart терезесiн екі рет сырт еткізіңіз немесе тышқанның оң жақ батырмасын басқандағы Edit Chart опциясын таңдаңыз. Ашылған редактордың терезесіндегі Series параметрінде Add батырмасын басу арқылы диаграмманың немесе графиктің түрін анықтауға болады. Delphi ортасы схемаларды, сызбаларды, түрлі иллюстрацияларды экранға шығаратын программаларды неғұрлым қарапайым жолмен құруға мүмкіндік береді.

ProgressBar ортаның Win32 парағында орналасқан, бұл компонент белдеу түрінде болып, кейбір ұзақ уақыт орындалатын іс-әрекеттің көрінісін экран бетіне шығарады.

сурет. ProgressBar компоненті

Delphi ортасының Win32 парағы

ProgressBar компонентінің индикация өрістері мен реңінің түсін өзгертетін қасиеттері жоқ, сондықтан бұл параметрлер контейнер параметрлерімен анықталады. Әдетте графикалық белдеу көк түспен боялады.

ProgressBar компонентінің келесі қасиеттерін негізгі деп санайды:

Min және Max - индикатордың алғашқы және соңғы мәндерінің

аралығын анықтайды. Келісімше Min=0%, Max=100% деп саналады.

Position - орындалған іс-әрекеттің салыстырмалы көлемін Min және Max мәндеріне сәйкес анықтайды. Мысалы, Min=0, Max=80 деп көрсетілсе, онда Position-ның 20 деген мәніне сәйкес орындалған жұмыстың көлемі 25% деп саналады.
Step - индикатордың көлемі өскендегі позицияның қандай мәнге өсіп отыратынын анықтайды.

Индикатордың позициясын программада көрсетуге болады, мысалы:

ProgressBar1. Position:=35;

ProgressBar-ның элементінің позициясын StepIt (өсімшесі Step) және StepBy (Delta:Integer) (өсімшесі Delta) процедуралары арқылы өзгертуге болады. Мысалы, ProgressBar1. StepBy (13) .

Бұл оператор бойынша ProgressBar1-дің индикаторы 13-ке өсіп отырады.

ProgressBar1 компонентінің Caption немесе Text қасиеттері жоқ болғандықтан, жұмыс атқару индикаторын жазумен қамту үшін, Label компонентін қолдануға болады.

3 тапсырма

Delphi - дің графикалық мүмкіндіктерін пайдалана отырып «Жұлдыздар» бағдарламасын құрдым.

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls;

type

TForm1 = class(TForm)

Label1: TLabel;

procedure FormMouseDown(Sender: TObject; Button: TMouseButton;

Shift: TShiftState; X, Y: Integer) ;

private

{ Private declarations }

public

{ Public declarations }

procedure StarLine(x0, y0, r: integer) ; // рисует звезду

end;

var

Form1: TForm1;

implementation

{$R *. dfm}

// рисует звезду

procedure TForm1. StarLine(x0, y0, r: integer) ;

// x0, y0 - координаты центра звезды

// r - радиус звезды

var

p : array[1. . 11] of TPoint; // массив координат лучей и впадин

a: integer; // угол между осью ОХ и прямой, соединяющей

// центр звезды и конец луча или впадину

i: integer;

begin

a := 18; // строим от правого гор. луча

for i:=1 to 10 do

begin

if (i mod 2 = 0) then

begin // впадина

p[i] . x := x0+Round(r/3*cos(a*2*pi/360) ) ;

p[i] . y:=y0-Round(r/3*sin(a*2*pi/360) ) ;

end

else

begin // луч

p[i] . x:=x0+Round(r*cos(a*2*pi/360) ) ;

p[i] . y:=y0-Round(r*sin(a*2*pi/360) ) ;

end;

a := a+36;

end;

p[11] . X := p[1] . X; // чтобы замкнуть контур звезды

p[11] . Y := p[1] . Y;

Canvas. Polyline(p) ; // начертить контур звезды

end;

// нажатие кнопки мыши

procedure TForm1. FormMouseDown(Sender: TObject; Button: TMouseButton;

Shift: TShiftState; X, Y: Integer) ;

begin

if Button = mbLeft // нажата левая кнопка?

then Canvas. Pen. Color := clBlack

else Canvas

end.

4 сурет. «Жұлдыздар» бағдарламасы

4 тапсырма

3 БӨЛІМ. МӘЛІМЕТТЕР ҚОРЫ ҚОСЫМШАСЫН ҚҰРУ

3. 1 МҚ кестесін құру

File - New - Table командасын орындаймыз. Кесте форматын таңдау үшін TableType жолында Paradox7 дегенді көрсетіп OK батырмасын басамыз.

Келесі терезеде кестенің құрылымын анықтаймыз. Кестенің құрылымы кестеге енетін өріс атауларын (FieldName), типтерін (Type), өріс жазуларының ұзындықтарын (Size), кілттік өрісті (Key) көрсетуден тұрады. Бұл ортада кесте өрістерінің атаулары латын әріптерімен теріледі. Ал өріс типтері келесідей мәндер қабылдайды:

Alpha - мәтіндік өріс, ұзындығы 255 символға дейін .

Number - нақты тип, -10 ³⁰⁷ нен +10 ³⁰⁸ дейін.

$(Money) - ақшалық тип, алдыңғы тип сияқты.

Short - қысқа бүтін тип, -32768 ден +32767 дейін

LongInteger - ұзақбүтін тип, -2147483648 ден +2147483647 дейін.

#(BCD) - жоғарғы дәлдіктегі нақты тип.

Date - дата типі.

Time - уақыт типі.

@(Timestamp) - дата және уақыт типі.

Memo - ұзақ мәтіндік тип, ұзындығы 255 символдан артық.

Formatted Memo - форматталған мәтіндік тип (һаріп - шрифт түсі, стилі, бейнесі көрсетіледі) .

Graphic - Графикалық тип.

OLE (Object Linking and Embedding) - осы технологияны ұстанатын ақпаратар типі.

Logical - логикалық тип.

+(Autoinctement) - санаушы, автоматты түрде мәні 1-ге өсіп отырады.

Binary - еркін ұзындықтағы екілік деректер типі.

Кілттік өрістің атауы тізімде бірінші орналасып соңына ID әріптері тіркеледі де Key бөлігінде жұлдызшамен белгіленеді.

Осы терезеде өрістердің қасиеттері көрсетіледі:

Required Field - міндетті түрдегі өріс.

Minimum Value - минималды мәні (сандық әрістер үшін) .

Maximum Value - максималды мәні (сандық әрістер үшін) .

Default Value - үндемеген немесе атап көрсетпеген жағдайда шығатын мән.

Picture - енгізу маскасы.

Кестені сақтау үшін Save As батырмасын басып шыққан терезеде файл атауын (мысалы student. db), алиас атауын (мысалы vkgu) көрсетеміз де сақтаймыз.

Кестенің әрбір жолы өріспен сәйкес келеді. Бағаналардың тағайындаулары:

Fields Name - өріс аты;
Type - өріс типі;
Size - өріс өлшемі (жолдардың өрісі үшін) ;

5 сурет. Өріс типін таңдау

3. 2 МҚ қосымшасын құру компоненттері

Мәліметтерді қосымшасын құру кезінде қолданылатын компоненттер.

Деректер кестесі деп аталатын DBGrid компоненті

Мәліметтер қоры кестесіндегі жазуларды өшіру, жөндеу, жаңа жазу қосу керек болса ол үшін программалық код жазудың қажеті жоқ, қалыпқа DataControls (мәліметтерді басқару элементтері) деп аталатын панельде орналасқан TDGrid компонентін орналастырып, DataSource қасиетінде қажетті деректер көзін көрсету керек.

Деректер тақырыбы (надпись) компоненті DBText:

Ұзақ мәтін сақталған өріс жазуларын көрсету, өзгерту үшін қолданылады. Tlabel компонентіне ұқсас. DataSource қасиетінде деректер көзі көрсетіледі, DataField қасиетінде қолданылатын өріс көрсетіледі.

Жөндеу өрісі компоненті DBEdit:

Ағымдағы жазуды өзгерту, көрсету үшін қолданылады. Алдыңғы компонентке ұқсас. Қосымша қасиеті ReadOnly қасиетін True десе кестенің жазулары өзгертуді қабылдамайды.

Бейне компоненті DBImage:

Мәліметтер қорында сақталған бейнелерді, суреттерді экранға шығаруды орындайды. Егер AutoDisplay қасиеті True десе өрістегі бейне автоматты түрде экранда көрінеді. Егер ол қасиет көрсетілмеген болса LoadMemo әдісін шақыру арқылы орындауға болады. Бейнені өріске қою, көбейту, т. б. операциялар Picture қасиетінде көрсетіледі.

Деректер тізімін қолдану компоненті DBComboBox:

Бұл компонент ашылған тізімнен (сұламалы) деректі таңдау, қолдануды орындайды. Енгізу облысындағы мәтін жиыны қажетті жазуға жылдам жылжу, немесе тізімде жоқ элементті енгізуге мүмкіндік береді. ComboBox компонентіне ұқсас, тек қосымша қасиеті Style жолында TcomboBoxStyle арқылы тізімге енетін элементтердің бейнелену стилі көрсетіледі.

Деректер жалаушасы (флажок) компоненті DBCheckBox:

Бұл компонент көмегімен екі жағдайдың бірін қабылдайтын өрістердің мәндерін көрсетуге болады. Компонент логикалық мән қабылдайды. Өрістің қандай жағдайда тұрғанын және оның мәнін өзгертуге көмектеседі.

Есептелетін және таңдау өрістерін құру

Деректер қорымен жұмыс істеу кезінде мемо - типті деректерді қолдану мүмкіндігі бар. Онда ұзақ мәтіннен тұратын деректерді сақтау ыңғайлы. Сонымен қатар құрылған кестенің баған атаулары латынша болғаны тиімсіз, оны қазақша немесе орысшаға аударып жазу керек.

Деректер жиынының өрістері деп кестенің бағандарының атауларын айтуға болады. TdataSet компоненті бағанның нөмірі, мәні бойынша немесе атауы бойынша жазуларды басқаруға көмектеседі. Ол үшін Fields, FieldByName, FieldValues қасиеттерін қолдануға болады.

... жалғасы

Сіз бұл жұмысты біздің қосымшамыз арқылы толығымен тегін көре аласыз.