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

Вниз

Все возможные замены символов в пароле:   Найти похожие ветки 

← →
shebe91   (2010-11-12 21:28) [0]

привет всем!
нужен код, который при наличии букв и их замен в данном слове сделает все возможные замены, т.е.
слово - кошка; замены - о0, а@, ш*
к0шка, кошк@, к0шк@, ко*ка, к0*ка, ко*к@, к0*к@

---

← →
Amoeba_   (2010-11-13 00:32) [1]

http://www.delphikingdom.com/notice/putinfo.asp?CategoryID=7

---

← →
KSergey ©   (2010-11-19 15:16) [2]

function CatToAbrakadabra(const s_in: String): String;
var
 i: Integer;
begin
 Result := s_in;
 for i := 1 to Length(Result) do
   begin
     case Result[i] of
       "о": Result[i] := "О";
       "а": Result[i] := "@";
       "ш": Result[i] := "*";
     end;
   end;
end;

---

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

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

Наверх

Память: 0.46 MB
Время: 0.007 c