Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 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




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




Наверх





Память: 0.72 MB
Время: 0.014 c
7-32589           GydruS                2001-12-06 12:29  2002.03.11  
Здравствуйте, уважаемые!


7-32584           Nickolaus             2001-12-05 22:03  2002.03.11  
ПОМОГИТЕ! ! ! Кто-нибудь что-нибудь слышал о записи на CD-RW


3-32388           СиндяшкинДВ           2002-02-12 10:57  2002.03.11  
Проблема с групповой полосой в отчете


14-32578          -=CrazyFish=-         2002-01-25 11:58  2002.03.11  
интересует ваше мнение...


14-32570          wicked                2002-01-28 13:44  2002.03.11  
беспредел в Москве