«аочное дистанционное образование с получением государственного диплома через Internet










ѕолучить информацию о поступлении
 
√лавна€ Ќовости  арта сайта ‘отоальбом √остева€ книга  онтакты

 

ѕроцедуры и функции в Delphi

ѕри разработке больших программных продуктов прин€то разбивать программу на несколько логических частей, называемых подпрограммами. Ёто улучшает структуру программы, упрощает ее понимание, делает программу более прозрачной и читаемой, позвол€€ тем самым избежать многих ошибок. ≈сли программа предназначена дл€ решени€ задачи в целом, то подпрограмма используетс€ дл€ выполнени€ логически завершенной последовательности действий.

¬ €зыке Delphi представлены две разновидности подпрограмм Ц процедуры и функции. ѕринципиальное отличие между подпрограммами заключаетс€ в их оформлении и способе передачи данных в подпрограмму и обратно. ¬се подпрограммы дел€тс€ на стандартные (определенные в €зыке) и создаваемые программистом (пользовательские).

—труктура подпрограммы очень похожа на структуру программы и в самом общем случае состоит из таких частей:

Ц заголовка подпрограммы;
Ц раздела объ€влени€ меток;
Ц раздела объ€влени€ констант;
Ц раздела объ€влени€ типов;
Ц раздела объ€влени€ переменных;
Ц раздела процедур и функций;
Ц тела подпрограммы.

ќб€зательными част€ми подпрограммы €вл€ютс€ ее заголовок и тело. ќбращение к подпрограмме осуществл€етс€ через упоминани€ ее имени и называетс€ вызовом. –азделы объ€влени€ меток, констант. “ипов и переменных соответствует аналогичным разделам программы. —оздание этих разделов происходит по мере необходимости. –аздел процедур и функций может содержать описани€ собственных процедур и функций. “ело подпрограммы содержит исполн€емые операторы. ѕод описанием подпрограммы понимаетс€ указание ее заголовка и тела.

«аголовок процедуры имеет вид: Procedure им€ (параметры);

«аголовок функции: Function им€ (параметры): тип;

—лова Procedure и Function €вл€ютс€ зарезервированными.

ѕример процедуры нажати€ на кнопку Button:

procedure TForm1.Button1Click(Sender: TObject);

var a,b:Integer;

c:Real;

begin

//ввод данных в компоненты Edit1 и Edit2; преобразование из строки в целое число и запись в переменные a и b

a:=StrToInt(Edit1.Text);

b:=StrToInt(Edit2.Text);

//проверка услови€ Ц если число b не равно 0, то переменной c присваиваетс€ результат делени€ числа a на число b, иначе, если число равно 0, выводитс€ с помощью процедуры ShowMessage сообщени€ о том, что происходит деление на 0.

if b<>0 then begin

c:= a/b;

Edit3.Text:=FloatToStr(c);

end

else

ShowMessage('ƒеление на 0');

end;


”знать как сэкономить в кризис моно на сайте ekonom-it.ru

√ипертекст, гиперссылка, гипермедиа ƒень программиста ѕроисхождение смайлов ѕроисхождение цифр —оздание новой базы данных ‘ормальные и фактические параметры —оздание таблиц базы данных в Ms Access —оздание таблиц базы данных в Ms Access (продолжение) “ипы данных в Access “ипы данных в Access (продолжение) 


 
     
   
 


ѕриглашаем прин€ть участие в круглом столе!
подробнее   >>>
 

»нститут ћенеджмента, Ёкономики и »нноваций начинает набор на курсы повышени€ квалификации!
подробнее   >>>
 

”важемые студенты јЌќ ¬ѕќ »ћЁи»!
подробнее   >>>
 

Ќачинаетс€ набор на курсы повышени€ квалификации!
подробнее   >>>
 

ѕриглашаем прин€ть участие в конференци€х!
подробнее   >>>
 


все новости...

 


–ассылки Subscribe.Ru
—овременное образование
ѕодписатьс€ письмом