Скачать: CL | DM;

вызов процедуры из dpr   Найти похожие ветки 

← →
VOIDER   (2006-05-10 16:13) [0]

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;
Что делать?

---

← →
TUser ©   (2006-05-10 16:14) [1]

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

---

← →
VOIDER   (2006-05-10 19:24) [2]

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

---

← →
Джо ©   (2006-05-10 19:42) [3]

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

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

---

← →
Ega23 ©   (2006-05-10 19:42) [4]

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


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

---

← →
Шпиён   (2006-05-11 01:49) [5]

> Затем, в нужном месте делаешь 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-11 01:50) [6]

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

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

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.027 c