1. Pascal / Говнокод #1008

    +115.1

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    case Key of
  'F','f','а' : Key:='А';
  '<',',','б' : Key:='Б';
  'D','d','в' : Key:='В';
  'U','u','г' : Key:='Г';
  'L','l','д' : Key:='Д';
  'T','t','е' : Key:='Е';
  '~','`','ё' : Key:='Ё';
  ':',';','ж' : Key:='Ж';
  'P','p','з' : Key:='З';
  'B','b','и' : Key:='И';
  'Q','q','й' : Key:='Й';
  'R','r','к' : Key:='К';
  'K','k','л' : Key:='Л';
  'V','v','м' : Key:='М';
  'Y','y','н' : Key:='Н';
  'J','j','о' : Key:='О';
  'G','g','п' : Key:='П';
  'H','h','р' : Key:='Р';
  'C','c','с' : Key:='С';
  'N','n','т' : Key:='Т';
  'E','e','у' : Key:='У';
  'A','a','ф' : Key:='Ф';
  '{','[','х' : Key:='Х';
  'W','w','ц' : Key:='Ц';
  'X','x','ч' : Key:='Ч';
  'I','i','ш' : Key:='Ш';
  'O','o','щ' : Key:='Щ';
  'M','m','ь' : Key:='Ь';
  '}',']','ъ' : Key:='Ъ';
  '"','''','э' : Key:='Э';
  'S','s','ы' : Key:='Ы';
  '>','.','ю' : Key:='Ю';
  'Z','z','я' : Key:='Я';
 end;

    висит на процедуре Edit1KeyPress :)

    Запостил: guest, 06 Мая 2009

    Комментарии (18) RSS

    • ava guest 06.05.2009 14:37 # 0

      GByte:
      ЫЫЫЫ
      Ответить

    • ava guest 12.05.2009 01:34 # 0

      Мастер Кода:
      А что здесь говнокодного .. не удивлюсь увидеть такое в сорсах крупных проектов
      Ответить

    • ava guest 16.05.2009 12:14 # +4

      MrHant:
      А по коду клавиши такое сделать не проще разве было?
      Ответить

    • ava guest 26.05.2009 16:55 # +1

      Dosa:
      AnsiUpperCase никто не отменял, а еще мона клавиатуру принудительно на русский переключить
      Ответить

    • ava guest 07.06.2009 02:16 # +1

      Сан Саныч:
      А автор ещё и с алфавитом не особо дружит... :)
      Ответить

    • ava guest 22.07.2009 17:20 # +2

      Хохол:
      Как по мне - определять лучший коммент нужно по принципу (напиши как должно быть) вместо говнокода.
      А просто поржать типа Ха-ха-ха ... любой может..
      Ответить

    • ava guest 10.08.2009 16:39 # 0

      ЭТО ДЛЯ БЛОНДИНОГ ПРОГААА
      Ответить

    • ava guest 11.08.2009 11:47 # 0

      Минус коду, автор не учел остальные раскладки
      Ответить

    • ava guest 11.08.2009 12:03 # 0

      Можно было константы ввести, где бы буквы для замены совпадали по позиции... Я так программу для транслита реализовал всего лишь в паре десятков строк (учитывая бегины, энды и т.п.).

      Глупо и обидно так засирать код, как тут написано :)
      Ответить

    • ava labutinpa 14.08.2009 02:34 # +1

      Он попахивает, но это скорее не говнокод. Он работает и по крайней мере сразу понятно, что он делает. И на создание потрачено не больше времени, чем на полноценную функцию. Такое я обычно прощаю :)
      Ответить

    • ava guest 18.08.2009 14:11 # 0

      Я бы поленился такое писать )
      Ответить

    • ava guest 31.08.2009 22:59 # +1

      какая хорошая программа этот Punto Ыцшесрук
      Ответить

    • ava guest 24.10.2009 22:11 # 0

      Самое глупое, что точка в русской раскладке все равно будет "ю". =)
      Ответить

    • ava guest 01.12.2009 05:02 # 0

      Может там точка и не нужна. например туды надо написать свою фамилию шоб не govnofan а именно фамилию)))
      Ответить

    Добавить комментарий