Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Программирование и базы данных (http://forum.oszone.net/forumdisplay.php?f=21)
-   -   delphi (http://forum.oszone.net/showthread.php?t=30794)

PL 22-08-2002 04:45 210190

Здраствуйте.
Я тут недавно решил научится программированию и выбрал делфи.
Купил книги, полазил в инете.
Столкнулся с проблеммой...
Может проблемма для вас покажется смешной, но:
я не понял , как создавать procedure...???
Просто не догнал.
Подскажите на самом примитивном уровне(куда мышкой ткнуть), что бы создать процедуру.
Желательно с примером.
Спасибо

skaa 22-08-2002 05:50 210191

Ничего нет проще. Начало такое:
File->New Application.
На экране появляется окно редактора и пустая форма (спрятать и показать форму - клавиша F12). В закладке Standard (сверху справа) выбрать кнопку (такая маленькая и OK на ней написано), щёлкаем на ней мышкой, она как бы вдавливается, затем щёлкаем на форме, на ней появляется кнопка. Щёлкаем на появившейся кнопке двойным щелчком, и в редавкторе появляется процедура - обработчик события нажатия кнопки, в которой можно написать, например,
ShowMessage('OK!');
. Далее нажимаем F9, ждём и видим эту маленькую программу в действии.

Roman Go 28-09-2002 11:37 210192

Объявление процедуры:

Procedure Имя(var параметр1:тип1;... var параметр2:тип2;... var параметрК:типК);
var
 // объявление внутренних (локальных) переменных
begin
 //инструкции процедуры
end;

Параметр var говорит о том, что после завершения работы процедуры, переменные стоящие после него сохранят свои значения; этот параметр необязателен.
Если параметр var не стоит перед переменной, то после завершения работы процедедуры, данные хранящиеся в эти переменных будут утеряны.


Написание процедур можно начинать сразу после:

implementation

{$R *.DFM}




implementation

{$R *.DFM}

procedure summa(a, b:integer; var sum:integer);
begin
  sum:=a+b;
end;


поставь на форму кнопку и кликнете дважды по ней, войдешь в процедуру созданную Delphi в ней можешь вызывать свою собственную процедуру, которая будет складывать два числа т.е.



procedure TForm1.Button1Click(Sender: TObject);

var sum:integer;

begin

summa(5,6,sum);

//вывести сообщение с результатом суммы

showmessage(inttostr(sum));

end;


параметры a,b ты задаешь, и с ними происходит операция сложения, которая записывается в sum

fLANkeR 28-09-2002 19:14 210193

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

Roman Go 23-10-2002 15:16 210194

Цитата:

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


Время: 07:09.

Время: 07:09.
© OSzone.net 2001-