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

Вниз

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

 
Филипп   (2002-07-11 02:01) [0]

Уважаемые Мастера, есть прблема.

Сушествует список (допустим TListBox) в котором хранятся полные пути (с именами самих файлов) к каким либо файлам. Проблема состоит в том, как проще организовать поиск по маске (например ??ааа.*) среди этого содержимого. Есть вариант написать анализатор каждой строки, но мне кажется, что это не очень быстро и как-то некрасиво. Как лучше поступить?


 
Юрий Зотов ©   (2002-07-11 02:29) [1]

См. MatchesMask в справке.

uses
..., Mask;

procedure Filter(Source, Target: TStrings; Mask: string);
var
i: integer;
begin
Target.Clear;
for i := 0 to Source.Count - 1 do
if MatchesMask(Source[i], Mask) then Target.Add(Source[i])
end;



 
Филипп   (2002-07-11 02:37) [2]

Большое спасибо



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

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

Наверх




Память: 0.46 MB
Время: 0.008 c
3-70664
MikeGavrilov
2002-07-02 12:42
2002.07.22
Помогите с FreeReport ом


7-70933
AndreyS
2002-04-27 14:30
2002.07.22
Драйвер на Делфи.


1-70744
race1
2002-07-06 16:53
2002.07.22
inifile


1-70677
xyz
2002-07-05 16:54
2002.07.22
кодировки((( koir-8 win


14-70896
PVOzerski
2002-06-25 12:30
2002.07.22
Кто подскажет, где в Сети можно найти/скачать УДК?