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

Вниз

Использование процедур из других модулей.   Найти похожие ветки 

 
NNN   (2002-04-24 11:42) [0]

Помогите плз...
Вобщем нужно написать процедуру в отдельном Unit и потом использовать в программе.
После создания Unit появляется:

unit Unit2;

interface

implementation

end.

Где раздел описания переменных, процедур??????7
И где тело процедуры, где подключать модули???
;-)))))))


 
Ally ©   (2002-04-24 11:52) [1]


unit Unit2;

interface

uses Windows, Classes; // - здесь подключаете нужные модули

procedure DoSomething;

var A: DWORD;

implementation

procedure DoSomething;
begin
{....}
end;

end.


Соответственно, в Unit1 пишем:


unit Unit1;
...
implementation
uses Unit2; // - подключаем Unit2;
...
procedure TForm1.Button1Click(Sender: TObject);
begin
A := 100;
DoSomething;
end;

end.


Я правильно Вас понял?

Удачи.


 
Игорь Шевченко ©   (2002-04-24 11:52) [2]

День добрый,

А руки на что даны ? :-)

С уважением,


 
NNN   (2002-04-24 11:55) [3]

Если что, Unit без формы.


 
AFROLOV ©   (2002-04-24 11:57) [4]

Если в Unit2 надо использовать функции из Unit1 то это делается так

unit Unit2;

interface
......
implementation
uses Unit1;
....
end.



 
AFROLOV ©   (2002-04-24 11:58) [5]


> NNN (24.04.02 11:55)
> Если что, Unit без формы.

А это никакого значения не имеет.



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

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

Наверх




Память: 0.47 MB
Время: 0.01 c
1-26074
Volf
2002-04-26 11:34
2002.05.09
TMemo с цветными строчками и шрифтом (выборочно)


3-26024
slc_g@yandex.ru
2002-04-16 14:21
2002.05.09
Мастера, как записать файл BMP в blob поле


14-26241
Sewix
2002-03-30 10:07
2002.05.09
Народ не вкурсе Paradox чье творение (компания)


4-26315
fag2000@ok.ru
2002-03-05 14:44
2002.05.09
Как правильно обрабатывать сообщения от клаватуры?


1-26127
Sheva
2002-04-24 10:59
2002.05.09
Invalid Pointer Operation.