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

Вниз

OpenDialog TypeChange и MultiSelect   Найти похожие ветки 

 
Vitaliy_____   (2009-06-16 11:34) [0]

Доброе время суток!
Мне нужно чтобы при смене типа файлов, отображаемых в OpenDialog менялась возможность выбора нескольких файлов.
То есть, для .txt было возможно одновременно выбрать несколько файлов, а, скажем, для .doc только 1.

Пишу на смену типа файлов

procedure TForm1.OpenDialog1TypeChange(Sender: TObject);
begin
if OpenDialog1.FilterIndex=2 then OpenDialog1.Options:=OpenDialog1.Options-[ofAllowMultiSelect]
else OpenDialog1.Options:=OpenDialog1.Options-[ofAllowMultiSelect];
end;

Но все равно множественный выбор в диалоге доступен. Что еще нужно сделать?


 
Игорь Шевченко ©   (2009-06-16 12:00) [1]

property Options: TOpenOptions read FOptions write FOptions default [ofHideReadOnly, ofEnableSizing];

то есть, присвоение Options после того, как вызван execute, ничего не меняет.


 
Vitaliy_____   (2009-06-16 12:08) [2]

Именно это я и наблюдаю. Опции действительно меняются, а вот эффекта не дают.
Вопрос, можно ли сделать то что я хочу или забить и не париться (все равно будет обработан только 1-й в списке файл в случае FilterIndex=2).
Просто интересно, зачем тогда OpenDialog1TypeChange существует, если он срабатывает при execute, а поменять мы уже не сможем...


 
Игорь Шевченко ©   (2009-06-16 12:24) [3]


> забить и не париться


именно


> Просто интересно, зачем тогда OpenDialog1TypeChange существует,
>  если он срабатывает при execute, а поменять мы уже не сможем.
> ..


например, чтобы изменить метод предварительного просмотра файла


 
Vitaliy_____   (2009-06-16 12:46) [4]

Ясно, спасибо. Просто я думал может его можно перевызвать что ли, или сообщение послать ему, чтобы он "поумнел" :)



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

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

Наверх




Память: 0.47 MB
Время: 0.013 c
15-1262970823
Кто б сомневался
2010-01-08 20:13
2010.03.28
Уровень жизни рейтинг International Living.


15-1262986225
Юрий
2010-01-09 00:30
2010.03.28
С днем рождения ! 9 января 2010 суббота


2-1264707676
AntiDotNet
2010-01-28 22:41
2010.03.28
Смена Hint а в трее


1-1246863401
WeX
2009-07-06 10:56
2010.03.28
Реализовать систему плагинов


3-1237429884
DelphiN!
2009-03-19 05:31
2010.03.28
Создание "скрытого" поля в FireBird