Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.05.09;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.005 c
4-26289
AlexMey
2002-03-06 12:26
2002.05.09
ActiveX и браузер


1-26102
com6
2002-04-26 16:50
2002.05.09
Помогите: Как отследить манипуляции мышью и работу на клавиатуре?


14-26268
Olgerd
2002-03-26 17:53
2002.05.09
Эмуляция других ОС


1-26060
Бульбаш
2002-04-24 11:03
2002.05.09
Как в QRLabel расположить текст вертикально???


14-26271
Morfey
2002-03-30 02:24
2002.05.09
Вопрос значит такой...





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский