Микрокредит бағдарламасын құру

МАЗМҰНЫ

бет
КІРІСПЕ 1.4
1 ЖАЛПЫ БӨЛІМ 5.21
Бағдарламалық қамтамасыздандыру сипаттамасы
Бағдарламалау тілінің сипаттамасы
Мәліметтер типтері
Тармақталушы және циклдік үрдістерді бағдарламалау
Ақпараттарды енгізу және шығару
Объектілі . бағытты бағдарламалау негіздері
Delphi бағдарламасының құрылымы
Деректер қоры. Деректер қоры кестесін, алиас құру
Деректермен жұмыс жасауға арналған визуалды
компоненттер
Деректер қорын новигациялау
2 АРНАЙЫ БӨЛІМ 22.28
Есептің қойылымы
Енгізілетін және шығарылатын құжаттар сипаттамалары
Бағдарлама кешені сипаттамасы
Кешен жұмысының сызбасы
Кешен идентификаторлары кестесі
Проблемалық бағдарлама сипаттамасы
Проблемалық бағдарлама сипаттамасы
Проблемалық бағдарлама схемасы
Проблемалық бағдарламаның идентификаторлар кестесі
3 ӨНДІРІСТІ ҰЙЫМДАСТЫРУ 29.37
Операторға бағдарламамен жұмыс істейтін хабарламалар
Бағдарламаның орындалуына қажетті техникалық құралдар кешені
Бағдарлама қызметі
Бағдарламаның орындалуына қажетті уақыт
Операторға берілетін хабарламалар
Программа орындалуы
Енгізілетін құжаттардың пішімдері
Шығарылатын құжаттар пішімдері
ҚОРЫТЫНДЫ 38
ӘДЕБИЕТ ТІЗІМІ 39
ҚОСЫМШАЛАР 40.51
Қосымша А Енгізілетін және шығарылатын құжаттар
пішімдері
Қосымша Б Кешен жұмысының сызбасы
Қосымша В Проблемалық бағдарлама жұмысының сызбасы
Бағдарлама листингісі 52.67
КІРІСПЕ

Есептеу техникасы даму процесі нәтижесінде олар адам қызметінің барлық аймағында қолдануының сапалық және кезеңіне келіп жетті. Бұл кезең «Жаңа ақпараттық технология» түсінігімен сипатталады және ол есептеуіш техника құралдарын ақпаратты сақтау мен өңдеуге қолдану қажеттігін көрсетеді.
Есептеуіш техниканың даму тарихын келесі кезеңдерге бөлуге болады:
қолмен санау – адамзат өркениеті басынан;
механикалық – ХVII ғасырдың ортасынан;
электромеханикалық – ХІХ ғасырдың соңына қарай;
электрондық – ХХ ғасырдың ортасынан бастап.
Ертедегі адамдар санау үшін аяқтың, қолдың саусақтарын, тастарды, таяқшаларды, түйіндерді және т.с.с түрлі санау құралдарын қолданған. Санауға арналған ең алғашқы құрылғы деп ойықтарда сүйектер немесе тастар орын ауыстыра алатын арнайы тақтайшаны есептеуге болады. Оны ежелгі Грецияда «абак», ал Жапонияда «серобаян», Қытайда «суанпан», ежелгі Ресейде «орыс шоты» деп атады. ХVІІ ғасырдың бас кезінде бұл құралдар жетілдіріп, жаңа заманғы есепшоттармен алмастырады. Логарифмдік сызғыштар мен Непер таяқшалары да сол кезеңге сәйкес келеді. Осы құрылғыларды пайдаланып, есептеу жұмыстарының бәрін адам қолымен істеді (қолмен санау кезеңі).
Ақырында барлық есептеу жұмыстары механикалық тәсілмен орындалатын, есептеуіш машиналар ойлап табылды.
1642 жылы француз физигі және математигі Блез Паскаль, арифметикалық қосу азайту амалдарын орындайтын алғашқы есептеу машинасын құрастырды. Паскальдің осы машинасы механикалық кезеңінің бастамасы болды.
1673 жылы неміс математигі Готфрид Лейбниц арифметикалық төрт амалды орындай алатын арифмометр құрастырды. ХІХ ғасырдың басынан бастап, арифмометрлер кең көлемде қолданыла бастады. Оларда күрделі есептеулер орындалды, мысалы артиллериялық атаудың баллистикалық кестені есептеу. Тіпті, арифмометрмен жұмыс істейтін есепші деп аталатын арнайы мамандық болған. Ол белгілі нұсқаулар тізбегін дәл орнатып отырған (кейіннен бұл нұсқаулар тізбегі программа деп аталатын болды). Механикалық машиналарды жетілдіру кезеңінде ағылшын математигі Чарльз Бэббидждің еңбегі ерекше орын алады. Ол адамның көмегінсіз жұмыс істейтін аналитикалық есептеу машинасын жасаудың теориясын әзірледі.
Ондай машиналар арнайы перфокартаның көмегімен енгізілгетін программалрды орынай алу керек болды (перфокарта- арнайы тесік саңылауларына ақпарат түсірілген тығыз қағаздан жасалған). Бұл машиналарға арналған алғашқы программаны ағылшын ақыны Лорд Байронның қызы математик леди Ада Лавлейс құрастырды. Бэббидждің
ӘДЕБИЕТТЕР ТІЗІМІ

1. Архангельский А.Я., Программирование в Delphi, Москва, БИНОМ, 2006
2. Шупрута В.В., Delphi на примерах, СПб.:БХВ-Петербург, 2007
3. Фленов М.Е., Библия Delphi, СПб.:БХВ-Петербург, 2008
4. Культин Н.Б., Основы программирования в Delphi, СПб.:БХВ-Петербург, 2006
5. Грабер М., Справочное руководство по SQL, Москва, 2004
6. Дейта К., Введение в системные базы данных, Москва, 2004
7. Кузнецов С. Д., Основы современных баз данных», К., 2000
8. Шпеник М., Следж О. и др. Руководство администратора баз данных Microsoft SQL Server 2000, Москва, 2002
9. «Железо», WINDOWS XP журналы
        
        МАЗМҰНЫ
| | |бет ... |1-4 |
|1 ... ... |5-21 |
| ... қамтамасыздандыру сипаттамасы | |
| ... ... ... | |
| ... типтері | |
| ... және ... ... бағдарламалау | |
| ... ... және ... | |
| ... - ... бағдарламалау негіздері | |
| |Delphi ... ... | |
| ... қоры. Деректер қоры кестесін, алиас құру | |
| ... ... ... арналған визуалды | |
| ... | |
| ... ... ... | |
|2 ... ... |22-28 |
| ... ... | |
| ... және ... құжаттар сипаттамалары | |
| ... ... ... | |
| ... жұмысының сызбасы | |
| ... ... ... | |
| ... ... ... | |
| ... ... ... | |
| ... ... ... | |
| ... ... ... ... | |
|3 ... ... |29-37 |
| ... ... ... ... хабарламалар | |
| ... ... ... ... ... кешені | |
| ... ... | |
| ... ... ... ... | |
| ... берілетін хабарламалар | |
| ... ... | |
| ... ... ... | |
| ... ... пішімдері | |
| ... |38 |
| ... ... |39 |
| ... |40-51 |
| ... А Енгізілетін және шығарылатын құжаттар | |
| ... | |
| ... Б ... ... ... | |
| ... В Проблемалық бағдарлама жұмысының сызбасы | |
| ... ... |52-67 ... ... даму ... ... олар адам қызметінің барлық
аймағында қолдануының сапалық және кезеңіне келіп ... Бұл ... ... ... ... ... және ол есептеуіш техника
құралдарын ақпаратты сақтау мен өңдеуге ... ... ... ... даму тарихын келесі кезеңдерге бөлуге болады:
қолмен санау – адамзат өркениеті басынан;
механикалық – ХVII ғасырдың ортасынан;
электромеханикалық – ХІХ ... ... ... – ХХ ... ... ... ... санау үшін аяқтың, қолдың саусақтарын, тастарды,
таяқшаларды, ... және т.с.с ... ... ... қолданған.
Санауға арналған ең алғашқы құрылғы деп ... ... ... ... ауыстыра алатын арнайы тақтайшаны ... ... Оны ... ... ал ... «серобаян», Қытайда «суанпан», ежелгі
Ресейде «орыс шоты» деп атады. ХVІІ ғасырдың бас ... бұл ... жаңа ... ... ... ... ... Непер таяқшалары да сол кезеңге сәйкес ... Осы ... ... ... ... адам ... ... (қолмен санау
кезеңі).
Ақырында барлық есептеу жұмыстары ... ... ... ... ... табылды.
1642 жылы француз физигі және математигі Блез Паскаль, арифметикалық
қосу азайту амалдарын орындайтын ... ... ... құрастырды.
Паскальдің осы машинасы механикалық кезеңінің бастамасы болды.
1673 жылы неміс математигі Готфрид ... ... төрт ... ... ... ... ХІХ ... басынан бастап,
арифмометрлер кең көлемде қолданыла бастады. Оларда күрделі есептеулер
орындалды, мысалы артиллериялық атаудың баллистикалық кестені есептеу.
Тіпті, арифмометрмен жұмыс істейтін есепші деп ... ... ... Ол ... ... ... дәл ... отырған (кейіннен бұл
нұсқаулар тізбегі программа деп аталатын болды). Механикалық машиналарды
жетілдіру кезеңінде ағылшын математигі Чарльз Бэббидждің еңбегі ерекше орын
алады. Ол адамның ... ... ... ... есептеу машинасын
жасаудың теориясын әзірледі.
Ондай машиналар арнайы перфокартаның ... ... ... алу ... болды (перфокарта- арнайы тесік
саңылауларына ақпарат түсірілген тығыз ... ... Бұл ... алғашқы программаны ағылшын ақыны Лорд Байронның қызы математик
леди Ада ... ... ... ... ... заманғы
компьютерлердің арғы тегі деп есептеуге болады. Ол ... ... ... ... тиіс ... ... ... құрылғысы – «қойма»;
- қоймадағы сандарды өңдеу құрылғысы - «диірмен»;
- есептеулер тізбегін басқару құрылғысы;
- алғашқы ... ... және ... ... ... ... орай бұл жоба жүзеге асырылмады – ... сол ... үшін аса ... ... ... Ол ... ... машиналарды жасауға
керекті ғылым мен технологиялық қордың жоқтығынан ол ... сол ... ... ... ... идеясын онан кейінгі есептеуіш құрылғы ойлап
тапқыштар кеңінен ... ... 1888 ... ... ... ... санағы
кезінде есептеулерді автоматтандыру үшін Генрих Холлерит перфокарталарға
енгізілген ақпаратты ... ... оқып ... ... деп ... жасады. Осылайша 60 жылға жуық созылған электромеханикалық кезең
басталды. Электромеханикалық ... шыңы деп ... ... ... ... «Марк – 1» машинасын есептеуге болады.
Ғылым мен техниканың электроника саласындағы әрі ... ... ... ... идеясын жүзеге асыруға мүмкіндік туғызды. Алғашқы
электрондық есептеуіш машиналар 1945 жылы артиллериялық кестелерді ... ... Ол ... (ENIAC- ... ... ... and
Computer) деп аталады. 1945 жылы фон ... ... ... мен ... ... ... жасады. Осы кезден бастап қазіргі ... ... ...... ... ... Осы күнге дейін ЭЕМ-
нің бірнеше буыны ауысып үлгерді. ... ... даму ... буын – 1940 ... ... ... элемент – механикалық.
Қарапайым арифметикалық опциялар ... ... ... ... жасалынған.
Бірінші буын – 1940-1950 жылдар. Есептеуіш элемент – электрондық
шамдар. ... буын ... ... ... ... ... – вакумдық шамдармен толтырылған, көлемі жағынан үлкен шкафтар
болады. Үлкен ЭЕМ-дер. Бір секундта олар 10-20 мың ... ... еді. ... ... олар жиі ... шығатын.
Екінші буын – 1950-1960 жылдар. Есептеуіш элемент – транзисторлар. Бұл
буын ЭЕМ-дерінде ... ... ... кетпейтін жартылай өткізгішті
транзисторлармен алмастырылды. ... ... ... 1 млн. ... ... 1958 жылы Джон ... транзисторларды бір интегралдық схемаға
біріктіру ... ... ... ... бірнеше ондаған, тіпті мыңдаған
транзисторларды біріктіре алатын ... Мини ... буын – ... ... ... ... – жоғары интегралдық
схемалар. Интегралдық схемаларды пайдалану үшінші буын ... ... ... Машинаның сырт өлшемдері кішірейтіліп, жады көлемі өсіп,
ақпаратты өңдеу жылдамдығы секундына бірнеше миллионға ... ... ... ... бір қолданушы жұмыс істеуіне арналған ... ... ... ... операциялық жүйелер шығарылды.
Төртінші буын – 1971 ... ... ... ... ... ... схемаларды жасау технологиясының жетілуі,
бірнеше жүздеген мың элементтерді (транзисторларды) ... ... ... жасалуына себепші болды. Сол кезеңнен бастап
төртінші буын ЭЕМ-дердің ... ... ... ... ... ... ... жүз миллион операция орындай алатындай дәрежеге жетті.
Бұл кезең ерекшелігі дербес пайдаланатын компьютердің жасалуында ... осы ... ... ... ... графикалық интерфейс,
мультимедия технологиясының қолданылуы жүзеге аса ... ... ... қатынас іске асырылады. Қазіргі кезеңде қолданылып
жүрген төртінші буын ... өте ... ... ... келеді,
1970 жылдардағы ЭЕМ-дерден айырмашылығы өте үлкен.
Қазіргі қоғамдағы ЭЕМ-нің жаңа рольдері
Он бес жылда компьютер есептеп ... ... ... ... адамдардың күнделікті жұмыс құралына айналды.
Әлемде ... және ... ... ... ... ... копьютерлер мен Интернет қоғамының ... ... ... ... ... кем емес ... ... құрап отыр. Бүгінде
коммуникациялар мен Интернет индустрияның, сауданың, транспорттың, білім
берудің, ғылымның ... ... ... ... ... үшін ... жоғары технологияларды қолданатын елдердің бүкіл экономикасының
дамуының іргетасын қалайды.
Көпшілікке арналған ... ... ... ... ... ... ... барлық жерде қолданып жүрген Rank  Xerox
компаниясының жаңалығы графикалық көптерезелі интерфейсті алғашқы рет ... ... ... жұмыс орны (АЖО) немесе шетел ... ... ... өзін ... мамандықтың иесі
қолданушының-маманның, оның қандай да бір анықталған қимылдарды орындауын
автоматтандыру үшін қажетті құралдармен ... орны ... ... ... ... ДК болып табылады, және ол қажеттілікке байланысты
басқа электрондық ... ... ... ... ... жинақтауыштармен, баспаға шығаратын құралдармен, оптикалық оқитын
немесе штрих кодтарды оқитын құралдармен, графика құралдарымен, басқа АЖО-
мен және ... ... ... және т.б. ... ... архитектурасы IBM PC болатын мамандандырылған ДК ең ... АЖО ... ... ... ... ... арнайы дайындық
өтпеген қолданушыларға бағытталған.
Қазіргі кезде ақпарат қоғам өмірінде маңызды орын алып, адам мен қоғам
қызметінің түрлі салалары оның ... мен ... ... дамуда.
Іс қағаздары қоғам өмірінде үлкен қызмет ... Іс ... ... ... экономикалық маңызы өте зор. Құжаттар фактілерді,
оқиғаларды, қоғам ... ... ... ... ... ... қызметінің негізгі маңызы болып табылатын қаржы ... ... ... ... ... жоғары сапада қызмет ету
және жүргізілген операциялардың жоғары табыстарын қамтамасыз ... ... ... тәжірибесін пайдалана отырып, банк сенімді
заемшылырдың базасын кеңейтті, несиелік өнім спектрін ... ... ... ... ... ... ... қысқа мерзімдік ссудалардың көп
болуы операциялардың ең үлкен табысымен аз ... ... ... ... ... ... қатар, банк орта мерзімдік және ұзақ
мерзімдік несие негізінде жобаларды ... банк ... ең ... ... ... табылады, ол оның
жоғары табысымен қамтамасыз ... ... ... ... көп пайда алуға ғана ... ... ... ... ... де. ... ... өлшемдігі
және консервативтігі, жұмысшылардың ... ... ... ... жетілдіру және шешім қабылдау механизмінің процедурасы ... ... ... ... ... несиелік
операциялардың тиімділігі өседі.
1. ЖАЛПЫ БӨЛІМ
1. Бағдарламамен қамтамасыздандыру ... жүйе ... ... ... жұмысын және
бағдарламалық жасақтың жұмысын басқару үшiн қажет. Ол компьютер ... ... ... ... етедi, демек, Операциялык жүйе -
бұл компьютердi iске ... ... ... және оның ... ... ... арнайы бағдарлама.
Операциялық жүйе қолданушымен сұхбат жасай алады, орындалатын басқа
бағдарламаларды iске қосады, компьютердiң ресурстарын бiледi.
Операциялық жүйе адам мен ... ... ... ... бағдарламалар арасында үйлестіруші қызметін атқарады. Ол
адамның бағдарламаларды іске ... ... ... деректерді оларға
беруге және олардан алуға, бағдарлама ... ... ... және
оған қосылған құрылғылардың параметрлерін өзгертуге, ресурстарды қайта
бөліп беруге мүмкіндік береді. Дербес компьютерде жұмыс істеу, ... ... ... ... істеу болып табылады.
Қазіргі операциялық жүйелер - жылдар бойы ... ... ... ... ... кешендер.
1981 жылы IBM/PC компьютерлері үшін MS-DOS 1.0 операциялық жүйесі
дискі ... ... ... ... ... ... ... негізінен онда диаметрі 5,25 дюйм болатын ... ... ... жылы MS-DOS 1.1 ... ... ... ... дискілер пайдаланылады (ақпаратты тасымалдау сыйымдылығы 360
Кбайт).
1983 жылы IBM/PC/XT компьютерлері үшін MS DOS 2,0 ... ... ... Олар өлшемі 10 Мбайтқа дейінгі қатты дискілер жұмысын
басқарады. Онда алғаш рет ... ... ... ... ... ... жылы MS DOS 3.0 операциялық жүйесі шықты. Онда ... ... ... ... ... мен ... 5,25 ... тең иілгіш
дискілер жұмысы басқарылды.
1986 жылы MS DOS 3.2 ... ... ... ... Онда диаметрі
3,5 дюймға тең иілгіш дискілер (сыйымдылығы 720 Кбайт) ... ... жылы MS DOS 3.3. ... ... ... ... Онда диаметрі 3,5
дюймға тең иілгіш ... ... 1,44 м ... ... басқарылды.
1988 жылы MS DOS 4.0 операциялық жүйесі пайда болды. Онда өлшемі
32 мбайттан жоғары қатты дискілер ... ... жылы MS DOS 4.01 ... ... орыс ... ... жылы MS DOS 5.0 ... жүйесі пайда болды. Онда өлшемі
1Мбайтқа тең ... жады ... ... ... жылы MS DOS 6.0 ... жүйесі пайда болып, ол ... ... ... басқаруға негізделді.
1995 жылы Microsoft Windows-95 алғашқы ... ... ... ... жылы ... ... ... желісінің жұмысын басқаратын
Microsoft Windows 98 операциялық ... ... ... жылы ... Windows 2000 және Windows ... ... үшін) операциялық жүйесі пайда болды.
2001 жылдың қазан айының 25 күні Windows XP операциялық жүйесі
пайда болды. Онын екі түрі бар: Windows XP ... және Windows ... ... екі ... тұрады: Windows XP HomeEDITION Windows XP
Professional.
Бұл операциялық жүйенің ... ... ... ... ... ... NTFS5, NTFS4, FAT166 FAT 32 ... ... ... ... ... бар. ... NT4 жазылған көптеген қосындыларды, сонымен қатар
кейбір OS/2 және POSIX ... еш ... ... ... ... Операциялық жүйенің архитектурасы
қосымшаларды әр түрлі зақымдаулардан ... ... ... Операциялық жүйе басқа
мемлекеттерде әр түрлі тілде жұмыс істеу ... ХР ... ... функциялары
Кез келген операциялық жүйе сияқты WINDOWS ортасының негізгі
ядросы, жедел жадты басқаратын ішкі жүйeci, файлдық жүйесі, енгізу-шығару
кұрылғыларымен жұмыс ... ... т.б. ... бар. Ол ... мынадай мәселелердің орындалуын қамтамасыз етуі тиіс:
компьютердің барлық аппараттық құрал-жабдықтарын басқару; ... ... ... ... істеуді қамтамасыз ету;
– колданбалы бағдарламаларды icкe қосу.
Бұған қоса WINDOWS жүйесі:
– бip уақытта бірнеше бағдарламалардың ... ... ... ... ... ... ... қаріптepдi қолдауды;
мультимедиа мүмкiндiктepiн пайдалануды;
– бірыңғай анықтамалар жүйе жұмысын қамтамасыз ете ... ... ... ... ... ... ... басқарып отырады. Бұл сәттерде Windows уақытша пайдаланылатын
файлдарды жасап ... Windows ... ... ... ол ... ... Егер ... дұрыс аяқталмаса, ол файлдар дискіге сақталып қалып,
бipaқ орын алып ... Windows ... ... ... ... үшiн ... орындалуы тиic:
Тышқан курсорын Іске қосу (Пуск немесе Start) батырмасына алып барып, оны
бip рет шерту керек те, меню командаларының ... ... ... ... работы с Windows) командасын таңдау қажет. Мұнан кейін
"Windows-пен жұмысты аяқтау» атты сұхбат тepeзeci ... ... ... Alt+F4 ... арқылы да шығаруға болады. Alt+F4 nepнелepi кез
келген ... жабу iciн ... ... ... аяқтау» сұхбат терезесі шыққан
соң, Windows 9x ортасында бірнеше ауыстырғыштардың бipiн таңдау қажет. ... NT ... ... ... әрекеттер тiзiмінeн
бip жолды таңдаймыз да, «Иә» («Да») батырмасын ... Windows ... ... таңдап алынған басқару батырмасына жeткiзiп шерту
керек. Соңғы екі ... ... ... бip ... ... – тышқан курсорын сол әрекетке сәйкес дөңгелекке не мәтінге алып
барып, тышқанды бip рет ... ... ... ... ... басталып, соңында компьютер өшipiлeдi
немесе оны өшіру керек eкeндiгi жайлы ... ... ... ... ... ... ... ашылған терезесінде тақырыптық
жол бар, онда бума мен қосымшаның аты және меню жолы орналасқан. Меню жолы
әр ... ... ... ... іс ... барлық қосымшалар мен бумаларда
меню жолында Файл, Түзету (Правка), Түр (Вид) , ... ... ... ... ... ... ... бұрыннан бар
файлды ашу, жаңа файлды құру, ... ... ... ... ... мәтін үзінділерімен, суреттермен ерекшелеу
(выделить), қиып алу (вырезать), ... ... ... табу ... ... ... ... әрекеттерді орындау
үшін пайдаланады.
Түр (Вид) менюі негізінен ... ... ... ... ... ... ... анықтайтын менюді ашады.
Анықтама (Справка) менюі бумалар және ... ... ... ... ... ... сұрақтарға жауап беретін анықтама
жүйесін ашады.
Меню жолынан төмен, ... ... ... ... ... ... тақтасы (панель инструментов) болады.
Терезенің оң жақ ... ... үш ... ... ... сол жақ ... ... Тапсырмалар тақтасына батырма
түріне жиыру үшін, ортаңғы батырма ... ... ... ... ... Бұл ... батырмасы мына түрді қабылдайды. Егер оған
шертсек, терезе бұрынғы көлеміне келеді.
Windows оперциялық жүйесінің ерекшелігі – құрамында стандартты
деп аталатын программалардың болуында. ... ... ... ... ... Развлечения (Көңіл-күй көтеру) және ... ... ... ... ... жіберіледі:
Пуск→Программа→Стандартные→Калькулятор.
Бағдарламалық жабдықтар интepфeйciндeгi нeгiзгi ... ... ... ... ... онда әpбip ... ... ақпарат толық
түрде болуы тиіс. Бiз Windows ортасының бip артықшылығы ... ... ... барлық қолданбалы программалар үшiн бірдей eтiп
құрастырылғанын айтқанбыз. ... бip ... ... ... ... құрылымы да сондай болғандықтан,
керекті ақпаратты қиналмай іздеп табуға болады.
Windows ... кез ... ... ... ... болады:
Іске қосу (Пуск) батырмасын шерту керек;
менюдегі Анықтама (Справка) ... ... ... ... кез ... Windows ... ... программаларының
меню жолындағы соңгы бөлімде Анықтама cөзi тұрады. Осы Анықтама командасы
программаның ... ... бepiп, ... ... баспаға да
шығарып бере алады.
Осыған қоса, Windows жүйесінің өзінде және оның ... ... ... ... ... да алу мүмкіндігі бар. Кез
келген сұхбат терезесінде Көмек батырмасы бар. Оны таңдап алсақ, экранға
анықтамалар жүйе ... ... ... сол ... ... ... ... шығарылады.
Анықтама алуды ұйымдастыру. Windows ортасының және ... ... ... ... жүйе ...... ... сөздерге
негізделген жүйе. Түйінді сөз – ... бip ... оның ... ... ... немесе белгілі бip ұғымды беретін сөздер.
Түйiндi сөзді таңдағанда Анықтама терезесіне автоматты түрде сол сөзбен
байланысты бөлім (тарау) ... Ол ... да ... ... сөз болуы
ықтимал, ал олар басқа бip тараулар мен бөлімдермен байланысқан.
Анықтама ішіндегі түйінді сөздер алдын ала ... ... ... Анықтамаларда қосымша осындай мәліметпен байланысқан
сөздер мен сөз ... ... ... жаңа бip ... ... Мұндай
сөздерді таңдап алғанда, басқа бөлімге ауыспаймыз, тек Анықтама терезесі
iшiнeн қосымша мәтіні бар жаңа ... ... ... ... ... ... ... шерткенше не пернелердің бipi
басылғанша экранда көpiнiп тұрады. Жаңа ... ... ... ... де ... ... ... icтey
Анықтамалар жүйeнiң басты терезесінің бес парағы бар, ... ... ... және ... ... ... парақты таңдау үшін тышқан курсорын сол ... ... оны бip рет ... ... ... және оны сүйемелдеу» - осы жүйeнiң ең басты
терезесі болып табылады. Онда анықтамалар ақпарат әдеттегідей ... ... ... Әр бөлiмнiң басында жабық Kітaп түpiндeгi
белгіше бар. Керекті бөлiмнiң тақырыбын белгілеп алып, Enter пернесін басу
арқылы ... ... ... ... ... ... оны eкi рет шерту
жолымен кез келген бөлiмнeн анықтамалар мәліметті оқуға болады. ... ... ... мен тараулар болуы мүмкін, оларды да ашу бөлiмдi
ашқан сияқты орындалады.
Windows жүйесінің «Kөpceткіш» ... ... ... екеу ... ... ... – Қажетті сөздің алғашқы әрпін
енгізіңіз деген терезе, бұған түйінді сөз енгізу керек. Ал ... ... ... сөз ... ... ... арналған терезе, онда
анықтаманың түйінді сөздердің тізімі алфавиттік тәртіппен орналасқан.
Бұған қосымша мүмкіндіктер ... ... ... Бұл
парақ ішінде түйінді сөздері бар анықтама ... ... ... осы ... тәртіппен бepiлeдi де, Windows басқаруымен
iстейтін басқа программаларда бұдан басқашалау анықтама жүйeci ... ... ... ... ... ... жағында бipнeшe
батырма орналасқан.
Мазмұн батырмасын бассақ, анықтама терезесіне Мазмұн деп
аталатын анықтамалар ақпараттың алғашқы бөлiмi ... ... ... ... мәлiмeт бepiлeдi. Іздеу батырмасын бассақ мәлімет іздейтін
сәйкес сұхбаттық терезе ... Онда ... ... ... ... және ... тақырыбы пайда болады.
Ағымдағы терезе объектілері туралы ... ... да ... ... тышқан курсорын керекті oбъeктiгe жeткiзiп, оң жақ батырманы
шерту;
– сұрак белгісі бар меню ... басу ... F1 ... ... ... ... ... Мәліметтер типтері
Object Pascal тілінде кез келген ... ... ... ... типі ... қабылдай алатын мүмкін мәндер жиынтығын
анықтайды. Сонымен қатар, мәліметтер типі ... ... ... ішкі берілу форматын да анықтайды. Object Pascal ... ... ... ... типтер
Қарапайым типке реттелген, нақты типтер және мерзім - уақыт типтері
жатады. Реттелген ... ... ... ... ... бір ... ... сонымен қатар, мәннің реттік номерін бүтін санмен беруге
болады.
Нақты типтердің де, ... ... ішкі ... ... анықталатын
мәндердің мөлшері көрсетіледі. Бірақ нақты типтердің мүмкін мәндерінің
мөлшерінің көптігі соншалық, оны ... ... ... ... белгілеу
мүмкін емес.
Мерзім және уақыт типі мерзім мен ... ... ... ... оны ... үшін ... ... пайдаланылады.
Реттелген типке: бүтін, логикалық, символдық, саналатын және ... ... ... ... ... Х өрнегінің мәнінің реттік
номерін беретін ORD(X) функциясын қолдануға ... ... үшін ORD(X) ... ... ... өзін ... ... логикалық, символдық және саналатын типтерге қолдану: ... үшін 0 мен 1 ... ... оң ... ... тип ... 0 мен ... сандарды, ал саналатын типтер үшін: 0 мен 65535 ... ... ... тип ... ... типтің барлық қасиеттерін
сақтайды, сондықтан оған ORD(X) ... ... сол ... қасиетіне
тәуелді болады.
Сондай-ақ, реттелген типтерге төмендегідей функцияларды қолдануға
болады:
- PRED(X) функциясы реттелген типтің алдыңғы мәнің
береді, яғни ... ... ... ... мән немесе
ORD(Pred(X))=ORD(X)-1;
- SUCC(X) функциясы ORD(X)+1-дің реттік ... ... ... ... ... ... ... яғни ORDSUCC(X))= ORD(X)+1.
Бүтін типтердің мүмкін болатын мәндерінің аралығы олардың жадыдан
алатын бір, екі, төрт ... ... байт ... ... ... ... мүмкін болатын мәндерінің аралығын кесте түрінде ... ... - ... ... ... |Ұзындығы(байт) ... ... ... |1 |0..255 ... |1 ... ... |2 ... ... |2 ... ... |4 ... +2 147 483 647 |
|Longint |4 ... ... 647 ... |4 |0..4 294 967 295 ... |8 |-9*1018 ..9*1018 ... |4 |0..2 147 483 647 ... ... ... ... Bool, WordBool және ... ... ... тек Boolean типі ... ал ... ... Windows жүйесімен үйлесетін Object Pascal енгізілген:
Boolean - 2 ... ByteBool - 4 байт орын ... ... ... мәні
ретінде алдын-ала хабарланған False(жалған) немесе True(ақиқат) ... ... ... ... мәні ... ... компьютердегі барлық
символдардың жиынтығы алынады. Әрбір символға 0..255 ... ... ... сан ... ... Бұл сан символдың ішкі берілу коды деп
аталады, оны Ord функциясы береді.
Коды 0..31 ... ... ... ... жатады. Егер
бұл кодтар бағдарламаның символдық мәнінде кездесетін болса, олар бос орын
болып ... ... тип өзі ... ... ... беріледі. Әрбір
мән қандай да бір ... ... ... ... ... ... мысалы,
Type
Tuster=(ak, kyzyl, jasyl);
Саналатын тип бағдарламаның көрнектілігін ... ... жыл ... ... байланысты мәліметтер пайдаланылса, ондай
бағдарлама үзіндісін былай келтіруге болады.
Type TypeMonth=(jan, feb, mar, apr, may, jun, jul, aug, okt, ... ... ... демалыс”;

End;
Саналатын типтердің мәндері мен олардың реттік нөмірлерінің
арасындағы ... ... ... қарай тағайындалады. Мысалы, тізімдегі
бірінші мәннің реттік нөмірі - 0, екіншісі -1 және ... ... ең ... мәні - 65536, сондықтан саналатын тип
Word бүтін типінің ішкі жиыны тәрізді және ... 0,1 және т.б. ... ... тобы ... ... мүмкін.
Саналатын типке бүтін санды меншіктеуге болмайды.
Аралық тип
Аралық тип өзінің базалық типінің ішкі жиыны болып табылады. Базалық
тип ретінде аралық ... ... кез ... ... тип ... тип ... ... өзінің ішкі мәндерінің шекаралары арқылы
беріледі:
..;
Мұндағы, - аралық типтің ең кіші мәні;
Нақты типтер
Мәндері бүтін типтермен ... ... ... ... ерекшелігі нақты санның ішкі форматына тәуелді қандай да бір
дәлдікпен еркін санды анықтайды.
Кесте 2 - ... ... ... ... ... |
| ... | ... |8 | ... ... |4 | ... ... |8 | ... ... |10 | ... |
|Comp |8 | ... ... |8 | ... ... ... ... уақытта сандарды Extended форматында
өңдейді; ал қалған үш ... тип ... ... ... нәтижені қарапайым
қысқартылған күйінде беру болып табылады және олар жадыны ... ... Pascal ... Comp және Currency ... ... ... бөлшек бөлігінің ұзындығы шектеулі ... сан ... Comp ... бөлшек бөлігінің ұзындығы 0 (ноль)разряд, яғни
болмайды, ал Currency ... ... ... ... 4 ... разряд. Бұл
аталған екі типті 19...20 мәнді ондық ... ... ... ... ... Бұл ... ... есептеуде қолданған өте ыңғайлы.
Күн және уақыт типі
Күн, уақыт типі TdataTime стандартты идентификаторымен анықталады, ол
уақытты және күнді бір ... ... ... Жадыдағы ішкі орналасуы
бойынша 8 байт орын алады, Currency типіне ұқсас, шектеулі бөлшек ... ... сан: ... ... ... күн, ... бөлігінде уақыт
сақталады.
1.2.2 Тармақталушы және ... ... ... ... байланысты екі және екіден көп тармақтары бар
алгоритмдер - тармақталған алгоритм деп аталады. Осындай тармақталған
алгоритмді ... ... ... қолданылады.
Шартты оператордың құрылымы төмендегідей:
If Then Else ... ... ... мәні ... егер ... мәні ақықат(true) болса, Then (онда) ... ... ... ал егер ... мәні ... (false) ... Else (әйтпесе)
сөзінен кейінгі 2-оператор орындалады.
Қайталанушы үрдістерді бағдарламалау үшін үш оператор қолданылады:
Цикл «Әзір» ... ... ... ұйымдастыруға While(әзір) – Do(орында)
операторы қолданылады.
Оператордың жалпы түрде жазылуы:
While do ;
Шарт - логикалық ... ... ... - ... ... ... рет қайталанып орандалатын оператор.
Оператордың орындалуы:
- шарт тексеріледі,
- шарт ақиқат болса оператор ... да, шарт ... ... шығу ... егер шарт ... ... бірде-бір рет орындалмайды.
«Дейін» қайталау цикл операторы Repeat (кайтала) - ... ... ... ... жалпы түрде жазылуы:
Repeat

Until ;
Оператордың орындалуы:
- цикл денесі орындалғаннан кейін, шарт ... цикл ... ... ғана цикл ... ... шарт ... ... цикл денесі кемінде бір рет орындалады.
FOR параметрлі цикл операторының құрылымы:
For := To ... ... ... ... ... мән ... қайталау параметрі100) then begin
sm('Рауан 777 11 44 837, 701 483 93 63');
Application.Terminate;
exit;
end;
servdate := its(DayOf(Date))+'.'+its(MonthOf(Date))+'.'+its(YearOf(Date));
RefTargets;
InsertPassword(dm.ADOConnection1, dm.q_vrem, dm.ds_vrem);
userpassf.Free;
//FSplash.Free;
f1.chdoguchet.Left:= f1.rgsortopers.Left + ... := ... := ... := date;
f1.PageControl1.ActivePageIndex := 0;
//-----------------------------------
f1.tshklient.Caption := getLabelWord(cur_lang, 'client');
f1.tshdog.Caption := getLabelWord(cur_lang, 'contract');
f1.TabSheet1.Caption := getLabelWord(cur_lang, 'operation');
f1.TabSheet2.Caption := getLabelWord(cur_lang, ... := ... ... := ... ... := ... ... := getLabelWord(cur_lang, 'delete');
f1.bfind.Caption := getLabelWord(cur_lang, 'find');
f1.brefclient.Caption := getLabelWord(cur_lang, 'refresh');
f1.Label1.Caption := getLabelWord(cur_lang, 'surname');
f1.Label2.Caption := ... ... := ... ... := getLabelWord(cur_lang, 'udnum');
f1.bnewzalog.Caption := getLabelWord(cur_lang, 'guarantee');
f1.BitBtn1.Caption := ... ... := ... 'clients');
f1.comstat.Clear;
f1.comstat.Items.Add(getLabelWord(cur_lang, 'all'));
f1.comstat.Items.Add(getLabelWord(cur_lang, 'borrower'));
f1.comstat.Items.Add(getLabelWord(cur_lang, 'depositor'));
f1.comstat.ItemIndex := 0;
f1.BitBtn5.Caption := getLabelWord(cur_lang, ... := ... ... := ... ... := ... ... := getLabelWord(cur_lang, 'print');
f1.chodtdolgdia.Caption := getLabelWord(cur_lang, 'date_debt');
f1.chodtvznosdia.Caption := getLabelWord(cur_lang, 'date_payment');
f1.chodtvznosravno.Caption := getLabelWord(cur_lang, 'date_payment');
f1.chodatavkre.Caption := getLabelWord(cur_lang, 'date_distribution');
f1.chosrok.Caption := ... ... := ... ... := ... 'refresh');
f1.comoperstat.Items.Clear;
f1.comoperstat.Items.Add(getLabelWord(cur_lang, 'all'));
f1.comoperstat.Items.Add(getLabelWord(cur_lang, 'payment'));
f1.comoperstat.Items.Add(getLabelWord(cur_lang, 'penalty'));
f1.comoperstat.ItemIndex := 0;
f1.BitBtn9.Caption := getLabelWord(cur_lang, 'recedit');
f1.BitBtn10.Caption := getLabelWord(cur_lang, 'recview');
f1.BitBtn2.Caption := getLabelWord(cur_lang, 'graph');
f1.Label7.Caption := getLabelWord(cur_lang, 'print');
f1.rgsortopers.Items.Clear;
f1.rgsortopers.Caption := ... ... ... ... );
f1.rgsortopers.Items.Add( getLabelWord(cur_lang, 'date_payment') );
f1.rgsortopers.Items.Add( getLabelWord(cur_lang, 'percent') );
f1.rgsortopers.Items.Add( getLabelWord(cur_lang, 'sum_debt') );
f1.rgsortopers.Items.Add( getLabelWord(cur_lang, 'sum_payment') );
f1.rgsortopers.Items.Add( getLabelWord(cur_lang, 'type_payment') );
f1.rgsortopers.ItemIndex := 0;
f1.chddatevida.Caption := getLabelWord(cur_lang, ... := ... ... := ... ... := getLabelWord(cur_lang, 'term');
f1.chddateclose.Caption := getLabelWord(cur_lang, 'date_close');
f1.Label6.Caption := getLabelWord(cur_lang, 'date_close');
f1.BRefShowDog.Caption := ... ... := ... ... := ... 'sorting');
f1.rgsortdogs.Items.Add(getLabelWord(cur_lang, 'queue'));
f1.rgsortdogs.Items.Add(getLabelWord(cur_lang, 'date'));
f1.rgsortdogs.Items.Add(getLabelWord(cur_lang, 'sum'));
f1.rgsortdogs.Items.Add(getLabelWord(cur_lang, 'term'));
f1.rgsortdogs.Items.Add(getLabelWord(cur_lang, 'clients'));
f1.rgsortdogs.ItemIndex := 0;
f1.comdogstat.Items.Clear;
f1.comdogstat.Items.Add(getLabelWord(cur_lang, 'all'));
f1.comdogstat.Items.Add(getLabelWord(cur_lang, 'open'));
f1.comdogstat.Items.Add(getLabelWord(cur_lang, 'close'));
f1.comdogstat.ItemIndex := ... := ... ... := ... ... := getLabelWord(cur_lang, 'recedit');
f1.N13.Caption := getLabelWord(cur_lang, 'target');
f1.N4.Caption := getLabelWord(cur_lang, 'realestate');
f1.N5.Caption := getLabelWord(cur_lang, 'transport');
// f1.N6.Caption := getLabelWord(cur_lang, ... := ... ... := getLabelWord(cur_lang, 'pcredit_con');
f1.N8.Caption := getLabelWord(cur_lang, 'ppledge_con');
f1.N32.Caption := getLabelWord(cur_lang, ... := ... ... := ... ... := getLabelWord(cur_lang, 'ppledge_con3');
// f1.N10.Caption := getLabelWord(cur_lang, 'pcredit_con');
// ... := ... ... := ... ... := ... ... Tf1.bnewclientClick(Sender: TObject);
begin
f2.Tag := 1;
f2.ShowModal;
end;
procedure Tf1.brefclientClick(Sender: TObject);
begin
SelClient('');
end;
procedure Tf1.bnewzalogClick(Sender: TObject);
begin
if dm.q_client.IsEmpty then begin
msbox(getLabelWord(cur_lang, 'change_client'),2);
exit;
end;
unit3.idclientf3 := dm.q_client.FieldByName('id_client').AsInteger;
f3.ShowModal;
end;
procedure Tf1.beditclientClick(Sender: TObject);
begin
if ... then ... ... := 2;
unit2.idclientf2 := dm.q_client.FieldByName('id_client').AsInteger;
f2.ShowModal;
end;
procedure Tf1.binfoclientClick(Sender: TObject);
begin
if dm.q_client.IsEmpty then begin
msbox(getLabelWord(cur_lang, ... := ... := ... ... ... ... then begin
msbox(getLabelWord(cur_lang, 'change_client'),2);
exit;
end;
f4.ShowModal;
end;
procedure Tf1.bfindClick(Sender: TObject);
var sf: string;
begin
sf := 'where';
case f1.comstat.ItemIndex of
0: sf := sf + ' status>0';
1: sf := sf + ' ... sf := sf + ' ... ... '' then sf := sf + ' and fam like ... ... ... then sf := sf + ' and name ... ... ... then sf := sf + ' and pat like ... ... ... then sf := sf + ' and n_ud like ... ... Tf1.BRefShowDogClick(Sender: TObject);
var ssort, sfind: string;
begin
case f1.rgsortdogs.ItemIndex of
0: ssort := ' order by Dogovor.id_dogovor';
1: ssort := ' order by Dogovor.data_pay';
2: ssort := ' order by ... ssort := ' order by ... ssort := ' order by ... ... of
0: sfind := '';
1: sfind := ' where (Dogovor.data_close is null)';
2: sfind := ' where (Dogovor.data_close is not null)';
end;
ShowDog(sfind,ssort);
end;
procedure Tf1.BitBtn3Click(Sender: ... sfind, ssort: ... sd2: ... := ... ... then begin
sd1 := DateToStr( f1.dt1fdatapay.Date );
sd2 := DateToStr( f1.dt2fdatapay.Date );
if (pos(#32, sd1)0) or ... sd2)0) then ... ... ... := ... sd1 );
sd2 := DataConverR_mmddyy( sd2 );
sfind := sfind + ' and ... ... ...

Пән: Информатика
Жұмыс түрі: Дипломдық жұмыс
Көлемі: 45 бет
Бұл жұмыстың бағасы: 2 000 теңге









Ұқсас жұмыстар
Тақырыб Бет саны
Микрокредиттік ұйымдардың несие нарығындағы рөлі25 бет
Қазақстан Республикасындағы шағын және орта бизнесті несиелендіруді ұйымдастыру86 бет
«Жұлдызнамалық күнтізбе» бағдарламасын құру18 бет
«Тест» қосымшасын құру»25 бет
Бизнес-жоспар11 бет
Деректер қорын құру және оны мысалда қарастыру28 бет
Облыс білім беру басқармасының «Павлодар облыстық ақпараттық технологиялар орталығы» КММ жобалармен автоматизациялық басқару жүйесін зерттеу мен жаңарту76 бет
Сызықтық бағдарламалау есебінің графикалық әдісі20 бет
Электрондық курс және оны құру28 бет
Электрондық оқытушы құралдар құру51 бет


Исходниктер
Пәндер
Көмек / Помощь
Арайлым
Біз міндетті түрде жауап береміз!
Мы обязательно ответим!
Жіберу / Отправить


Зарабатывайте вместе с нами

Рахмет!
Хабарлама жіберілді. / Сообщение отправлено.

Сіз үшін аптасына 5 күн жұмыс істейміз.
Жұмыс уақыты 09:00 - 18:00

Мы работаем для Вас 5 дней в неделю.
Время работы 09:00 - 18:00

Email: info@stud.kz

Phone: 777 614 50 20
Жабу / Закрыть

Көмек / Помощь