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

Вниз

InitialDir for OpenDialog   Найти похожие ветки 

 
GovoRun   (2002-02-23 13:49) [0]

День добрый мастаки
Проблемка появилась.
Есть папки с именами 1,2,3,4
Есть подменю из четырех пунктов. Надо чтобы при нажатии на подменю OpenDialog открывался б в соответствующей папке.
Я каждому подменю поставил соответствующий Tag (от 1 до 4)
и при нажатии на подменю (они обрабатываются одной процедурой) пишу OpenDialog.InitialDir:=путь+IntToStr(TMenuItem(Sender).Tag);
Первый раз открывается нужный каталог, а во все последующие разы тот каталог, который открывался прежде. Почему InitialDir не работает

Зараннее благодарен за ответ


 
Sasha9   (2002-02-23 14:40) [1]

Присвой caption"у каждого меню соответственно 1,2,3,4 и вместо inttostr(....) используй эти caption"ы


 
Anatoly Podgoretsky   (2002-02-23 15:05) [2]

Он прекрасно работает, вероятно ты указываешь относительный путь, а надо абсолютный, проверь содержимое переменной "путь"


 
SoftOne   (2002-02-23 23:42) [3]

А свойство OpenDialog.FileName каждый раз устанавливаешь или нет?


 
GovoRun   (2002-02-24 17:22) [4]

OpenDialog.FileName выбирается из OpenDialog
причем странно -- OpenDialog отображает именно последний каталог, хотя до OpenDialog.Execute ему было присвоено OpenDialog.InitialDir



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

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

Наверх









Память: 0.82 MB
Время: 0.025 c
1-32457
Sergy
2002-02-22 17:53
2002.03.11
Пароль


14-32559
Olgerd
2002-01-23 15:38
2002.03.11
Патчи для Delphi


1-32439
Light Elf
2002-02-22 13:52
2002.03.11
Жирный текст в Popup меню.


14-32573
atmospheric
2002-01-28 23:06
2002.03.11
Привет !


7-32593
xprophet
2001-12-07 09:13
2002.03.11
Sockets & protocols





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