Пән аты: Технология Сынып: 10 «А» Күні Тақырып



жүктеу 60,08 Kb.
Дата05.03.2018
өлшемі60,08 Kb.
#11286
түріСабақ

Пән аты: Технология

Сынып: 10 «А»

Күні__________________
Тақырып. Көп терезелі қосымшалар құру. Модальды және модальды емес терезелер.

Оқыту мен тәрбиелеудің міндеттері:
Мақсаты:

Delphi бағдарламалау тілінде көп терезелі қосымшалар құрып үйрету.

Көп формалармен жұмыс жасау дағдысын қалыптастыру.

Оқушыларды компьютерлік сауаттылыққа, білімділікке тәрбиелеу.



Көрнекілігі:

Сабақ жоспарын экранда проекциялау, таратпа материалдар, компьютер.



Өтілу әдісі: Мультитехникамен жабдықталған дәстүрлі сабақ.

Сабақтың барысы

І. Кіріспе. (2мин)

  • Оқушыларды түгелдеу, сынып бөлмесі, тақта тазалығына назар аудару;

  • Журнал толтыру;

  • Оқушылардың назарын сабаққа бұру,

ІІ. Өткен сабаққа шолу. (10мин)

  • Өткен сабақтар бойынша сұрақтар қою.

ІІІ. Практикалық тапсырмаларды тарату.

Практикалық тапсырма №27. Аптадағы сабақ кестесін бейнелейтін бағдарлама.

Бағдарламаға қажетті компоненттер: Form1 бетіне - Label1, Button1,Button2, Button3, Button4, Button5, Button6;



Дүйсенбіден сенбіге дейінгі 6 күннің сабақ кестесін шығару үшін Form2-Form7 беттері пайдаланылады. Form2-ден Form7-ге дейінгі форма беттеріне Memo компонентін орналастыру керек.

Объектілер инспекторы терезесінде Lines қасиетін тышқанмен белгілеп,ондағы TStrings мәнін екпінді жасайды , бұдан жолдың оң жақ шетінде үш нүкте (...) пайда болады. Үш нүктенің (...) үстінен тышқан батырмасын бассақ, String List Editor сҧхбат терезесін экранға шығарады. Осы

терезеде сабақ кестесін пернетақтадан енгізіп, OK батырмасын басамыз.Осылайша Form2-Form7 беттері дайындалады.

unit


unit Unit1;

interface

uses


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

Dialogs, StdCtrls;

type

TForm1 = class(TForm)



Button1: TButton;

Button2: TButton;

Button3: TButton;

Button4: TButton;

Button5: TButton;

Button6: TButton;

Label1: TLabel;

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure Button3Click(Sender: TObject);

procedure Button4Click(Sender: TObject);

procedure Button5Click(Sender: TObject);

procedure Button6Click(Sender: TObject);

private


{ Private declarations }

public


{ Public declarations }

end;


var

Form1: TForm1;

implementation

uses Unit2, Unit3, Unit4, Unit5, Unit6, Unit7;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

begin

Form2.Show;



end;

procedure TForm1.Button2Click(Sender: TObject);

begin

Form3.show;



end;

procedure TForm1.Button3Click(Sender: TObject);

begin

form4.show



end;

procedure TForm1.Button4Click(Sender: TObject);

begin

Form5.show;



end;

procedure TForm1.Button5Click(Sender: TObject);

begin

Form6.show;



end;

procedure TForm1.Button6Click(Sender: TObject);

begin

form7.show;



end;

end.




ІV. Сабақты бекіту және бағалау: (10мин)

Практикалық тапсырмаларды тексеру.


V. Үйге (3мин)

Сабақ таңдаған кезде үй жұмысын шығаратын бағдарлама құру.
жүктеу 60,08 Kb.

Достарыңызбен бөлісу:




©g.engime.org 2024
әкімшілігінің қараңыз

    Басты бет
рсетілетін қызмет
халықаралық қаржы
Астана халықаралық
қызмет регламенті
бекіту туралы
туралы ережені
орталығы туралы
субсидиялау мемлекеттік
кеңес туралы
ніндегі кеңес
орталығын басқару
қаржы орталығын
қаржы орталығы
құрамын бекіту
неркәсіптік кешен
міндетті құпия
болуына ерікті
тексерілу мемлекеттік
медициналық тексерілу
құпия медициналық
ерікті анонимді
Бастауыш тәлім
қатысуға жолдамалар
қызметшілері арасындағы
академиялық демалыс
алушыларға академиялық
білім алушыларға
ұйымдарында білім
туралы хабарландыру
конкурс туралы
мемлекеттік қызметшілері
мемлекеттік әкімшілік
органдардың мемлекеттік
мемлекеттік органдардың
барлық мемлекеттік
арналған барлық
орналасуға арналған
лауазымына орналасуға
әкімшілік лауазымына
инфекцияның болуына
жәрдемдесудің белсенді
шараларына қатысуға
саласындағы дайындаушы
ленген қосылған
шегінде бюджетке
салығы шегінде
есептелген қосылған
ұйымдарға есептелген
дайындаушы ұйымдарға
кешен саласындағы
сомасын субсидиялау