Реферат Технологія розробки програмного продукту

> TForm4.pimg22Click (Sender: TObject); (mmo2.Text = 'Моє перше збереження') or (mmo2.text = 'моє перше збереження') then.Visible: = False;. Visible: = False;. Visible: = False;. Visible: = True;

spnl1.Caption: = 'Натисніть на кнопку зберегти';

pimg24.Visible: = True;

;

TForm4.pimg24Click (Sender: TObject);. Visible: = False;. Visible: = False;. Visible: = False;. Visible: = False;

pimg25.Visible: = True;. Caption: = 'Введіть в поле ім'я файлу "Сохраненіе.txt" і натисніть на кнопку зберегти';

edt7.Visible: = True;;

TForm4.pimg26Click (Sender:

spnl1.Caption: = 'На робочому столі з'явився файл з нашим назвианіем і розширенням TXT Щеллкніте по ньому лівою кнопкою миші';

q: = 6;

;

TForm4.pimg28Click (Sender: TObject);. Visible: = false;. Visible: = false;. Visible: = True;. Caption: = 'Тепер натисніть Enter';;

TForm4.FormKeyPress (Sender: TObject; var Key: Char); (Key in [# 13]) or (q = 6) then.Visible: = False;. Visible: = True;

spnl1.Caption: = 'Те що ми писали в Мемо поле записалося і в TXT файли тепер ви навчилися зберігати файли з мемо поля для продовження клацніть мишкою в будь-яке місце';

end

;

TForm4.pimg30Click (Sender: TObject);. Visible: = True;. Visible: = True;. Visible: = True;

TForm4.N2Click (Sender: TObject);. Hide;. Show;;

. Unit5;

, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, Menus, MPlayer, StdCtrls, Buttons, sBitBtn, ExtCtrls, sPanel,, ComCtrls, acProgressBar;

= class (TForm): TMediaPlayer;: TMainMenu;: TMenuItem;: TMenuItem;: TMenuItem;: TImage;: TsBitBtn;: TsBitBtn;: TsBitBtn;: TsBitBtn;: TsBitBtn;: TsBitBtn;: TsBitBtn;: TsBitBtn;: TsBitBtn;: TsPanel;: TMenuItem; FormClose (Sender: TObject; var Action: TCloseAction); N3Click (Sender: TObject); N2Click (Sender: TObject); N1Click (Sender: TObject); sbtbtn1Click (Sender : TObject); sbtbtn2Click (Sender: TObject); sbtbtn3Click (Sender: TObject); sbtbtn4Click (Sender: TObject); sbtbtn5Click (Sender: TObject); sbtbtn6Click (Sender: TObject); sbtbtn7Click (Sender: TObject); sbtbtn8Click (Sender: TObject); sbtbtn9Click (Sender: TObject); N4Click (Sender: TObject);

{Private declarations}

{Public declarations};: TForm5;

, Unit3, Unit2, Unit1, Unit8;

{$ R *. dfm}

TForm5.FormClose (Sender: TObject; var Action: TCloseAction);. Close;;

TForm5.N3Click (Send...