Текстовый редактор
Практическая работа, 26 Апреля 2013, автор: пользователь скрыл имя
Краткое описание
1. Открыл Builder C++ 6.
2. Задал внешний вид формы при помощи компонентов RichEdit, Button, OpenDialog, SaveDialog, FontDialog и PrintDialog.
3. Открыл окно ввода программного кода(Unit1.cpp) и ввел следующий код:
• #include <vcl.h>
• #pragma hdrstop
• #include "Unit1.h"
Вложенные файлы: 1 файл
Отчет 2.docx
— 46.12 Кб (Скачать файл)МИНИСТЕРСТВО ОБРАЗОВАНИЯ И НАУКИ РОССИЙСКОЙ ФЕДЕРАЦИИ
Федеральное
государственное бюджетное
«Юго-Западный Государственный Университет»
(ЮЗГУ)
Кафедра ИСиТ
ОТЧЕТ
по практической работе
по дисциплине «Информатика»
Выполнил: студент группы ИС-21б
Залетов А. Н.
Проверил: преподаватель
Титова Г. С.
Курск 2013
- Открыл Builder C++ 6.
- Задал внешний вид формы при помощи компонентов RichEdit, Button, OpenDialog, SaveDialog, FontDialog и PrintDialog.
- Открыл окно ввода программного кода(Unit1.cpp) и ввел следующий код:
- #include <vcl.h>
- #pragma hdrstop
- #include "Unit1.h"
- //----------------------------
------------------------------ ----------------- - #pragma package(smart_init)
- #pragma resource "*.dfm"
- TForm1 *Form1;
- //----------------------------
------------------------------ ----------------- - __fastcall TForm1::TForm1(TComponent* Owner)
- : TForm(Owner)
- {
- }
- //----------------------------
------------------------------ ----------------- - void __fastcall TForm1::Button1Click(TObject *Sender)
- {
- if (OpenDialog1->Execute())
- RichEdit1->Lines->
LoadFromFile(OpenDialog1-> FileName); - }
- //----------------------------
------------------------------ ----------------- - void __fastcall TForm1::Button2Click(TObject *Sender)
- {
- if (SaveDialog1->Execute())
- RichEdit1->Lines->SaveToFile(
SaveDialog1->FileName); - }
- //----------------------------
------------------------------ ----------------- - void __fastcall TForm1::Button3Click(TObject *Sender)
- {
- if (FontDialog1->Execute())
- RichEdit1->Font->Assign(
FontDialog1->Font); - }
- //----------------------------
------------------------------ ----------------- - void __fastcall TForm1::Button4Click(TObject *Sender)
- {
- RichEdit1->Lines->Clear();
- }
- //----------------------------
------------------------------ ----------------- - void __fastcall TForm1::Button6Click(TObject *Sender)
- {
- RichEdit1->Print(AnsiString("*
.txt")); - }
- //----------------------------
------------------------------ ----------------- - void __fastcall TForm1::Button5Click(TObject *Sender)
- {
- Close();
- }
- Скомпилировал приложение, нажав на кнопку Run(F9).
- Выполнил различные операции в приложении, такие как «Открыть», «Сохранить», «Шрифты», «Очистить», «Распечатать» и «Закрыть».