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

Вниз

Глобальное описание ini-файл   Найти похожие ветки 

 
Dim!S   (2004-08-11 08:42) [0]

Уважаемые мастера!

Как сделать чтобы описанная глобальная переменная (перед секцией implementation в секции var) и присвоеное ей значение можно было использовать в других формах, создаваемых динамически?

Пример: при создании формы модуля данных (создается первым) описываем и присваем значение переменной cfg: TIniFile
cfg := TInifile.Create(ExtractFilePath(Application.ExeName) + "\Config.ini");

P.S. Модуль подключаю в других модулях: uses fmDM;
    Уничтожаю переменную при разрушении формы fmDM (OnDestroy)


 
Skyle ©   (2004-08-11 08:46) [1]

А в чём трудность?
Почему не получается-то?


 
Dim!S   (2004-08-11 08:49) [2]

Компилируется нормально, но при запуске приложение ругается что типа переменная не проинициализированна (как-будто нет этой строки cfg := TInifile.Create(ExtractFilePath(Application.ExeName) + "\Config.ini");
)

Ее что в каждом модуле описывать?


 
Рамиль ©   (2004-08-11 08:59) [3]


> [2] Dim!S   (11.08.04 08:49)

А ты случайно cfg в других модулях не описываешь еще раз?


 
Dim!S   (2004-08-11 09:03) [4]

> Рамиль
Большое спасибо.

Не заметил описание cfg еще раз... :)


 
Ega23 ©   (2004-08-11 09:20) [5]

TInifile.Create(ExtractFilePath(Application.ExeName) + "\Config.ini");

\ убери, он не нужен. Или ExtractFileDir используй.


 
GuAV ©   (2004-08-12 13:37) [6]

http://delphimaster.net/view/1-1091963555/



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

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

Наверх




Память: 0.47 MB
Время: 0.037 c
1-1092581140
Белый волк
2004-08-15 18:45
2004.08.29
Допустимые символы


1-1092636340
Arhitektor
2004-08-16 10:05
2004.08.29
Каким образом можно получить доступ к файлу?


14-1092076541
Piter
2004-08-09 22:35
2004.08.29
Помогите с выбором насчет компьютера


14-1092060126
Sectey
2004-08-09 18:02
2004.08.29
Ripper5 а есть виндовый аналог?


6-1088508038
Andrey
2004-06-29 15:20
2004.08.29
Как запустить приложение по локальной сети?





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