Delphi тілінің анимация мүмкіншіліктері

Автор работы: Пользователь скрыл имя, 27 Марта 2015 в 21:03, дипломная работа

Краткое описание

Delphi тілінің анимация мүмкіншіліктері

Содержание

Кіріспе .........................................................................................................................3
1 Тарау. Бағдарламаға жалпы сипатама ……………………………………….4
§ 1.1 Анимацияның замандас мүмкіншіліктері.......................................................4
2 Тарау. Әзірлеме ортасын тандау……………………………………………..14
§ 2.1 Математикалық әдістерді таңдау...................................................................14
§ 2.2 Бағдарламалау тілін тандау............................................................................20
3 Тарау. Бағдарлама құру......................................................................................25
§ 3.1 Бағдарламаның жалпы қызмет ету алгоритімнің әзірлемесі.......................25
§ 3.2 Пайдаланушы интерфейсінің әзірлемесі.......................................................25
4 Тарау. Бағдарламалық бұйым әзірлемесі процесін сипаттау......................27
§ 4.1 Бағдарламаны сипаттау.......................................................................27
§ 4.2 Қолданылатын әдістер, алгоритмді сипаттау..................................28
§ 4.3 Құрамдас бөліктерді және олардың арасындағы байланыстарды
сипаттау.........................................................................................................29
§ 4.4 Бағдарламаның блок-схемасы............................................................29
§ 4.5 Шығыс және кіріс мәліметтерін сипаттау........................................29
§ 4.6 Бағдарламалау тілін сипаттау............................................................30
§ 4.7 Пайдаланушы жетекшілігі................................................................21
§ 4.8 Бағдарламашы жетекшілігі...............................................................32
5 Тарау. Д.К. Жұмыс істеу кезіндегі экономикалық шығындар..................34
6 Тарау. Д.К. Жұмыс істеу кезіндегі еңбекті қорғау, қауіпсіздік техникасы және өртке қарсы шаралар...................................................................................36
7 Тарау. Жалпы қортындылар.............................................................................44
§ 7.1 Бағдарлама листингі.......................................................................................44
§ 7.2 Есептеу қортындылары...................................................................................48
Әдебиет тізімі............................................................................................................49
Қосымшалар.............................................................................................................51
Бағдарламасы бар дискета немесе басқа тасуалы

Прикрепленные файлы: 1 файл

Delphi тілінің анимация мүмкіншіліктері.doc

— 413.00 Кб (Скачать документ)

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

Жүйелік персоналға жұмсалған қаражатқа жүйелдік әкімшілкке, мәліметтер базасын, жинақтарды басқаруға, тиісті персоналдар категориясын басқаруға шыққан шығындар да енеді.  S/390 және UNIX серверлерге арналған персоналдар санын Computer Economics, COMPASS және АҚШ қорғаныс Министрлігінің мәліметін ескере отырып, өндірістік нормативтер бойынша бағалаған. Персоналдарға жұмсалатын шығын Computer Economics 1996 жылға арналған орташа мәліметіне байланысты (АҚШ үшін) жалақысы, сыйақысы, іссапар және оқу, сонымен қатар, ірі ұйымдардағы ұқсас баптарға қарап есептелген. Жүйелік персоналға жұмсалаған қаражатқа жүйелік әкімшілікке, мәліметтер базасын, жинақтарды басқаруға, тиісті персоналдар категориясын басқаруға шыққан шығындар да енеді. Мәліметтер базасы үшін персоналдар саны өндірістік нормативтерге сәйкес бағаланған. Пайдаланушыларға арналған мәліметтер базасына арналған орталықтандырылған серверлер нұсқасы үшін бағдарламалық өнімдер шығыны алғашқы төлемдер ставкасы, осы өнімді жеткізушілердің лицензиялары және әрі қарай қолдауы бойынша бағалаған. Жеткізушілер ұсынған бағаны түсіру немесе топтық лицензиялау нұсқалары үшін шығын деңгейін азайтуы мүмкін.

 

 

6 Тарау. ДК жұмыс істеу кезіндегі  қауіпсіздік техникасы, өрке қарсы  шаралар және еңбекті қорғау

 

 

 

ДК жабдықталған класстарды өрке қарсы қауіпсіздік ережесін қатаң сақтау қажет.

- Жұмыс орында, өтетін шығатын  әкерлерде артық нәрселер жатпауы тиіс (шашылмауы тиіс)

- Бұл класстарда темекі тарту, электорқыздырғыш құралдарды қолдануға  тыйым салынады.

- Жұмыс соңында (жұмысты аяқтаған  соң?) ДК сөндіріп, журналға жұмыстың  аяқталғаны туралы жазбаны түсіру  керек.

- Өрт шыққан  жағдайда жабдықтарды сөндіріп, өрт өшіру шараларын қолданып, басшылыққа, кезекшілерге хабарлау қажет.

- Өрт сөндіру кезінде электр  тоғын өткізбейтін өрт өшіру  құралдарын қолдау керек.

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

  1. Қауіпсіздік талаптары.

1.1Информатика кабинетінде жұмыс  істеуге оқушылар 1-сыныптан бастап  жіберіледі.

1.2Қауіпті және зиянды өндірістік факторлар:

  • Бейнетерминалдың ионды және бейонды сәулесінің адам денесіне әсері.
  • Қорғаныс жоқ жабдықтармен жұмыс істеу кезінде, бейнетерминалдың артқа қақпағы ашық қалса,биоктың қорғаныс экраны болмаса электор тоғынан залал келуі мүмкін.
  • Бейнетерминалдың дұрыс жұмыс істемеу кесірінен, экрандағы бенелердің оның көрінбеуінен көз жанарына теріс әсерін тигізеді.
    1. Информатика кабинеті өрт сөндіргіш құралдармен қамтамасыз етілуі тиіс.

2.Жұмыс алдындағы қауіпсіздік  талаптары.

2.1.Информатика кабинетін желдетіп, ауа қызуы 19....21°с, ал ауа  ылғалдығы 55....62% шамасында болуы тиіс.

    1. қорғаныс жабдықтарының және бейнетерминалдың қорғаныс экрандарының барын тексеру.
    2. Бейнетерминалды қосу және экрандардағы бейнелеріді анықтылығын және тұрақтылығын тексеру.
  1. Жұмыс уақытындағы қауіпсіздік талаптары.
    1. Оқытушының рұқсатынсыз бейнетерминалды қоспау:
    2. Бір бейнетерминалды екі адамнан артық отырғанда, өткізуге болмайды.
    3. Ақпарат жазу үшін кабинетте борлы тақта пайдалануға болмайды.
    4. Жұмыс жасап тұрған бейнетерминал экраны мен көздің арақашықтығы 0,6....0,7м, көз деңгейі экранның ортасына келуі тиіс.
    5. Жазу дәптерін 12....15° бұрышта, көзден 55....65см арақашықтығыорналастыру қажет және отырған жер жарық болуы тиіс.

 

    1. Бейнетерминалдардың экрандарындағы бейне тұрақты, анық, мүмкінді -гінше  нақты болуы тиіс.Экранда шашыраңқы сәулелер, шамдардың жа-рығы терезеден күн сәулесі түспеуі керек.
    2. Бейнетерминалдарда жұмыс істеу ұзақтығы 1-сынып оқушылары үшін

(6 жас)- 10 мин,2-5сынып оқушылары үшін 20 мин, 8-9 сыныптарға 

25 мин,10-11 сыныптарға -2 сабақ қатар болғанда бірінші сабағында

30мин,екінші сабағында 20 мин,содан  кейін көз шаршағанда жасайтын  арнайы жаттығулар орындау үшін 10мин үзіліс алу қажет.

    1. Өндірістік практика кезінде күнделікті бейнетерминалдарға жұмыс істеу ұзақтығы 3 сағаттан аспауы қажет.Бұл кезде профилактикалық шаралар сақталуы керек.
    2. Бейнетерминал пайдаланылған сабақ саны бір күнде 5-9 сынып оқушылары үшін бір рет және 10-11 сынып оқушылары үшін 2реттен аспауы тиіс.
  1. Апат жағдайындағы қауіпсіздік талаптары .

4.1Бейнетерминалдың жұмысында ақау болса, оны сөндіріп, мұғалімге айту қажет.

4.2Өзіңізді нашар сезінсеңіз,басыңыз  ауырса немесе басыңыз айналса  жұмысты тоқтатып,мұғалімге хабарлау  қажет.

4.3.Оқушыны электр тоғы соқса,бейнетерминалдарды  тез сөндіріп,зардап ше-гуге алғашқы көмек көрсетіп,осы туралы мекеме әкімшілігіне ата-аналарына хабарлау,қажет жағдайда жақын жердегі емдеу орталығына апару қажет.

 

  1. Жұмыс соңындағы қауіпсіздік талаптары.

5.1.Мұғалімнің рұқсатымен бейнетерминалдарды  сөндіріп, олардың экранын шаңнан  спиртпен сүрту қажет.

5.2.Информатика кабинетін ылғалды  шүберекпен сүртіп, желдетіп алу  қажет.

1 Жалпы ережелер 

1.1.Осы нұсқамада персоналды  ЭЕМ жабдықталған класстарда  сабақ өткізген немесе жұмыс  істеген кезде қолданылатын қауіпсіздік  шаралары қарастырылған.

1.2.Нұсқама компьютер класстарында  жұмыс жүргізетін тұлғалар, яғни  пайдаланушылар (оқытушылар,қызметкерлер, студенттер) үшін міндетті болып  табылады.

1.3.Компьютер кабинетіне алғаш  жіберілетін әрбір пайдаланушы  қауіпсіздік техникасы бойынша  нұсқамамен және компьютерлік кабинеттегі ережелермен танысуы тиіс,ол туралы ҚТ жөніндегі журналда жазба қалдыру керек.

    1. Компьютерлік кабинетте компьютерлік техниканың, желілік және компьютерлік қалыптың және бағдарламалық қамтамасыз етудің сақта-луына пайдаланушы, ал сабақ үстінде оқытушы жауап береді.
    2. Үй дискеттерін қолдану кезінде оқытушы пайдаланушылардың компьютерлік вирус тексеруін бақылау қажет.
    3. Компьютерлік  классты  кабинетке жауапты адамға (класс инженері) тапсырмай, қалдырып кетуге тыйым салынады.
    4. Пайдаланушы компьютерлік класстың жұмыс режимін,ал оқытушы класстың жүктеме режимін сақтауға міндетті.Студенттер саны компью-терлік кабинеттегі жұмыс орнының санынан аспауы қажет.
    5. Студенттердің компьютерлік кабинеттегі өзіндік жұмысына оқу заң тыс уақытта қауіпсіздік техникасы бойынша нұсқамамен және жұмыс ережесімен  танысқан соң рұқсат етіледі.
    6. Өзіндік жұмыс кезінде және сабақ үстінде компьютерлік ойындар ойнау үзілді – кесілді тыйым салынады.Студенттерді бақылау және жауапкершілік оқытушыға жүктеледі.

2.  Қауіпсіздік шаралар

2.1.ДК құрамдас блоктарына (клавиатура, манитор, жүйелік блок) артық нәрселерді  қоюға тыйым салынады.

2.2.ДК бөліктерін өз бетімен  құрастырып алып салуға тыйым  салынады.

    1. Тышқанды кілемшеден тыс пайдалануға тыйым салынады.
    2. Жұмыс істеп тұрған маниторға қояды,қаламды немесе басқа да заттарды тигізуге болмайды.
    3. Компьютерлік оқу класстарына сырт киіммен кіруге тыйым салынады.
    4. Компьютерлік кабинетте азық-түлік сақтауға, пайдалануға тыйым салынады.
    5. Тышқанды кілемшеден тыс пайдалануға тыйым салынады.
    6. Жұмыс істеп тұрған маниторға қояды,қаламды немесе басқа да заттарды тигізуге болмайды.
    7. Компьютерлік оқу класстарына сырт киіммен кіруге тыйым салынады.
    8. Компьютерлік кабинетте азық-түлік сақтауға, пайдалануға тыйым салынады.
  1. Жұмыс соңындағы қауіпсіздік талаптары.

5.1.Мұғалімнің рұқсатымен бейнетерминалдарды  сөндіріп, олардың экранын шаңнан  спиртпен сүрту қажет.

5.2.Информатика кабинетін ылғалды  шүберекпен сүртіп, желдетіп алу  қажет.

1 Жалпы ережелер 

1.1.Осы нұсқамада персоналды  ЭЕМ жабдықталған класстарда  сабақ өткізген немесе жұмыс істеген кезде қолданылатын қауіпсіздік шаралары қарастырылған.

1.2.Нұсқама компьютер класстарында  жұмыс жүргізетін тұлғалар, яғни  пайдаланушылар (оқытушылар,қызметкерлер, студенттер) үшін міндетті болып  табылады.

1.3.Компьютер кабинетіне алғаш жіберілетін әрбір пайдаланушы қауіпсіздік техникасы бойынша нұсқамамен және компьютерлік кабинеттегі ережелермен танысуы тиіс,ол туралы ҚТ жөніндегі журналда жазба қалдыру керек.

    1. Компьютерлік кабинетте компьютерлік техниканың, желілік және компьютерлік қалыптың және бағдарламалық қамтамасыз етудің сақта-луына пайдаланушы, ал сабақ үстінде оқытушы жауап береді.
    2. Үй дискеттерін қолдану кезінде оқытушы пайдаланушылардың компьютерлік вирус тексеруін бақылау қажет.

Компьютерлік  классты  кабинетке жауапты адамға (класс инженері) тапсырмай, қалдырып кетуге тыйым салынады.

  • кәсіби сыныптары бар кәсіби бағдарланған мектептермен шарт жасасу:
  • орта кәсіби оқу орындарымен байланыс орнату және оқушыларды орта кәсіби оқу орындарының оқу жоспарлары боцынша оқытуды ұйымдастыру:
  • колледж профессорларымен,еңбек нарығында сұранысы бар мамандық өкілдерімен талапкерлердің кездесуін ұйымдастыру және өткізу:
  • оқуға түсушілер үшін жарнама материалдарын дайындау:мамандықтар туралы анықтамалар және буклеттер, ақпараттық, анықтамалар, жарнамалық парақтар, афишалар т.б .
  • талапкерлердің білім  деңгейін тексеру, таным белсенділіктерін дамыту мақсатымен пәндік аймақтық, аудандық және қалалық олимпиадаларды ұйымдастыруға өткізуге қатысуы;

шарт  бойынша тапсырушылар мүддесіне сай ақылы қосымша білім беру қызметтердің ұйымдастыру және жарнамалау;

  • шарт бойынша қарым-қатынас жасасатын мектептерде оқушылардың оқу үлгерімен тексеретін жүйелік компьютерлік диогнистика жүргізу;
  • топтар арасында дайындық курс жұмыстарын ұйымдастыру;
  • өндірістік тәжірибеден өту кезінде коледж мамандықтарын жарнамалы;

мектеп оқушылары үшін коледж бойынша экскурсия ұйымдастыру және өткізу.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

7 Тарау. Жалпы қортындылар

 

 

§ 7.1 Бағдарлама листингі

 

 

 

№1 форманың модулі

{ Видео (AVI) плейер

  (с) Каршигина Акмарал, 2006}

unit Vp_;

 

interface

 

uses

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

  Dialogs, ExtCtrls, MPlayer, Buttons, StdCtrls;

 

type

  TForm1 = class(TForm)

    OpenDialog: TOpenDialog;

    SpeedButton1: TSpeedButton;

    SpeedButton2: TSpeedButton;

    MediaPlayer: TMediaPlayer;

    procedure FormCreate(Sender: TObject);

    procedure SpeedButton2Click(Sender: TObject);

    procedure SpeedButton1Click(Sender: TObject);

    procedure MediaPlayerNotify(Sender: TObject);

  private

    { Private declarations }

  public

    { Public declarations }

  end;

 

var

  Form1: TForm1;

 

implementation

 

{$R *.dfm}

 

Бағдарлама жүктелгенде орындалады

procedure TForm1.FormCreate(Sender: TObject);

begin

   MediaPlayer.Display := Form1;

 

   // это можно сделать во  время создания

   // формы. Но на всякий  случай ...

   SpeedButton1.GroupIndex := 1;

   SpeedButton1.AllowAllUp := True;

end;

 

// возвращает размер изображения AVI файла

procedure DimAvi(f: string; var w,h: integer);

var

    fst: TFileStream;

    // структуру заголовка AVI файла можно

    // найти, например, в  ..\CBuilder\Include\aviriff.h

    header: record

        RIFF: array[1..4] of char;    // 'RIFF'

        nu1:  array[1..5] of LongInt; // не используеися (в данном  случае)

        AVIH: array[1..4] of char;    // 'avih'

        nu2:  array[1..9] of LongInt; // не используеися (в данном  случае)

        Width:  LongInt;

        Height: LongInt;

    end;

 

begin

    fst := TFileStream.Create(f,fmOpenRead);

    fst.Read(header,sizeof(header));

    w := header.Width;

    h := header.Height;

    fst.Destroy;

end;

 

 

// щелчок на кнопке Eject - выбор  файла

procedure TForm1.SpeedButton2Click(Sender: TObject);

var

    top,left: integer; // левый верхний  угол "экрана"

    width,height: integer; // размер экрана

    mw,mh: integer; // максимально  возможный размер экрана

    kh,kw: real;    // коэф-ты  масштабирования по h и w

    k: real;        // коэф. масштабирования

 

begin

    OpenDialog.Title := 'Выбор клипа';

    if not OpenDialog.Execute

      then exit;

 

    // пользователь выбрал  файл

    // определим размер и  положение

Информация о работе Delphi тілінің анимация мүмкіншіліктері