Вы просматриваете: Главная > Это интересно > Блокнот запрещает ругаться

Блокнот запрещает ругаться

Программируем на Delphi

Вы видели где-нибудь текстовый редактор, который не дает писать нехорошие слова? Например вы пишете дура, а он просит заменить слово.
Список нехороших слов можно расширить. Мы с ребятами на кружке «Юный программист» попытались создать такую программу.
В качестве инструмента использовали среду  Delphi.

блокнот 300x209 Блокнот запрещает ругаться

правильный блокнот

загрузить программу можно здесь

Урок по созданию подобной программы можно посмотреть здесь

Сегодня я вам покажу, как можно создать на Delphi убегающее окно. Форма окна содержит единственную кнопку, при попытке нажатии на которую, окно резко меняет свои координаты.
На это вам потребуется не более 5 минут, справятся даже школьники младших классов.

Подпрограмма кнопки содержит одну строчку кода: Form1.top:=random(200), на русский язык переводится так:
Форма.высота = случайно(200 пикселей от верхнего края). Кнопка реагирует на событие Movie(движение)

Похожие записи

Метки: , ,

1 коммент. к “Блокнот запрещает ругаться”


  1. [...] Занимательные программы-шутки на Delphi [...]


Оставить отзыв

Для предотвращения автоматического заполнения, пожалуйста, выполните задание, приведенное рядом.