Правила форума
StrScan.PASЯзык:
Русский
English
{ Пример программы для функции StrScan }
{ Возвращает True, если в имени файла присутствуют символы шаблонов }
function HasWildcards(FileName : PChar) : Boolean;
begin
HasWildcards :=
(StrScan(FileName, '*') <> Nil) or
(StrScan(FileName, '?') <> Nil);
end;
function HasWildcards(FileName : PChar) : Boolean;
begin
HasWildcards :=
(StrScan(FileName, '*') <> Nil) or
(StrScan(FileName, '?') <> Nil);
end;
::
::
::
