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

Вниз

Как правильно объявить процедуру...   Найти похожие ветки 

← →
Vemer ©   (2004-03-13 12:08) [0]

Здравствуйте.
В общем есть Датамодуль (пока почти пустой) c моей процедурой:
unit DM_c;

interface

uses
 SysUtils, Classes;

type
 TDM = class(TDataModule)
 
 private
   { Private declarations }
 public
   { Public declarations }
 end;
 

var
 DM: TDM;

implementation

{$R *.dfm}

Procedure DoNothing;
Begin
///
End;

END.

Вопрос - ЧТО и КУДА надо вписать, чтобы DoNothing можно было вызывать из др. модулей(где этот модуль в Uses прописан ес-но) просто по имени?

---

← →
Anatoly Podgoretsky ©   (2004-03-13 12:11) [1]

Procedure DoNothing;

var
DM: TDM;

implementation

{$R *.dfm}

Procedure DoNothing;
...

---

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

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

Наверх

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