Delphi: Основы кодинга
Xakep, номер #031, стр. 031-066-4
Объявление простой переменной:
var
i:Integer;
Это я объявил переменную i типа целое число. Теперь я могу присваивать ей значение: i:=1 или производить с ней любую математическую операцию. Двоеточие плюс равно читается как присвоить значение, т.е. я присваиваю переменной i число 1. Теперь I у меня равна единице.
В самом начале Delphi создает только одну глобальную переменную Form1 типа объекта TForm1, но зато это переменная сложного типа. Глобальные переменные можно использовать не только в этом модуле, но и в любом другом, если подключить его, добавив имя в раздел USES.
Итак, ты можешь использовать объект TForm1 через переменную From1. Для доступа к свойствам объекта TForm1 нужно написать Form1.свойство (имя переменной, точка, свойство). Например, доступ к кнопке формы будет происходить так - Form1.Button1 (это грубо говоря). Button1 - это тоже объект, и у него есть свойства. Когда ты выделяешь кнопку на форме, то ты видишь ее свойства в объектном инспекторе. Чтобы получить доступ к ее свойству (например, Caption), нужно написать Form1.Button1.Caption := "Название кнопки". Все, что заключено в двойные кавычки, Delphi воспринимает как строки.
Процедуры и функции
Процедуры и функции - это некий участок кода, который выделен в отдельный блок. Простая процедура выглядит так:
procedure Exampl;
var
i:Integer;//Объявление локальной переменной
begin//Начало процедуры
i:=10;//Присваиваю переменной значение
end;//Конец процедуры
Эта процедура называется Exampl. Для использования процедуры нужно написать в любом участке кода "Exampl;". Если процедура является методом какого-то объекта, то нужно написать в имени процедуры "Имя Объекта. Имя процедуры":
procedure Form1.Examp2;
begin
Exampl; //Вызываем процедуру Exampl, написанную ранее.
end;
Теперь разберемся с функциями. Это те же процедуры, только умеют возвращать значения. Простейшая функция выглядит так:
function Exampl:Integer;
var
i:Integer;//Объявление локальной переменной
begin
i:=10;//Присваиваю переменной значение
Result:=i; // Возвращаю значение i
end;
В любую процедуру или функцию можно передавать значения. Для этого после имени ты должен перечислить, какие значения нужно передавать:
function Exampl(index:Integer):Integer;
begin
// Возвращаю переданное значение
// index, деленное на 2
Result:=index/2;
end;
Здесь мы передаем в функцию Exampl одну переменную - index типа число integer. Для вызова этой функции можно использовать x:=Exampl(10);. Этим мы присваиваем переменной "х" результат работы функции Exampl(10). Если у тебя нет проблем с математикой, то ты уже должен высчитать, что в "х" должно попасть число 5.
Заключение
На этом все. Больше я не буду забивать тебе голову теорией. Я постарался дать тебе максимум инфы. Если ты что-то не понял, то не отчаивайся. Со следующего раза мы приступим к реальным делам, и на практике все само к тебе придет. Если не придет, то я затолкну молотком. Лично я долгое время использовал в кодинге некоторые приемы, ничего не понимая в происходящем. Но со временем все само пришло. Только на практике можно со всем разобраться (лично я напичкался кучей книг о компьютерах, но создать свою первую программу на Васике смог, только когда поковырялся с ней в живую на компе часика четыре - прим. Синтеза).
