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

Вниз

Как передать значение переменной из одного модуля в другой ?   Найти похожие ветки 

 
SemFLY   (2002-02-04 22:02) [0]

Есть два модуля Unit1 и Unit2.

В Unit2 есть процедура

Procedure DelFile (FuncParam : String;);
var
df : Boolean;
begin
df := False;
DeleteFile(FuncParam);
If DeleteFile(FuncParam) = False then df := True;
end;


Как мне передать значение переменной df в модуль Unit1 ?

Спасибо ! ;))


 
BJValentine   (2002-02-04 22:16) [1]

Опиши её в секции INTERFACE в UNIT2, а в UNIT1 в секции USES добавь UNIT1


 
Pat   (2002-02-04 22:24) [2]

Объяви df как глобальную переменную.


 
Pat   (2002-02-04 22:27) [3]

Вот это я тормоз :-)) Долго ответ шел :-))


 
SemFLY   (2002-02-05 01:57) [4]

Спасибо ! :)))



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

Форум: "Основная";
Текущий архив: 2002.02.21;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.004 c
1-66516
HDD
2002-02-06 02:13
2002.02.21
Помогите гарны хлопчики и дивченки


14-66675
VID
2001-12-30 21:08
2002.02.21
Техника ломается!


1-66599
Petrovich
2002-02-02 21:11
2002.02.21
ComboBox


1-66577
vector
2002-02-05 19:20
2002.02.21
Delphi начал тормозить


3-66429
sync
2002-01-25 08:06
2002.02.21
Remote Data Module





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский