Главная страница
    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.004 c
14-26231
Morfey
2002-03-30 18:19
2002.05.09
Гадкий модем


1-26193
Freek
2002-04-25 15:46
2002.05.09
Как найти файл в реестре?


1-26179
Ihor
2002-04-24 18:20
2002.05.09
TIniFile


4-26304
Керик
2002-03-08 05:28
2002.05.09
Сделать таймер


1-26176
AndreyS
2002-04-25 13:53
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
Английский Французский Немецкий Итальянский Португальский Русский Испанский