![]() |
Внимание, важное сообщение: Дорогие Друзья!
В ноябре далекого 2001 года мы решили создать сайт и форум, которые смогут помочь как начинающим, так и продвинутым пользователям разобраться в операционных системах. В 2004-2006г наш проект был одним из самых крупных ИТ ресурсов в рунете, на пике нас посещало более 300 000 человек в день! Наша документация по службам Windows и автоматической установке помогла огромному количеству пользователей и сисадминов. Мы с уверенностью можем сказать, что внесли большой вклад в развитие ИТ сообщества рунета. Но... время меняются, приоритеты тоже. И, к сожалению, пришло время сказать До встречи! После долгих дискуссий было принято решение закрыть наш проект. 1 августа форум переводится в режим Только чтение, а в начале сентября мы переведем рубильник в положение Выключен Огромное спасибо за эти 24 года, это было незабываемое приключение. Сказать спасибо и поделиться своей историей можно в данной теме. С уважением, ваш призрачный админ, BigMac... |
Delphi - delphi
|
Новый участник Сообщения: 6 |
Здраствуйте.
Я тут недавно решил научится программированию и выбрал делфи. Купил книги, полазил в инете. Столкнулся с проблеммой... Может проблемма для вас покажется смешной, но: я не понял , как создавать procedure...??? Просто не догнал. Подскажите на самом примитивном уровне(куда мышкой ткнуть), что бы создать процедуру. Желательно с примером. Спасибо |
|
Отправлено: 04:45, 22-08-2002 |
Новый участник Сообщения: 10
|
Профиль | Сайт | Отправить PM | Цитировать Ничего нет проще. Начало такое:
File->New Application. На экране появляется окно редактора и пустая форма (спрятать и показать форму - клавиша F12). В закладке Standard (сверху справа) выбрать кнопку (такая маленькая и OK на ней написано), щёлкаем на ней мышкой, она как бы вдавливается, затем щёлкаем на форме, на ней появляется кнопка. Щёлкаем на появившейся кнопке двойным щелчком, и в редавкторе появляется процедура - обработчик события нажатия кнопки, в которой можно написать, например, ShowMessage('OK!'); . Далее нажимаем F9, ждём и видим эту маленькую программу в действии. |
------- Отправлено: 05:50, 22-08-2002 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Старожил Сообщения: 225
|
Профиль | Отправить PM | Цитировать Объявление процедуры:
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 |
------- Отправлено: 11:37, 28-09-2002 | #3 |
Pascal 4ever Сообщения: 48
|
Профиль | Отправить PM | Цитировать Вообще delphi, как язык программирования берет свои корни, из pascal и именно по книгам о паскале можно научиться программить с нуля.
В Delphi, все гораздо сложнее, там глаза и мозг отвлекаются от самой программы и все внимание концентрируется на красивом окошке, а это не есть хорошо! |
Отправлено: 19:14, 28-09-2002 | #4 |
Старожил Сообщения: 225
|
Профиль | Отправить PM | Цитировать Цитата:
|
||
------- Отправлено: 15:16, 23-10-2002 | #5 |
![]() |
Участник сейчас на форуме |
![]() |
Участник вне форума |
![]() |
Автор темы |
![]() |
Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Delphi - Delphi | UpperCase на Delphi 7 | Cognolio | Программирование и базы данных | 3 | 26-01-2006 15:42 | |
Delphi - Delphi | Surround | Программирование и базы данных | 11 | 10-01-2004 22:13 | |
Delphi - Delphi | Zx | Программирование и базы данных | 3 | 27-08-2003 10:19 | |
Delphi - Delphi | Roman Go | Программирование и базы данных | 9 | 25-12-2002 15:48 | |
Delphi - Delphi | Roman Go | Программирование и базы данных | 11 | 11-12-2002 14:43 |
|