StrScan.PAS

Язык:
Русский
English


 { Пример программы для функции StrScan }

{ Возвращает True, если в имени файла присутствуют символы шаблонов }

function HasWildcards(FileName : PChar) : Boolean;
begin
  HasWildcards :=
    (StrScan(FileName, '*') <> Nil) or
    (StrScan(FileName, '?') <> Nil);
end;
Тэги:
| G+
Код для вставки: :: :: :: ::
Поделиться: // //