Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.07.23;
Скачать: CL | DM;

Вниз

OpenDialog - укрощение   Найти похожие ветки 

 
Delphi basic ©   (2006-07-03 09:58) [0]

Необходимо выбирать файлы начиная с определенного каталога (т.е. при открытии диалога всегда должен вначале быть один и тот же каталог).
Пробую перед каждым вызовом устанавливать нужный InitialDir - не помогает, остается последний, из которого был выбран файл.


 
Desdechado ©   (2006-07-03 10:21) [1]

и как пробуешь?


 
Delphi basic ©   (2006-07-03 10:31) [2]


> Desdechado ©   (03.07.06 10:21) [1]
> и как пробуешь?



 OpenDialogReportName.InitialDir := report_dir;
 if OpenDialogReportName.Execute then
   DataModuleMain.pFIBDataSetReports.FieldByName("file_name").AsString :=
     ExtractFileName(OpenDialogReportName.FileName)


в report_dir при запуске приложения заносится путь к нужному каталогу.


 
Desdechado ©   (2006-07-03 10:57) [3]

покажи код
"в report_dir при запуске приложения заносится путь к нужному каталогу."


 
ЮЮ ©   (2006-07-03 11:07) [4]

OpenDialogReportName.FileName := "";
OpenDialogReportName.InitialDir := report_dir;


 
Delphi basic ©   (2006-07-03 11:37) [5]


> ЮЮ ©   (03.07.06 11:07) [4]
> OpenDialogReportName.FileName := "";
> OpenDialogReportName.InitialDir := report_dir;


Спасибо! ларчик просто открывался... :)


 
Delphi basic ©   (2006-07-03 11:56) [6]

А если нужно ограничить выбор файлов конкретным каталогом?


 
Ketmar ©   (2006-07-03 13:21) [7]

писать свой диалог.



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

Текущий архив: 2006.07.23;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.026 c
1-1149598180
newby
2006-06-06 16:49
2006.07.23
Шрифт по умолчанию в создаваемых формах


15-1150966997
MacroDenS
2006-06-22 13:03
2006.07.23
Апдейты для Д6...


15-1151101823
Другой
2006-06-24 02:30
2006.07.23
Название vs Наименование


15-1151205760
Аццкий юзар
2006-06-25 07:22
2006.07.23
А можно юзать ShellAbout? Микрософт не против?


3-1147940849
AlexeyK
2006-05-18 12:27
2006.07.23
ошибка при закрытии пустого ADOQuery