Главная страница
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.015 c
3-70663
CyberWarlock
2002-07-02 12:03
2002.07.22
Небольшая проблемка с TDataBase


3-70578
jen_bond
2002-06-28 01:37
2002.07.22
ОТмена кеширования


14-70890
MJH
2002-06-05 18:13
2002.07.22
DJ Quicksilver - Meets Shaggy


3-70647
AlexA
2002-06-27 16:48
2002.07.22
IBDataSet.Lookup


1-70793
MaxSit
2002-07-01 02:24
2002.07.22
Копирование ячеек с форматированием в EXCEL