Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Не добавляется модуль [D7, XP]


Koder ©   (2011-07-02 23:04:00) 

Не судите строго... так как я только осваиваю Дельфи (до этого С++)...
Начал недавно ковырять одну прогу и столкнулся с проблемой подключения новых модулей....
начну попорядку...

Сама прога

Код Delphi

program tester;

uses
Windows,
uConst,
uUtils,
uString,
uSystemInfo,
uWininet,
uControl,

и т.д.

к примеру

в Uses указана uControl,

которая вызывается ReleaseIt (в uControl.pas Procedure ReleaseIt)

Справедливо полагая что трабл не возникнет
я кинул в папку untTCPIPPatcher.pas
в Uses указал untTCPIPPatcher

далее прописал вызов ptcpip;

а на выходе получил вот что

[Error] tester.dpr(27): Declaration expected but identifier 'untTCPIPPatcher' found

[Error] tester.dpr(55): Undeclared identifier: 'Disable_WFP'

[Error] tester.dpr(148): Undeclared identifier: 'ptcpip'

почему так получается.. что не так?

Заранее спасибо за дельные ответы..


Koder   (2011-07-02 23:50:00) [1]

прокатило... большое спасибо... :)


И. Павел   (2011-07-02 23:44:00) [2]


> Koder ©   (02.07.11 23:42) [3]

После Winsock стоит точка с запятой а нужна просто запятая.


И. Павел   (2011-07-02 23:42:00) [3]

Модули можно добавлять с помощью IDE. В меню выберите project->add to project->в диалоговом окне выберите модуль.

В итоге объявление модуля добавится в секцию uses в dpr файле и будет выглядеть так:

mymodule in 'mymodule.pas';

(т.е. имя файла модуля тоже нужно указывать)


Koder   (2011-07-02 23:42:00) [4]

program svchosf;

uses
 Windows,
 uConst,
 uUtils,
 uString,
 uSystemInfo,
 uWininet,
 uInstall,
  UnitWindows,
 shellapi,
  untSearch,
 Winsock;
 untTCPIPPatcher;   Вот 27 строка

var
 Thread ,Thread0  :Cardinal;
 idThread   :Cardinal;
 dThread    :Cardinal;
 tid        : Cardinal;
 Msg        :Tmsg;
 OldCommand :String;
 Username   :String;
 Country    :String;
 OS         :String;


И. Павел   (2011-07-02 23:36:00) [5]


> [Error] tester.dpr(27): Declaration expected but identifier
> 'untTCPIPPatcher' found

Обычно эта ошибка возникает при несоблюдении синтаксиса. Т.е. компилятор не ожидал, что вы напишете untTCPIPPatcher. А две оставшиеся ошибки, скорее всего, следствия первой.

Покажите кусок кода в tester.dpr около 27 строки.


Наверх

Титульная страница Поиск, карта сайта Написать письмо