![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Искал материалы в интернете по созданию Модулей,читал книжку и ничего не получается.Делал в точности ,как там написано .Для проверки я создавал простой модуль-процедура сложения .Для начала я закрывал форму и окно редактирования кода программы,потом я нажималFile=>New=>Unit.В Интерфейс я прописывал Procedure slojenie(a,b:byte;var i:byte);
В интерпритейшн я прописывал i:=a+b; Для нажимал сохранить и сохранял в отдельной папке .(Название изменял на slojenie),дальше я создавал новую программу,заходил в Project=>add to Progect и выбирал свой модуль.На форму помещал кнопку и метку.На кнопке создавал процедуру клика,в Uses прописывал название своего модуля . Потом после процедуры клика писал Var:g,j,k:byte(А можно использовать идентификаторы из процедуры?).Дальше g,j присваивал значения 1 . Вызывал процедуру slojenie(g,j,k); И выводил на экран результат .lbl1.caption:=Inttostr(k); После нажатия на F9 меня перебрасывает на страницу модуля и пишут Identifier redecleared 'slojenie' В чем проблема? |