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

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

вызов процедуры из dpr


VOIDER ©   (2006-05-10 16:13:00) 

Project.dpr

uses ....utra;

procedure ReaderPA;
begin

end;

///////////////////////////////////////
utra.pas

procedure Click(send....)
begin

if .....   ReaderPA;

Как вызвать ReaderPA в unit utra.pas ?
пишет что неизвесен,хотя он находиться в project.dpr,
был бы pas написал бы в utra.pas uses project;
после implementation;
Что делать?


Джо   (2006-05-11 01:50:00) [1]

> Можно и без этого -)

Можно и без этого, безусловно :)


Шпиён   (2006-05-11 01:49:00) [2]


> Затем, в нужном месте делаешь GetProcAddress и вызываешь
> :)

Можно и без этого -)

В dpr:

program Project1;

uses
 Forms,
 Unit1 in 'Unit1.pas' {Form1};
{$R *.res}
procedure ReaderPA;
begin
.................
end;
exports ReaderPA;

begin
.....................

В Unit1:


implementation

{$R *.dfm}
procedure ReaderPA;external 'project1.exe';



Только вот зачем такое извращение...бррр %)


Джо   (2006-05-10 19:42:00) [3]

> [2] VOIDER   (10.05.06 19:24)
> как ,куда рыть ?

Проще в отдельный модуль, но хозяин — барин.
Экспортируешь (добавляешь в секцию expots). Затем, в нужном месте делаешь GetProcAddress и вызываешь :)


Ega23   (2006-05-10 19:42:00) [4]


> нельзя так как использует процедуры и типы прописанные в
> dpr


Вот и пропиши все эти типы и процедуры в отдельном юните. Потом в dpr - uses Отдельный Юнит и в любом другом, где захочешь использовать - uses Отдельный Юнит.


VOIDER   (2006-05-10 19:24:00) [5]

как ,куда рыть ?
отправлять dpr в pas из-за одной процедуры
нельзя так как использует процедуры и типы прописанные в dpr


TUser   (2006-05-10 16:14:00) [6]

Это сделать возможно, но проще и правильнее отправить эту процедуру в отдельный модуль.


Наверх

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