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

Вниз

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

 
Саша   (2008-01-26 13:59) [0]

Доброго времени суток!
Есть таблица в которой, кроме всего прочего сохраняются имена файлов.
Есть OpenDialog, есть ли возможность сделать так, что бы при его открытии в нем отображались только те
файлы, имен которых нет в таблице. Ну и конечно если таковая возможность есть, то как это седлать.
Спасибо.


 
Сергей М. ©   (2008-01-26 14:08) [1]

Нет такой возможности.


 
{RASkov} ©   (2008-01-26 14:18) [2]

> [0] Саша   (26.01.08 13:59)

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


 
Сергей М. ©   (2008-01-26 14:38) [3]


> {RASkov} ©   (26.01.08 14:18) [2]


Точно не поможет.

Это св-во, если не изменяет память, отвечает за фильтрацию по расширениям имен, а не за фильтрацию самих имен.


 
Palladin ©   (2008-01-26 14:40) [4]


> [3] Сергей М. ©   (26.01.08 14:38)

ну отчего же... там полноценная маска на имена файлов... вот только действительно не поможет :) бо выражение "все кроме" маской не описать...:)


 
Сергей М. ©   (2008-01-26 14:46) [5]


> полноценная маска на имена файлов


Ну, положим, полноценным это убогий поиск по шаблону рег.выражения ее не назовешь)

Там, если помнится, засада совсем в другом - имеется какое-то событие (не помню какое) для осуществления пользовательской фильтрации имен файлов, фактически оно возбуждается, но фактически не работает, и сам компонент в этом вовсе не виноват.


 
Palladin ©   (2008-01-26 14:48) [6]

угумсь, есть оно и зовется
OnIncludeItem
подтверждаю, возбуждается, но абсолютно неработает :)


 
{RASkov} ©   (2008-01-26 15:12) [7]

> [3] Сергей М. ©   (26.01.08 14:38)

procedure TForm1.Button1Click(Sender: TObject);
begin
 OpenDialog1.Filter:="Блокнот и RegEdit|notepad.exe;regedit.exe";
 OpenDialog1.InitialDir:="C:\Windows";
 OpenDialog1.Execute;
end;


Можно перед показом пробежаться по таблице имен файлов и сгенерить фильтр для отсутствующих имен....

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


 
{RASkov} ©   (2008-01-26 15:15) [8]

> Можно перед показом пробежаться по таблице имен файлов и
> сгенерить фильтр для отсутствующих имен....

т.е. бежать по файлам какталога, и если файла нет в таблице, то добавить его в фильтр....
Гиморно это.... на смену каталога в самом диалоге тоже самое делать нужно....


 
Сергей М. ©   (2008-01-26 15:39) [9]


> т.е. бежать по файлам какталога, и если файла нет в таблице,
>  то добавить его в фильтр


Угу.

А потом еще и эксплорер, получив этот фильтр, будет опять бежать по тем же самым файлам в том же самом каталоге.

Хорошо если файлов там шиш да маленько, а если их там по самое нехочу ?) Да еще и носитель древний, с тормозами ?)


 
{RASkov} ©   (2008-01-26 15:43) [10]

> [9] Сергей М. ©   (26.01.08 15:39)

:)
Угу.... Ну я и сказал, что гиморно это :)

Автору:
В любом случае, когда задача отходит от стандартных решений, то лучше выполнить решение заново.... Т.е. "сворганить" свой диалог :)
А не "подгибать" под себя вещи, другого характера по смыслу.



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

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

Наверх




Память: 0.46 MB
Время: 0.057 c
6-1180443920
Chaser
2007-05-29 17:05
2008.02.17
Путь к папке "Program Files" на удаленном компьютере


2-1201286076
__msaA
2008-01-25 21:34
2008.02.17
File of Integer


15-1200289306
вовчик
2008-01-14 08:41
2008.02.17
Вопрос по администрированию доступа к папке


15-1200226339
Kostafey
2008-01-13 15:12
2008.02.17
С днем рождения ! 13 января


2-1201139759
Maloj2007
2008-01-24 04:55
2008.02.17
Определение размера TStringList





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