Уроки по Visual Basic 6.0 – Конструкция IF-Then-ElseОбучающий материал

Проверка условий в Visual Basic осуществляется с помощью конструкции IF-Then-Else. Синтаксис конструкции имеет следующий вид:

IF условие Then - Команды, которые выполняются при истинном условии
Else - Команды, которые выполняются при ложном условии
End If

Рассмотрим работу конструкции на конкретном примере.

Создадим новый проект и добавим на форму три объекта: Label1, Text1 и Command1 (рисунок 1).

Уроки по Visual Basic 6.0 – Конструкция IF-Then-Else
Рисунок 1 – Вид формы после добавления нужных объектов
Читать дальше →

Уроки по Visual Basic 6.0 – Обработка щелчков мышиОбучающий материал

Обрабатывать щелчки мыши будем на примере простой программы. Создадим новый проект и добавим на форму объект Shape1. Изменим свойства Shape, FillStyle, FillColor и BorderColor.

Еще добавим объект Label1 и изменим свойства BackColor, Alignment, Font и Caption. В результате мы получим форму с объектами Shape1-Круг и Label1(рисунок 1).

Уроки по Visual Basic 6.0 – Обработка щелчков мыши
Рисунок 1 – Форма с добавленными объектами
Читать дальше →

Уроки по Visual Basic 6.0 – Программа для рисования мышьюОбучающий материал

Напишем программу, в которой можно рисовать на форме мышью. Для реализации поставленной задачи воспользуемся методом Line().

Текст программы рисования линии будем писать в процедуре Form_MouseMove() (рисунок 1). Так мы сможем узнать нажата левая кнопка мыши или нет.

Уроки по Visual Basic 6.0 – Программа для рисования мышью
Рисунок 1 – процедура Form_MouseMove()
Читать дальше →

Уроки по Visual Basic 6.0 - Метод Circle ()Обучающий материал

В этом уроке мы напишем программу, на форме которой будут появляться концентрические окружности (такие окружности лежат в одной плоскости и имеют общий центр).

За центр окружностей возьмем половины от ширины и высоты формы:

x=ScaleWidth/2
y=ScaleHeight/2

Чтобы нарисовать окружность, воспользуемся методом Circle(x,y), радиус, цвет. Так как нам нужно несколько таких окружностей, то воспользуемся циклом, в котором будем увеличивать радиус окружностей.

Так мы сможем избежать наложения окружностей друг на друга. Возьмем значение 100 твипов за начальный радиус, конечный радиус — 10000 твипов, шаг – 100 твипов.

Получим цикл:

For r = 100 To 10000 Step 100
Circle (x,y), r
Next r

Читать дальше →

Уроки по Visual Basic 6.0 - Метод Line()Обучающий материал

Сегодня мы рассмотрим метод Line() на примере программы, в которой при нажатии на форму рисуются горизонтальная и вертикальная штриховки.

Для начала создадим новый проект. Нажимаем «Файл», «Новый Проект» и выбираем «Стандартный EXE» (рисунок 1).

Уроки по Visual Basic 6.0 - Метод Line()
Рисунок 1 – Выбор проекта

Читать дальше →

Создание информации: семантический и прагматический аспектыПеревод

Информация на сегодняшний день является одним из важнейших ресурсов развития общества. Ее производство так же, как и потребление, считается основой эффективного функционирования всех сфер общественной жизни. Существует несколько аспектов информации.

Семантический аспект отражает смысловое содержание информации и соотносит ее с ранее имевшейся информацией.

Читать дальше →

Объекты в Delphi. Создание объектовОбучающий материал

Возникновение объектно-ориентированного программирования стало очень важным шагом в развитии современных технологий. Это связано с тем, что до появления объектно-ориентированного программирования код был “плоским”, а теперь программисты могут оперировать не только функциями или процедурами, но и объектами.

Объекты в Delphi

Объекты представляют собой совокупность различных методов, свойств и событий. Под термином совокупность в данном определении подразумевается тот факт, что объекты как-бы состоят из перечисленных выше элементов, которые обеспечивают его полноценную работу.
Читать дальше →

Delphi регулярные выраженияОбучающий материал

Регулярные выражения – очень важный инструмент, которым часто пользуются заядлые программисты или специалисты, выполняющие администрирование linux. С их помощью можно за короткий промежуток времени проверить на соответствие введенные пользователями данные, отыскать определенный фрагмент в тексте или пропарсить html страницу.

Иначе говоря, регулярные выражения используются для поиска текстовых элементов в электронных документах. По мнению некоторых программистов, использовать в Delphi регулярные выражения могут лишь настоящие специалисты. Но это утверждение неверно. Нужно всего лишь разобраться с некоторыми основными понятиями. Например, знать, что такие литералы и метасимволы.
Читать дальше →

Delphi множестваОбучающий материал

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

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

Стоит отметить тот факт, что в Delphi множества нельзя использовать для хранения каких-либо элементов (символов, чисел). Оно может лишь ответить на вопрос, принадлежит ли определенный элемент данному множеству или нет.
Читать дальше →

События в DelphiОбучающий материал

Под понятием события в Delphi подразумевается способность объекта вызывать какое-либо действие при исполнении программы. Проще говоря, это вызов программной функции, при определенном действии пользователя программы. Это может быть нажатие кнопки, расположенной в окне программы, вызов контекстного меню в окне программы, нажатие одной или комбинации клавиш.

При любом из этих действий программа начинает исполнять определенную часть кода. Эта часть кода является обработчиком события Delphi. Создать его очень просто — нужно дважды щелкнуть мышью в инспекторе объектов напротив вызываемого события, откроется окно редактора кода, где и нужно вписать свои команды между автоматически поставленными begin и end.
Читать дальше →