346199
столько раз учителя, ученики и родители
посетили сайт «Инфоурок»
за прошедшие 24 часа
+Добавить материал
и получить бесплатное
свидетельство о публикации
в СМИ №ФС77-60625 от 20.01.2015
Дистанционные курсы профессиональной переподготовки и повышения квалификации для педагогов

Дистанционные курсы для педагогов - курсы профессиональной переподготовки от 6.900 руб.;
- курсы повышения квалификации от 1.500 руб.
Престижные документы для аттестации

ВЫБРАТЬ КУРС СО СКИДКОЙ 50%

ВНИМАНИЕ: Скидка действует ТОЛЬКО сейчас!

(Лицензия на осуществление образовательной деятельности № 5201 выдана ООО "Инфоурок")

ИнфоурокИнформатикаКонспектыУрок информатики "Поле Меmo".

Урок информатики "Поле Меmo".

Выберите документ из архива для просмотра:

Выбранный для просмотра документ 11 кл мемо.ppt

библиотека
материалов
Компонент: 		Мемо
Многострочное поле редактирования -компонент Memo Свойства	Назначение Lines	О...
Работа со строками компонента Мемо Текст можно вводить в редакторе –свойство...
procedure TForm1.Button1Click(Sender: TObject); var i: integer; begin for i:=...
Для закрепления материала выполним небольшое практическое задание, создадим п...
Кнопка "Открыть": Memo1.Lines.LoadFromFile('mytetxt.txt'); Кнопка "Сохранить:...
Подготовиться к самостоятельной работе Вопросы: Из каких основных окон состои...

Описание презентации по отдельным слайдам:

1 слайд Компонент: 		Мемо
Описание слайда:

Компонент: Мемо

2 слайд Многострочное поле редактирования -компонент Memo Свойства	Назначение Lines	О
Описание слайда:

Многострочное поле редактирования -компонент Memo Свойства Назначение Lines Отдельная строка в тексте ScrollBars Полоса пркрутки – значения: ssNone нет ssHorisontal снизу ssVertical справа ssBoth обе Alignment Выравнивание текста taLeftJustify по левому краю taRightJustify по правому краю taCenter по центру Readonly False можно вводить данные во время работы программы True нельзя (только для чтения) Text Текст, который находится в поле Мемо. К этому свойству можно обратиться только в программе.

3 слайд Работа со строками компонента Мемо Текст можно вводить в редакторе –свойство
Описание слайда:

Работа со строками компонента Мемо Текст можно вводить в редакторе –свойство Lines или в программе. Memo1.Lines.Add(‘new line‘); - добавление новой строки в конец текста. Memo1.Lines.Clear; - очистка содержимого компонента Memo. Memo1.Lines[3]:=‘abcd’; - в строку под номером 3 записать текст abcd Z:=Memo1.Lines.[5]; - содержимое шестой строки записать в текстовую переменную Z. X:=Memo1.Lines.Count; - в числовую переменную Х записать количество строк в тексте. Нумерация строк начинается с 0. Если в тексте есть строки с номерами 0, 1, 2, 3, 4, 5, то количество их равно 6.

4 слайд procedure TForm1.Button1Click(Sender: TObject); var i: integer; begin for i:=
Описание слайда:

procedure TForm1.Button1Click(Sender: TObject); var i: integer; begin for i:=0 to 10 do Memo1.Lines.Add(‘Это строка ‘ +IntToStr(i)); end; procedure TForm1.Button2Click(Sender: TObject); begin Memo1.Lines.Clear; end;

5 слайд Для закрепления материала выполним небольшое практическое задание, создадим п
Описание слайда:

Для закрепления материала выполним небольшое практическое задание, создадим простой текстовый редактор. Расположим на форме компонент Memo, установим у него вертикальную прокрутку. Справа будут кнопки компонент Button 8 штук, согласно рисунка сверху. Теперь запишем обработчики событий для наших кнопок.

6 слайд Кнопка "Открыть": Memo1.Lines.LoadFromFile('mytetxt.txt'); Кнопка "Сохранить:
Описание слайда:

Кнопка "Открыть": Memo1.Lines.LoadFromFile('mytetxt.txt'); Кнопка "Сохранить: Memo1.Lines.SaveToFile('mytetxt.txt'); Кнопка "Копировать" Memo1.CopyToClipboard; Кнопка "Вырезать" Memo1.CutToClipboard; Кнопка "Очистить все" Memo1.Clear; Кнопка "Вставить" Memo1.PasteFromClipboard; Кнопка "Выделить все" Memo1.SetFocus; // если компонент не в фокусе, то выделение  не увидим Memo1.SelectAll; Кнопка "Удалить выделенное" Memo1.ClearSelection;

7 слайд Подготовиться к самостоятельной работе Вопросы: Из каких основных окон состои
Описание слайда:

Подготовиться к самостоятельной работе Вопросы: Из каких основных окон состоит окно среды программирования Delphi? Их назначение. Какие типы данных (переменных и констант) используются в ЯП Delphi? Какие файлы входят в проект Delphi? Какие компоненты вы знаете? (Form, Edit, Button, Label, CheckBox, RadioButton, Radiogroup, Memo) Как помещаются компоненты на форму? Как задаются свойства компонентов? Что означают свойства Caption, Text, Top, Left, WordWrap, Readonly, Hint, ShowHint, Font, Width, Height? Что такое событие? Как программируются события? Когда срабатывает событие Click и KeyPress? Как осуществляется ввод и вывод данных в ЯП Delphi? Для чего используются функции преобразования? Домашнее задание

Выбранный для просмотра документ Тема Поле Memo.docx

библиотека
материалов
Скачать материал целиком можно бесплатно по ссылке внизу страницы.

Тема: Поле Memo.

Цель урока: Познакомить с элементом Memo, с его методами и свойствами. Научить использовать данный элемент при решении задач. Воспитывать у учащихся интерес к изучаемому предмету.

Ход урока:

  1. Орг. Момент.

  2. Сообщение нового материала.

Поле Memo позволяет вводить многострочный текст с клавиатуры, загружать его из файла, редактировать и сохранять в файл текстового формата.

Текст в компоненте Delphi Memo размещается построчно. Поэтому имеется доступ к каждой строке текста отдельно. Строки в редакторе Delphi Memo являются объектами Lines[i] типа String, где i - номер строки, отсчитываемый от нуля. Объект Lines[i] доступен и для чтения, и для записи. Соответственно, текст в компоненте Memo можно редактировать не только с клавиатуры, но и программно:

var S: String;
begin
 Memo1.Lines[3]:='Четвёртая строка по счёту';
 S:=Memo1.Lines[3];
end;

   Естественно, для успешного присвоения текста определённой строке необходимо, чтобы эта строка физически существовала! То есть, данным способом можно только редактировать текст. Новую строку создать таким способом невозможно. Для создания новых строк служат методы

  • Add()

  • Insert()

   Метод Add() добавляет новую строку в конец, а метод Insert() внедряет новую строку перед указанной, для чего метод Insert() имеет соответствующий параметр:
begin
 Memo1.Lines.Add('Это будет последняя строка');
 Memo1.Lines.Insert(
2, 'Эта строка будет третьей');  //Так как отсчёт идёт от нуля!
end;
   
Delphi Memo имеет также метод для удаления строки:
Memo1.Lines.Delete(i); //Удаление строки с индексом i
   Компонент
Delphi Memo позволяет получить доступ к тексту как целому. Свойство Text типа String является текстом, содержащимся в редакторе, в виде одной строки.

  1. Закрепление.

Практическая работа.Пример с компонентам Memo

Для закрепления материала выполним небольшое практическое задание, создадим простой текстовый редактор. Расположим на форме компонент Memo, установим у него вертикальную прокрутку. Справа будут кнопки компонент Button 8 штук, согласно рисунка сверху.

Теперь запишем обработчики событий для наших кнопок.

Кнопка "Открыть":
Memo1.Lines.LoadFromFile('mytetxt.txt');

Кнопка "Сохранить:
Memo1.Lines.SaveToFile('mytetxt.txt');

Кнопка "Копировать"
Memo1.CopyToClipboard;

Кнопка "Вырезать"
Memo1.CutToClipboard;

Кнопка "Очистить все"
Memo1.Clear;

Кнопка "Вставить"
Memo1.PasteFromClipboard;

Кнопка "Выделить все"
Memo1.SetFocus; // если компонент не в фокусе, то выделение  не увидим
Memo1.SelectAll;

Кнопка "Удалить выделенное"
Memo1.ClearSelection;

Поменяйте заголовок, и вид окна.

  1. Д/з. Итог урока.

Общая информация

Номер материала: ДВ-148259

Вам будут интересны эти курсы:

Курс повышения квалификации «Табличный процессор MS Excel в профессиональной деятельности учителя математики»
Курс повышения квалификации «Информационные технологии в деятельности учителя физики»
Курс повышения квалификации «Внедрение системы компьютерной математики в процесс обучения математике в старших классах в рамках реализации ФГОС»
Курс повышения квалификации «Организация работы по формированию медиаграмотности и повышению уровня информационных компетенций всех участников образовательного процесса»
Курс «Фирменный стиль» (Corel Draw, Photoshop)
Курс «Оператор персонального компьютера»
Курс «3D Studio MAX»
Курс профессиональной переподготовки «Информационные технологии в профессиональной деятельности: теория и методика преподавания в образовательной организации»
Курс повышения квалификации «Специфика преподавания информатики в начальных классах с учетом ФГОС НОО»
Курс повышения квалификации «Применение MS Word, Excel в финансовых расчетах»
Курс повышения квалификации «Введение в программирование на языке С (СИ)»
Курс профессиональной переподготовки «Управление в сфере информационных технологий в образовательной организации»
Курс повышения квалификации «Специфика преподавания дисциплины «Информационные технологии» в условиях реализации ФГОС СПО по ТОП-50»
Курс повышения квалификации «Современные языки программирования интегрированной оболочки Microsoft Visual Studio C# NET., C++. NET, VB.NET. с использованием структурного и объектно-ориентированного методов разработки корпоративных систем»
Курс повышение квалификации «Применение интерактивных образовательных платформ на примере платформы Moodle»

Благодарность за вклад в развитие крупнейшей онлайн-библиотеки методических разработок для учителей

Опубликуйте минимум 3 материала, чтобы БЕСПЛАТНО получить и скачать данную благодарность

Сертификат о создании сайта

Добавьте минимум пять материалов, чтобы получить сертификат о создании сайта

Грамота за использование ИКТ в работе педагога

Опубликуйте минимум 10 материалов, чтобы БЕСПЛАТНО получить и скачать данную грамоту

Свидетельство о представлении обобщённого педагогического опыта на Всероссийском уровне

Опубликуйте минимум 15 материалов, чтобы БЕСПЛАТНО получить и скачать данное cвидетельство

Грамота за высокий профессионализм, проявленный в процессе создания и развития собственного учительского сайта в рамках проекта "Инфоурок"

Опубликуйте минимум 20 материалов, чтобы БЕСПЛАТНО получить и скачать данную грамоту

Грамота за активное участие в работе над повышением качества образования совместно с проектом "Инфоурок"

Опубликуйте минимум 25 материалов, чтобы БЕСПЛАТНО получить и скачать данную грамоту

Почётная грамота за научно-просветительскую и образовательную деятельность в рамках проекта "Инфоурок"

Опубликуйте минимум 40 материалов, чтобы БЕСПЛАТНО получить и скачать данную почётную грамоту

Включите уведомления прямо сейчас и мы сразу сообщим Вам о важных новостях. Не волнуйтесь, мы будем отправлять только самое главное.