|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
17.12.2007, 08:57 | #1 |
Пользователь
Регистрация: 28.10.2007
Сообщений: 61
|
Как обьявить переменную типа AnsiString глобально
Как обьявить переменную типа AnsiString так чтобы ее видели все формы???
нужно это для следующего: загружаю файлы в ListBox с рабочей директории в форме F2 ListBox1->Clear(); if ( FindFirst(aPathJPEG + "*.jpg", faAnyFile, aSearchRec) == 0) { ListBox1->Items->Add(aSearchRec.Name); while (FindNext(aSearchRec) == 0 ) ListBox1->Items->Add(aSearchRec.Name); aPathJPEG = "D:\\ARS\\Diplom\\DataBaseForImages \\JPEG\\"; - рабочая директория Затем есть необходимость загрузить новую директорию не рабочей папки. Директория выбирается в другой форме F1 использую SelectDerectory: if(SelectDirectory("Выберете директорию","", aPath) != 0) { aPath = aPath + "\\"; } как передать aPath из F1 в aPathJPEG в F2 ??? простым присвоением не помогает формы не видят чужих переменных ... как объявить глобально эти переменные так чтобы они были видны всем??? |
17.12.2007, 20:56 | #2 |
Форумчанин Подтвердите свой е-майл
Регистрация: 01.11.2007
Сообщений: 157
|
Код:
Код:
|
18.12.2007, 07:11 | #3 |
Пользователь
Регистрация: 28.10.2007
Сообщений: 61
|
пробывал так, в Visual Studio я так делал всегда а в Builder что-то не получается, как-то странно...
|
18.12.2007, 07:14 | #4 |
Пользователь
Регистрация: 28.10.2007
Сообщений: 61
|
слушай я вот использую SelectDirectory у неё же параметр Directory хранит путь к каталогу а как к нему обратиться?
|
18.12.2007, 08:36 | #5 |
Пользователь
Регистрация: 28.10.2007
Сообщений: 61
|
Сделал проще =)
занес в форму F2 Label1. в F1 пишу F2->Label1->Caption = aPath и уже в F2 извлекаю из Label1->Caption по "нубски", но что же делать =) |
18.12.2007, 21:01 | #6 | |
Форумчанин Подтвердите свой е-майл
Регистрация: 01.11.2007
Сообщений: 157
|
Цитата:
Код:
Последний раз редактировалось SalasAndriy; 18.12.2007 в 21:03. Причина: Забил вставить теги CODE |
|
19.12.2007, 05:05 | #7 |
Пользователь
Регистрация: 28.10.2007
Сообщений: 61
|
спасибо =)))
|
Опции темы | Поиск в этой теме |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
взять переменную из dll | Roof | Общие вопросы Delphi | 15 | 27.08.2008 16:40 |
из AnsiString в Char[] | juden | Общие вопросы C/C++ | 6 | 20.05.2008 22:49 |
Тема AnsiString не раскрыта=) | chipset | Помощь студентам | 3 | 21.02.2008 21:38 |
Как записать и прочитать переменную моего типа из реестра? | Никки | Общие вопросы Delphi | 2 | 09.12.2007 13:56 |
передать переменную | ar4i | Общие вопросы Delphi | 10 | 04.12.2006 14:30 |