Delphi бағдарламалық ортасында «Pascal бағдарламалау тілінде файлдармен жұмыс істеу» электрондық оқу құралынжасап шығару

Кіріспе ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .. 3
1. Теориялық бөлім
1.1. Delphi бағдарламалау ортасы ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .. 4
1.2. Delphi және Object Pascal бағдаламалау тілдері ... ... ... ... ... ... ... ... ... 6
1.3. TWebBrowser компоненті ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... 10
2. Практикалық бөлім
2.1. Электрондық оқу құралын құрастыру ... ... ... ... ... ... ... ... ... ... ... ... ... 14
2.2. Delphi ОББ ортасында тестілеу бағдарламасын құру ... ... ... ... ... ... .. 17
2.3. Пайдаланушының интерфейсін ұйымдастыру ... ... ... ... ... ... ... ... ... . 20
Қорытынды ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... . 23
Пайдаланылған әдебиеттер ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... 24
Қосымша 1 ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .. 25
Қосымша 2 ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .. 26
Қазіргі кезде дербес компьютерлерді пайдаланушылар арасында Windows операциялық жүйелері жанұясы танымал және бағдарлама жасауға қызыққандар, осы жүйеде жұмыс жасайтын бағдарламалар жазуға ынталанады. Есептеуіш техниканың дамуы, бағдарламаны қамтамасыз жасау құралдарына деген эффективті қажеттілік, бағдарламалау тілдерінің пайда болуына әкелді, олардың ішінде келесілерді Borland Delphi және Microsoft Visual Basic көрсетуге болады. Тез жасау жүйесінің негізіне көрнекі жобалау технологиясы және оқиғалы бағдарламалау жатады. Оның мәні жасау ортасы бағдарламаның генерация кодының үлкен бөлігін алады және бағдарламалаушыға диалогтық терезелермен және жағдайларды өңдеу функциясын құрастыру жұмыстарын қалдырады.
Borland Delphi қазіргі уақытта бағдарламаудың ең танымал тілдерінің бірі болып саналады.Borland Delphi Windows-қа кәсіби деңгейлі интерфейсі бар қолданбалы бағдарлама жасауға мүмкіндік береді.Бұл курстық жұмыста қолданушының қосымша модульдік жобасын шешуде Windows ортасының мүмкіндіктері қарастырылған.
Курстық жұмыстың мақсаты - Borland Delphi интерактивті жобалау ортасында электрондық оқу құралы бағдарламасын құру болып табылады.Электрондық оқулық құралында Pascal-да файлдармен жұмыс істеу әдістері туралы жазылады. Сонымен қоса оқу құралы ішінде тест болады. Тест кітапты оқыған адамның сол кітаптағы материал бойынша алынған білімін тексереді.
1) Delphi визуалды бағдарламалау жүйесі, Бексарыұлы Мұратбек;
2) Архангельский А.Я. Программирование в Delphi 6. – Москва -2000г.
3) Баас Р. и другие. Delphi 6. Для пользователя. - Киев, 2000г.
4) Бобровский В.А. Delphi 6. Учебный курс. - СПб, 2000г.
5) Халықова Қ.З., Бостанов Б., Тұрғынбаева А. Объектілі бағдарланған программалау жүйелерінің негіздері. Оқу құралы. Абай ат. ҚазҰПУ. Алматы, 2005. -301б.
6) Дарахвелидзе П., Марков E. Delphi — среда визального программирования — СПБ. ВНУ — Санкт-Петербург, 1996 г.
7) Рубенкинг H. Программирования delphi для "чайников". Киев, "Диалектика", 1996 г.
        
        Мазмұны
Кіріспе..................................................................................................................
3
* Теориялық бөлім
+ Delphi бағдарламалау ортасы..................................................................
4
+ Delphi және Object Pascal бағдаламалау тілдері....................................
6
+ TWebBrowser компоненті........................................................................
10
* Практикалық бөлім
+ ... оқу ... ... Delphi ОББ ... ... бағдарламасын құру..........................
17
+ Пайдаланушының интерфейсін ұйымдастыру.....................................
20
Қорытынды.........................................................................................................
23
Пайдаланылған әдебиеттер...............................................................................
24
Қосымша 1..........................................................................................................
25
Қосымша 2..........................................................................................................
26
Кіріспе
Қазіргі ... ... ... пайдаланушылар арасында Windows операциялық жүйелері жанұясы танымал және бағдарлама жасауға қызыққандар, осы жүйеде жұмыс жасайтын бағдарламалар жазуға ... ... ... ... ... ... жасау құралдарына деген эффективті қажеттілік, бағдарламалау тілдерінің пайда ... ... ... ішінде келесілерді Borland Delphi және Microsoft Visual Basic ... ... Тез ... ... ... ... жобалау технологиясы және оқиғалы бағдарламалау жатады. Оның мәні жасау ортасы бағдарламаның генерация кодының үлкен бөлігін алады және бағдарламалаушыға ... ... және ... ... ... ... ... қалдырады.
Borland Delphi қазіргі уақытта бағдарламаудың ең танымал тілдерінің бірі болып саналады. Borland Delphi Windows-қа ... ... ... бар ... ... ... ... береді. Бұл курстық жұмыста қолданушының қосымша модульдік жобасын шешуде Windows ... ... ... ... жұмыстың мақсаты - Borland Delphi интерактивті жобалау ортасында электрондық оқу құралы бағдарламасын құру болып табылады. Электрондық оқулық құралында ... ... ... ... ... ... ... Сонымен қоса оқу құралы ішінде тест болады. Тест кітапты оқыған адамның сол кітаптағы материал бойынша алынған білімін ... Delphi ... ... ... оқу ... ... ... жұмыстың мақсаты: Pascal тілінің файлдар және олармен жұмыс істеу операторлары туралы электронды оқу құралын құрастыру. Осы мақсатты шешу барысында төмендегі ... ... Delphi ОББ ... ... ... Pascal ... файлдар және олармен жұмыс істеу операторлары туралы мәлімет жинақтау;
* Көптеген техникалық әдістемелік кітаптар оқу;
* Жиналған материалдың ішінен ең ... ... ... ... оқу ... ... принциптерін меңгеру;
* Delphi бағдарламасында электронды оқулықты құрастыру.
* Теориялық бөлім
+ Delphi бағдарламалау ортасы
Embarcadero Delphi - [дэ́лф'и], кезінде Borland Delphi және CodeGear Delphi - Borland ... ... ... Windows, Mac OS, iOS және ... ... Delphi (бұрынғы Object Pascal) бағдарламалау тілінде жазылатын интеграцияланған ... ... ... ... ... ... фирмасының қолында.
Embarcadero Delphi Embarcadero RAD Studio қолбанбалы бағдарламалар ... ... ... ... ... оның бес түрі ... Starter, ... Enterprise, Ultimate және Architect. Embarcadero-ның Delphi-ді дамытуға жауапты басты офисі Торонто қаласында орналасқан. Ал ... оны ... ... және ... ... жетілдіреді. Ресейде Embarcadero-ның екі офисі бар. Олар Санкт-Петербург (бағдарламаны жетілдіру) пен Мәскеу ... ... ... ... Windows, Mac OS X және iOS, ... аз ... ... бағдарлама (RAD) құруға арналған. Жеңіл бағдарламалау тілі мен аз уақытта delphi-кодты машиналық кодтқа айналдыру арқасында операциялық жүйемен төмен ... ... C/C++ ... жазылған фреймворктар мен кодттарды қолдануға болады. Жасалған бағдарламалар бөтен бағдарламаларға тәуелді емес. Мысалы, Microsoft .NET немесе Java Virtual Machine. ... ... беру мен ... ... коды арқылы қадағаланады. Ол бір жағынан кодтың сапасына қатаң бақылау ... ... ... ... ... ... тез ... жасауға болады.
2006 жылдың 8 ақпанында Borland еншілес CodeGear компаниясына бөлініп берген бағдарламалау құралдары мен InterBase деректер базасының серверімен айналысатын ... ... ... ... 2008 ... 1 ... ол Embarcadero Technologies компаниясына сатылды. Қазіргі уақыттағы рет бойынша 22-ші нұсқасы Delphi XE8 деп аталады. Ол Embarcadero RAD Studio XE8 ... ... ... құрамына кіреді. Бұл нұсқасына Delphi және C++ бағдарламалау тілдері кіреді.
Borland Delphi-дің (кейін Delphi 1 ... ... ... ... 1995 жылы шығарылып, Windows 3.1-ге 16 разрядты бағдарламалар жасауға арналған. Ол RAD ... ең ... ... (ағл. rapid ... ... - жылдам бағдарламалар жасау) - бағдарламалаушыға барынша тез компьютерлік бағдарламалар жасауға мүмкіндік ... ... ... ... бағдарламалауды ыңғайлы және жылдам етуге ерекше көңіл бөлетін бағдарламаларды ... ... ... RAD - бұл ... ... ... ... сапалы және тез бағдарлама жасау үшін жасалған жобалау процессінің тіршілік кезеңі. RAD XX ғасырдың аяғынан кең ... RAD ... ... ... бағдарламалау концепциясымен салыстырылады.
Программа негізінен екі бөлімен тұрады.
* Borland Delphi программалау тілі.
* Paradox берілгендер қоры.
Курстық жұмыста Delphi ... ... ... ... ... ... күрделі және жұмыс істеу жағынан мүмкіндігі тілдердің бірі.
Программалау тілінде ... ... ... яғни ... іске ... және форма бетіндегі алма суреттерін шығаруға және есеп нәтижесін беріп отыруда пайдаланды.
Paradox берілгендер қорын ... ... Delphi ... тілімен жақсы байланысады және онымен жұмыс істеу ... ... ... келеді.
Берілгендер қорын басқару жүйесі (БҚБЖ) -- берілгендер қорымен жұмыс істеуге арналған Delphi ортасындағы программалар қатарында dBase, Paradox, Access, FoxPro т.б. да бар. Database Desktop ... ... Paradox ең ... көп ... ... Paradox ... Paradox 1, Paradox 2, Paradox 3, Paradox4, Paradox5, Paradox6, Paradox 7 сияқты бірнеше нұсқалары ... ... екі ... ... ... жазбалар деп, бағандары өрістер деп аталады. Дәлірек айтқанда берілендер қорында кестедегі әрбір жол жазба ... ... ал ... ... өрістерге бөлінеді.
Windows жүйесінің элементтерімен таныс кез-келген қолданушының Paradox программасын оқып ... ... жоқ десе де ... ... Paradox ... жұмыс істеу принциптері Windows жүйесіне негізделген, оның объектілері терезе түрінде ашылады.
Процедуралық программалау тілдерінде программаның жұмысы операторларды ... ... ... ал, ... ... ... ол қатаң логикалық ережелерге сәйкес өзгертулер енгізу ретінде ... ... ... ... ... программалау тіліне программаның жұмысы негізінен оқиғалар тізбегінен және түрлі объектілердің осы оқиғаларға жауабынан тұрады. Олардың визуальды ... -- Visual Basic тілі Qbasic ... тілі ... ал Delphi ... ... Паскаль (Object Pascal) тілі құрылған (visual -- көзбен көру, экрандық). Олар, әсіресе, Delphi программалау тілі -- кез ... ... ... ... ... тез, ... тіл.
Паскаль тілін оқып үйренуге жеңіл және MSDOS жүйесінде программа ... ең ... ... ... тілі ... белгілі. Delphi-де Паскаль тілінде орындау мүмкін және мүмкін емес күрделі процестерді программалауға болады. DeIphi-дің негізгі ерекшелігі -- онда ... ... ... және ... ... ... (Windows ортасында пайдаланатындықтан, Delphi-де программаны көбінесе қосымша деп ... Бұл ... ... ... революция жасады деуге болады.
+ Delphi және Object Pascal бағдарламалау тілдері
Delphi бағдарламалау тілі -- ... ... ... ... грек ... ... атынан алынған. Дельфы қаласының аты өнер қамқоршысы және даналық құдайы Апалон ... ... ... Аңыз ... ... үйі Дельфыда орналасқан екен. Оның абыздары, келгендерге күн ілгері не болатыны жайлы болжаулар айтумен айналысыпты. Қазіргі кезде қаланың орны ғана ... Осы ... ... ... Delphi- ... ... күнде бағдарламаларды жасауға арналған кең қолданылатын жүйелердің бірі болып табылады.
Delphi жүйесін Borland фирмасының бағдарламалаушылары 19 жылы жасаған болатын. ... ... ... ... ... ... табылады. Оның құрамындағы саймандар мен компоненттердің көмегімен бағдарламалар жобалары құрастырылады. Сонымен қатар Delphi жүйесі Windows амалдық жүйесі үшін және ... ... үшін ... жасай алады.
Дельфи (Delphi) -- Borland фирмасы Турбо-Паскал тілінің негізінде жасаған. Программалаудың бұл тілі көбінесе технологиясы бойынша ... ... ... ... пайдаланылады. Delphi - де негізгі күні қолда бар программаны барынша көп қайталап пайдалануға жұмсалады. Бұл құрастырушыларға бұрын дайын ... ... ... ... сондай-ак өздерінің жеке объектілерін әзірлеуіне мүмкіндік береді.
Delphi кезінде Object Pascal деп ... Delphi 7-ден ... ... Object Pascal ... ... Delphi ... бастады.
Object Pascal (ағл. Объекттік Паскаль) - 1986 жылы Apple Computer ... ... ... кеңес алған Ларри Теслердің тобымен жасалған бағдарламалау тілі. Ол Apple Lisa компьютерінде қолданылған, бұрын Clascal деп ... ... ескі ... ... ... ... Object ... Turbo Pascal-ға қарағандағы өзгерістері енді екі топқа бөлінетін символдық, нақты және жолдық типтерді қамтыды:
Фундаменталды (fundamental) типтер. Олардың ... ... ... бар ... бит ... ... ... және кез келген операциялық жүйелер мен компьютерлік платформаларға арналған Object ... ... ... ... өзгертілмейді.
Рулық (generic) типтер. Олардың жадтағы көрсетілуі бекітілмейді және белгілі бір ... жүйе мен ... ... үшін ... ... ... Pascal - ... Паскаль бағдарламалау тілінің дамуының нәтижесі. Ал Turbo Pascal Паскаль тілінен дамыған. Паскаль толығымен процедуралық бағдарламалау тілі болған. Турбо ... 5.5-ші ... ... ... объектіге-бағытталған қасиеттер қосты.
Object Pascal тілі Delphi бағдарламалау тілі және стандартты Pascal тілінің ... - ... ... ... ... Delphi жүйесі визуалды бағдарламалау мүмкіндігін VCL визуалды компонеттердің библиотекасы көмегімен қамтамасыз етеді.
Визуалды компоненттердің библиотекасы (Visual Component Library, VCL) ... тез ... ... ... кластарды құрайды. Библиотеканың элементтері Object Pascal - да жазылған, сондықтан ол интегралданған Delphi қосымшасының өңдеу ортасымен ... ... VCL де ... ... емес ... тұрады, және визуалды компоненттер, және де TObject абстракті кластан бастап басқа да кластар бар. Барлық ... - ... ... ... ... ... ... емес.
VCL - дің барлық кластары иерархияның анықталған сатысында ... және ... ... ... ... - барлық Object Pascal класының жалпы тегі (атасы) ол иерархияның тамырында (түбірінде) орналасады. Бұл ... ... ... ... және ... ... кластары үшін жалпы әдістер қолданылады. Негізгі әдістерін атап өтейік:
* Create - объектіні ... ... - ... ... ... табу ... ... келесі түрлерге бөлінеді:
+ Кілттік сөздер (ключевые, заразервированные)
+ Стандатты идентификаторлар
+ Қолданушының идентификаторлары
Кілттік сөздер тілдің құрама бөлігі болып ... ... ... ... ... ... (полужирный) шрифтпен бөлінеді, Мысалы,
And
Array
As
Asm
Begin
Case
Class
Const
Constructor
Destructor
Div
Do
Downto
Else
End
Except
Exports
File
Finalization
For
Function
Goto
If
Implementation
In
Inherited
Inline
Interface
Is
Label
Library
Finally
mod
nil
not
object
of
or
out
packed
procedure
program
property e
raise
record
repeat
resource string
shl
Кесте 1 - Кілттік сөздер
Стандартты идентификатор келесі анықталған тілдің өңдеуші конструкциясын ... үшін ... ... Мәліметтердің типі;
+ Тұрақты (Констант);
+ Процедура және функция.
Стандартты идентификаторлары бағдарламада кейбір стандарттармен байланысқан. Оларға:
Absolute
Abstract
Assembler
Automated
Cdecl
Contains
Default
Dispid
Dynamic
Export
External
Far
Forward
Implements
Index
Message
Name
Near
Nodefault
Override
Packade
Pascal
Private
Protected
Public
Published
Read
Readonly
Register
Reintroduce
Requires
Resident
Safecall
Stdcall
Strored
Virtual
Write
Writeonly
Кесте 2 - Стандартты идентификаторлар
Қолданушының ... ... ... ... ... айнымалы, процедура, функция және мәліметтер типін белгілеу үшін қолданылады. Бұл аттар бағдарламашының (программист) өзі ... және ол ... ... сай келу ... әріп ... ... ... құрылады;
Идентификатор барлық уақытта әріппен басталады, тек 0 - 9999 диапазонында ... ... сан ... ... кірмейді;
Идентификаторда кіші және бас әріптерді қолдануға болады, компилятор оларды бірдей қабылдайды. Арнайы символдарды пайдалануға болмағандықтан оларды әдемілік үшін басты ... ... ... ... ... немесе btnOpen.
Бағдарламада екі идентификаторлардың арасына ең кемінде бір бөлгіш (разделитель) болуы керек.
Delphi бағдарламалау ортасының жетінші ... ... Object Pascal ... тілі ресми түрде Delphi деп аталатын болды. Object Pascal бағдарламалау тілі басқа бағдарламалаушылармен дамытылып және ... ... ...
+ ... ... объектілі бағытталған бағдарламалау ортасы қолданушыға Windows операциялық жүйесінде үйлестірілген қосымшалар құруға мүмкіндік береді. Қазіргі ... ... ... ... түрде оның анықтамалық материалдарымен жұмыс істеуді қажет етеді. Қазіргі бағдарламалардың көбінде HTML форматындағы мәліметтермен ... ... ... ... оқу үшін ... Internet Explorer ... кіретін WebBrowser компоненті, Delphi-да ActiveX TWebBrowser компоненті қолданылады.
Сондықтан, ол Internet Explorer ... ... ... ... ... ... ... нұсқаларында бұл компонент стандартты түрде дестеге қосылған.
TWebBrowser-ді өз бағдарламаңызда қолдану үшін Internet ... сол ... ... ... ... оның ішінде HTML бетін шығару үшін оның Navigate ... ... ... ... ... ... Headers: OleVariant;
begin
WebBrowser1.Navigate('http://www.borland.com', Flags,
TargetFrameName, PostData, Headers);
end;
Navigate амалына берілетін параметрлерді толығырақ қарастырайық.
Алғашқы болып берілетін параметр қай жерден ... ... ... ... ... жол ... ... Internet Exlporer-да қолжетімді барлық протоколдар қолданылады. Мысалы, file:// - файлды жүктеу, res:// - ... ... ... ... ... ... емес және олар ... мәліметті жіберу үшін қызмет етеді.
Flags - ... ... ... ... ... ... ... бүтін сан: 1 Ресурсты жаңа терезеде ашу; 2 Бетті көріп қойғандар журналына ... 4 ... ... ... 8 ... ... сақтамау.
TargetFrameName - бет жүктелетін фреймға ат береді.
PostData - HTTP POST әдісімен ... ... үшін ... ... Егер бұл ... бос ... GET әдісі қолданылады.
Headers - HTTP-ға қосымша тақырып береді.
PostData ... ... ең ... ... ... Өйткені ол форманы толтырғаннан кейінгі алынған мәліметтерді POST HTTP-транзакциясын қажет етіп ... ... ... ... береді.
Мысалы, келесі код Delphi-дағы формада толтырылған адам аты мен оның құпия сөзін серверге жібереді:
var
LoginDialog: TLoginDialog;
Flags, TargetFrameName, ... Headers: ... ... ... do ... ShowModal = mrOk then
begin
S := Format('UserName=%s&Password=%s',
[Edit1.Text, Edit2.Text]);
PostData := VarArrayCreate([1, Length(S) + 1], varByte);
System.Move(S[1], VarArrayLock(PostData)^, Length(S) + ... := ... ... ... ... бұл ... ... ASP - скрипттпен өңделуі мүмкін:
Dim sConnect
Dim sUserName
Dim sPassword
sUserName = Request.Form("User")
sPassword = Request.Form("Pass"
sConnect = ... Security ... & ... ... ... & ... & ... & _
";User ID=" & sUserName
Session("ConnectString") = sConnect
Мәліметтер алынғаннан кейін қолданушыға онымен жұмыс істеуге мүмкіндік беру керек. TWebBrowser-дың функцияларының көбі ... ... ... ... ... ... ететін ExecWB әдісі арқылы қолжетімді.
Осы әдістің түрі:
procedure ... ... // ... ... ... // ... параметрлері
var pvaIn, // ... ... ... // ... ... safecall;
CmdID ShDocVw.pas файлында анықталған OLECMDID тұрақтыларының бірі бола алады.
Cmdexecopt параметрі келесі төрт мәннің біреуін қабылдай алады:
* OLECMDEXECOPT_DODEFAULT - ... ... ... ... - ... ... үшін ... баптауларды сұрау (мысалы, баспа кезінде Print Setup диалогын шығару);
* OLECMDEXECOPT_DONTPROMPUSER - ... ... ... орындау;
* OLECMDEXECOPT_SHOWHELP - команда туралы анықтама шығару.
pvaIn және pvaOut параметрлері - ... және ... бір ... тәуелді.
TWebBrowser-дан кез келген команданың қол жетімділігін келесі ... ... ... ... ... ... OLECMDID // команда идентификаторы
): OLECMDF; safecall;
Функция келесі мәндерден ... ... ... ... - ... ... ... - команда қолданылады және рұқсат етілген;
* OLECMDF_LATCHED - ... - ... және ол ... қосулы;
* OLECMDF_NINCHED - кейінге сақталған.
Сөйтіп TWebBrowser-дің қазіргі нұсқасында қамтамасыз ... ... ... ... ... ... OLECMDF;
...
Flags := WebBrowser1.QueryStatusWB(OLECMDID_COPY);
ActionCopy.Visible := (Flags and OLECMDF_SUPPORTED) =
OLECMDF_SUPPORTED;
ActionCopy.Enabled := (Flags and ... = ... ... жазбай-ақ және file:// протоколы мен Navigate әдісін қолданбай-ақ жадта динамикалық ддокументтер жасауға болады.
Мысал жүзінде TWebBrowser документалдық моделімен ... ... ... ... TMemo және үш TButton ... орнастырайық:
uses MSHTML, ActiveX;
procedure TForm1.FormCreate(Sender: TObject);
begin
// Инициализируем пустой ... в ... ... ... ... OleVariant;
begin
// Этот метод переписывает в TWebBrowser HTML-
// документ из ... := ... as ... := ... 0], ... := Memo1.Text;
Document.Write(PSafeArray(TVarData(v).VArray));
Document.Close;
end;
procedure TForm1.Button3Click(Sender: TObject);
var
Document: IHTMLDocument2;
Collection: IHTMLElementCollection;
Element: IHTMLElement;
I: Integer;
begin
// Этот метод модифицирует ... ... при ... DHTML
Document := WebBrowser1.Document as IHtmlDocument2;
Collection := Document.all;
Collection := Collection.Tags('BODY') as
IHTMLElementCollection;
Element := Collection.Item(NULL, 0) as IHTMLElement;
Element.InnerText := ... by ... ... ... ... Этот метод позволяет просмотреть в TMemo код HTML
// документа из TWebBrowser
Document := WebBrowser1.Document as ... := ... 0)
as ... ... - қа ... ... жазайық:


Hello World


Hello again !


Осылайша біз HTML документтерді динамикалық құрып оларды қолданушыға ұсынуға мүмкіндік алдық. Бұл әдістің жақсысы, html-файлдарды дискіге ... ... жоқ. ... ... ... ... қорықпаймыз. Себебі html кодтық барлығы бағдарламаның ішінде сақталған.
* Практикалық бөлім
+ Электрондық оқу құралын құрастыру
Delphi ОББ ортасында электрондық оқу құралын ... ... түрі бар. ... ішінде ең оңайы TWebBrowser компоненті арқылы жасау. Мен осы жолды таңдаған себебім, мен HTML белгілеу тілін жақсы білемін.
HTML (ағылш. ... Markup Language -- ) -- ... ... ... ... мен ... ақпараттан тұратын веббеттерді жасауға арналған белгілеу тілі.
HTML (HyperTextMarkupLanguage) - бұл құжаттарды кодтау үшін қолданылатын гипертекстік белгілеу ... HTML ... ... ... ... жай текст немесе жасырын символдар(шифрлар) арқылы HTTP және HTTPS ... ... оқу ... ... деңгейлері:
* Pascal тілінде файлдармен жұмыс істеу туралы мәліметтер жинақтау;
* HTML-да кітапша бетінің интерфейсін құру;
* Табылған мәліметті HTML документтер ішіне еңгізу;
* ... ... ... ... оқу құралы қаңқасын құрып HTML файлдарымен байланыстыру.
Егер сіз HTML белгілеу тілін білмесеңіз, FrontPage немесе Adobe ... WYSIWYG ... ... ... деп ... ағл. What You See Is What You Get - ) - ... ... веб-парақ немесе слайд бола алатын жасау процессінде құрылымы көрсетілетін және қорытынды өнімге максималды ... ... ... ... ... ... ... Қазіргі уақытта сондай бағдарламалар деп те аталады.
HTML мен CSS-ты қолданып электрондық кіташаның қаңқасын құрамыз. Мен осындай қаңқа жасадым:
Сурет 2 - ... ... ... ... HTML ... ... ақпарат
...


Текст
...




Ал бұл CSS-тағы код:
* {box-sizing: border-box; -moz-box-sizing: border-box;}
#clr {clear: both;}
body {margin: 0px; font-family: ... ... ... ... fixed; ... 0; top: 0; left: 0;
padding: 5px; width: 220px; background: ... a ... #ecf0f1; display: block; padding: ... none; ... 1px solid ... a:hover, .active ... #fff; color: #5566ff ... transition: 0.2s;}
.text {
text-align: justify; padding: 10px;
margin-left: 230px; color: ... ... ... ... ... жаңа бір ... ... Мен деген папка аштым. Оның ішіне ... бар ... html ... мен css ... ... Ал енді Delphi мен ... біріктіреміз.
* Delphi 7 бағдарламасын ашып, формаға Internet бөлігінен WebBrowser компонентін қоямыз.
Сурет 3 - Internet ... ... ... ... ... ерекшелеп аламыз. Объект инспекторындағы Align қасиетіне alClient-ты ... ... ... компоненті бүкіл формаға жайылады.
* Object TreeView ішінен Form1-ді таңдаймыз. Объект инспекторынан Events қосымшасына ... OnCreate ... екі рет ... ... 4 - Object ... ... Events ... Екі рет шерткенде Unit1.pas терезесі ашылады. Курсор TForm1.FormCreate(Sender: TObject) процедурасында тұрады. Сол жерге ... ... ... ... ... path:string;
begin
path:=extractfilepath(application.exename);
wb1.navigate(path+'html/00.html');
//файлға жол
end;
Бұл кодты дұрыстап қарастырайық. Жолдық (string) типтегі path айнымалысы берілген. Path айнымалысына extractfilepath(application.exename) ... ... Бұл ... ... ... exe-файлының қатқыл дискіде орналасқан орнын көрсетеді. Келесі жолда TWebBrowser компонентінің Navigate әдісінде (path+`html/00.html`) деп ... Ол html ... ... 00.html ... ... ... ... үшін арналған. Енді бағдарламаны Project-Run командасы арқылы іске қосайық. Көріп тұрғанымыздай, бағдарлама html файлдарды браузердағыдай ақаусыз көрсетіп тұр.
+ Delphi ОББ ... ... ... ... ... ... оқып ... қолданушының білімін тест арқылы тексеру керек. Тест қолданушының электронды оқу құралынан алынған білімін еске түсіреді, оның білім ... ... Тест ... ... деңгейін ғана анықтап қана қоймайды, оның ойын жүйелеп, жылдам ... ... ... ... ... қалыптасуына, тез шешім қабылдау қасиетінің дамуына тиімді әсер ... Тест ... ... дәрежесі қандай екендігін анықтайтын және ол білімді түрлі ... ... ... ... мүмкіндік беретін тиімді жол. Тестті жасаудың ең жеңіл ... ... ...
* Ең ... ... ... ... жағына Standart бөлімінен MainMenu компонентін қояйық. Енді сол компонентті екі рет шертіп, ... ... ... ... 5 - MainMenu ... өзгерту терезесі
* Конструктордан шығамыз. Форманың үстіңгі жағында меню пайда болды. Онда тек бір ... ... Оны екі рет ... ... коддты жазамыз:
procedure TForm1.N1Click(Sender: TObject);
begin
Form2.Show;
end;
Бұл код қазір біз ... ... Form2 ... батырманы басқанда ашады.
* Ал енді тесстің формасын ашайық. Ол үшін File - New - Form ... ... ... ... ... Form2 ... ... 6 - Form2 терезесін ашу
* Енді сол формаға Additional бөлімінен ScrollBox компонентін орналастырамыз. Object Inspector-дан Align ... ... ...
* ... Standart бөлімінен 9 RadioGroup, 1 Button, 1 Label компоненттерін ScrollBox ... ... ... Ол үшін Object TreeView ... ... ScrollBox компонентінің астына саламыз. Міне осылай болуы керек:
Сурет 7 - Object TreeView ... ... ... ... ... мен ... болады. Менің 9 RadioGroup таңдаған себебім, менің электрондық оқу құралымда 9 бөлім бар. Тестте әр бөлімнен бір-бір сұрақтан болады. Button ... ... ... жауаптарды жинап Label компонентіне 9 сұрақтың нешеуіне дұрыс ... ... ... сөйлемді шығарады. Ал енді Object Inspector-ы арқылы әр компонентке ... ... ... ... жазайық.
* Label компонентінің Caption қасиетінің ішін бос қыламыз. AutoSize-ға False қасиетін береміз. ScrollBox-тың ең астыңғы жағына, ... ... ... 9 RadioGroup-ты бірінен кейін бірін, үстіден астыға тіземіз. Әр қайсысының Caption қасиетіне ... ... ... Items ... үш ... бар ... басып, шыққан терезеде 3 сұрақтың жауаптарын жазамыз.
Сурет 8 - RadioGroup компонентінің Items қасиетін ... ... Button ... Caption қасиетіне деп жазамыз. Events бөлімінен OnClick жолының үстінен шертеміз. ... ... ... кодты жазамыз.
procedure TForm2.btn1Click(Sender: TObject);
var
count,i:integer;
{count - барлық дұрыс жауап ... ... ... - ... ... ... ... RadioGroup1 компонентінің 2-ші нұсқасын (екінші жауап*) таңдаса, онда 1-ші сұрақ (answer[1] - true) ... Егер олай емес ... қате ... - ... ... ... бастап саналады. Егер ItemIndex 0-ге тең болса, ол ... ... ... ... ... ... ... тоғыз RadioGroup-қа жазып шығыңыз.
count:=0;
for i:=1 to 9 ... ... ... ... цикд ... ... count ... салу.
lbl1.Caption:='9 сурактын '+inttostr(count)+'-iне жауап бердiнiз'; //Label1 компонентінің Caption қасиетіне жауапты шығару.
end;
RadioGroup компонентін толтырғанда осылай болуы ... ... 3 Item бар. ... ... қолданушының таңдаған жауабы (Item). Қолданушы сұрақ жауабын таңдамай тұрғанда ол - 1-ге тең. Ол 0-ден ... ... ... 1-ші ... ... 0-ге тең. Екіншіні таңдаса 2-ге тең.
Сурет 9 - ... ... ... ортақ var бөліміне ({$R *.dfm}-ке дейін тұр) келесі кодты жазыңыз. Ол ... ... ... ... ... білу үшін ... array[0..9] of boolean;
Белгісі
Аты
Атқаратын жұмысы
WebBrowser
Қатқыл дискідегі немесе интернеттегі веб-парақтарды экранға шығарады.
MainMenu
Бағдарламаның негізгі меню жүйесі. Компонент арқылы ... меню ... ... ... ... шығу белдеулермен қамтылған тақташа. Егер тақташадағы орналастырылған компоненттер ашылған терезеде толығымен көрсетілмесе, онда белдеулер автоматты ... ... ... OnClick ... ... ... ... нұсқауларды орындайды.
Label
Белгі. Компонентке шағын жазу орналастыру мақсатында қолданылады.
RadioGroup
Тәуелді ауыстырғыштар тобы. ... ... ... ауыстырғыштармен жұмыс атқаруға мүмкіндік туғызады.
Кесте 3 - Бағдарлама жасау барысында қолданылған компоненттер
+ Пайдаланушының интерфейсін ұйымдастыру
Курстың жұмыстың ... ... атты ... оқу құралы жасалды. Бағдарламаның салмағы 836 КБ. Бағдарламаны ашқанда ... ... ... 10 - ... басты беті
Басты беттің үстіңгі жағында кітапша туралы ... ... ... Оның үстіңгі жағында меню бар. Көріп тұрғаныңыздай онда ... ... мен ... ... ... ... бар. Ал ... тура ортасында кітап тұр. Оны басқанда электрондық оқу құралына көшесіз. Бұнда бет екіге ... Сол ... ... кітапша бөлімдері берілген. Оларды бір рет шерту арқылы ... ... көше ... Оң жағында негізгі кітапшаның ақпараты берілген. Тінтуірдің доңғалағын айналдыру арқылы тексттің ... түсе ... 11 - ... оқу ... ... тест ... ... тестілеу бағдарламасына көшесіз. Доңғалақты айналдыру арқылы сұрақтар бойынша көшуге болады. Сұраққа жауап беру үшін ... ... ... басу ... Оны ... ол ... іші қараға боялады. Барлық сұраққа жауап бергеннен кейін батырмасын басыңыз. Егер ... ... ... ... ... сол ... бос ... деген сөйлем шығады. Ал егер барлығына жауап берсеңіз, 9 сұрақтың нешеуіне жауап бергеніңіз тұралы ... ... 12 - ... ... егер басты формадағы менюдегі батырмасын бассаңыз, келесі терезе ... Онда ... ... ... ... ... 13 - ... туралы ақпарат терезесі
Жүйелік талаптар:
* Операциялық жүйе: Windows (XP, Vista, 7, 8, 8.1, ... ... жад: 800 МБ; ... ... ... ... адамдық қызметтерінде керек. Олар процестерді автоматтандыруға көмектеседі. Бұл курстық жұмыста электрондық оқу құралын құру мен тестілеу ... құру ... ... қоса Pascal мен HTML ... білім алуға болады.
Қорыта айтқанда курстық жұмыстың нәтижесі Delphi бағдарламалау тілін қолданып ... ... бар ... оқу ... ... оқу ... Pascal тілінің негіздерін білетін адамдарға арналған. Осы оқу құралы арқылы Pascal тілінде ... ... ... ... ... қарастырылған. Оқу құралын оқу арқылы Pascal тілінде файл құру, жою, текстік файлдар және ... ... мен ... ... ... ... алумен қатар, білімді тексеруге де болады. Өйткені, оқу құралы ішінде тестілеу бағдарламасы бар. Оның ... оқу ... ... тоғыз бөлімінің ең негізгі жерлерінен сұрақтар құралған. Оқу құралын оқып болғаннан кейін өз біліміңізді тексеруге болады. ... ... осы ... оқу ... ... көмектесетініне сенемін. Өзімнің бағдарламамды толықтай өзгерту мен жетілдіруге рұқсат етемін.
Пайдаланылған ... ... ... ... ... ... ... http://delphi-help.ru/ сайты;
* Delphi визуалды бағдарламалау жүйесі, Бексарыұлы Мұратбек;
* Архангельский А.Я. Программирование в Delphi 6. - Москва ... Баас Р. и ... Delphi 6. Для ... - ... ... Бобровский В.А. Delphi 6. Учебный курс. - СПб, 2000г.
* Халықова Қ.З., Бостанов Б., ... А. ... ... ... ... ... Оқу құралы. Абай ат. ҚазҰПУ. Алматы, 2005. -301б.
* Дарахвелидзе П., Марков E. Delphi -- среда визального ... -- СПБ. ВНУ -- ... 1996 ... ... H. ... delphi для ... Киев, "Диалектика", 1996 г.
Қосымша 1
unit Unit1;
interface
//Тест бағдарламасы
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, OleCtrls, SHDocVw, ... = ... ... ... ... TMenuItem;
procedure FormCreate(Sender: TObject);
procedure N1Click(Sender: TObject);
procedure N2Click(Sender: TObject);
private
{ Private declarations ... Public ... ... TForm1;
implementation
uses Unit2, Unit3;
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
var path:string;
begin
path:=extractfilepath(application.exename);
wb1.navigate(ExtractFilePath(Application.ExeName)+'html/00.html');
end;
procedure TForm1.N1Click(Sender: TObject);
begin
Form2.Show;
end;
procedure TForm1.N2Click(Sender: TObject);
begin
AboutBox.Show;
end;
end.
Қосымша 2
unit Unit2;
interface
uses
Windows, ... ... ... Classes, ... ... ... StdCtrls, ExtCtrls;
type
TForm2 = class(TForm)
rg2: TRadioGroup;
rg3: TRadioGroup;
rg4: TRadioGroup;
rg5: TRadioGroup;
rg6: TRadioGroup;
rg7: TRadioGroup;
rg8: TRadioGroup;
rg9: TRadioGroup;
btn1: TButton;
lbl1: TLabel;
rg1: TRadioGroup;
scrlbx1: ... ... ... ... ... TObject; Shift: ... TPoint; var Handled: Boolean);
procedure scrlbx1MouseWheelUp(Sender: TObject; Shift: TShiftState;
MousePos: TPoint; var Handled: Boolean);
private
{ Private declarations }
public
{ Public ... ... ... ... ... TForm2.btn1Click(Sender: TObject);
var
count,i:integer;
begin
if rg1.ItemIndex=1 then answers[1]:=true
else answers[1]:=false;
if rg2.ItemIndex=2 then answers[2]:=true
else answers[2]:=false;
if rg3.ItemIndex=1 then answers[3]:=True
else answers[3]:=False;
if rg4.ItemIndex=0 then ... ... ... ... ... ... ... then
answers[7]:=True
else
answers[7]:=False;
if rg8.ItemIndex=1 then
answers[8]:=True
else
answers[8]:=False;
if rg9.ItemIndex=2 then
answers[9]:=True
else
answers[9]:=False;
//Тексеру
count:=0;
for i:=1 to 9 do
if answers[i] then
inc(count);
//Шығару
if ... or ... or ... ... or ... or (rg6.ItemIndex=-1)
or (rg7.ItemIndex=-1) or (rg8.ItemIndex=-1) or (rg9.ItemIndex=-1) then
lbl1.Caption:='Барлык суракка жауап берініз!'
else
lbl1.Caption:='9 сурактын '+inttostr(count)+'-iне жауап бердiнiз';
end;
procedure ... TObject; Shift: ... TPoint; var Handled: ... ... ... TObject; Shift: ... TPoint; var Handled: Boolean);
begin
scrlbx1.VertScrollBar.Position:= scrlbx1.VertScrollBar.Position-10;
end;
end.

Пән: Информатика
Жұмыс түрі: Курстық жұмыс
Көлемі: 19 бет
Бұл жұмыстың бағасы: 700 теңге









Ұқсас жұмыстар
Тақырыб Бет саны
Turbo pascal ортасындағы файлдар22 бет
Типтелген файл20 бет
Файлдарға қолданылатын функциялар мен процедуралар turbo pascal27 бет
Е- learning электронды оқу жүйесі67 бет
Delphi-де математикалық есептеуге арналған бағдарлама құру19 бет
"Автомобильдердің электротехникалық және электрондық жабдықтары" -курсы мазмұны және әдістемесі51 бет
5-сыныптың «Ежелгі дүние тарихы» оқулығымен оқушылардың жұмыс істеуі42 бет
60-80 жылдардағы ортасындағы Қазақстандағы нақты социализм12 бет
Access мәліметтер базасымен жұмыс істеу11 бет
Access мәліметтер қоймасымен жұмыс істеу15 бет


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


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

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

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

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

Email: info@stud.kz

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

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