Скачать: CL | DM;

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

← →
Checist [root]   (2005-03-06 17:11) [0]

Я пытаюсь
if (VFileExt in [".jpg", ".gif", ".bmp"]) then
Как правильно написать проверку вхождения расш. в список (он намного более чем здесь указано)
Через if (..) or (..) or (..) - слишком громоздко.

---

← →
MU ©   (2005-03-06 17:16) [1]

if pos(VFileExt, ".jpg;.gif;.bmp") > 0 then
 ....

---

← →
Zeqfreed ©   (2005-03-06 17:19) [2]

function ValidExtension(const ext : String) : boolean;
const
valid_ext : String = ".jpg!.bmp!.gif";
begin
Result := (Pos(ext, valid_ext) <> 0);
end;

---

← →
Zeqfreed ©   (2005-03-06 17:23) [3]

Zeqfreed ©   (06.03.05 17:19) [2]

function ValidExtension(const ext : String) : boolean;
const
valid_ext : String = ".jpg/.bmp/.gif";
begin
Result := (Pos(ext, valid_ext) <> 0);
end;

Лучше так, чтобы ".jpg!" не считалось правильным расширением.

---

← →
Checist [root]   (2005-03-06 17:27) [4]

Спасибо!!!

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.029 c