1. Список говнокодов пользователя nikmihej

    Всего: 1

  2. Pascal / Говнокод #1841

    +68.6

    1. 1
    2. 2
    3. 3
    4. 4
    function isstring(str1,str2:string):boolean;
    begin
    result:=(AnsiPos(AnsiLowerCase(str1),AnsiLowerCase(str2))>0)
    end;

    Функция проверяет, содержит ли строка str2 строку str1 не учитывая регистр.
    Возвращает true, если содержит, в противном случае возвращает false.

    nikmihej, 14 Сентября 2009

    Комментарии (9)