Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Клуб программистов > Свободное общение
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 11.12.2009, 19:56   #1
Alex Cones
Trust no one.
Старожил
 
Аватар для Alex Cones
 
Регистрация: 07.04.2009
Сообщений: 6,526
По умолчанию Зачем все так усложнять?

Уже не в первый раз я сталкиваюсь с тем, что разработчики борланда начинают усложнять самые простейшие функции. Вот с чем я столкнулся сегодня:
Код:
var
  TrueBoolStrs: array of String;
  FalseBoolStrs: array of String;

const
  DefaultTrueBoolStr = 'True';   // DO NOT LOCALIZE
  DefaultFalseBoolStr = 'False'; // DO NOT LOCALIZE

procedure VerifyBoolStrArray;
begin
  if Length(TrueBoolStrs) = 0 then
  begin
    SetLength(TrueBoolStrs, 1);
    TrueBoolStrs[0] := DefaultTrueBoolStr;
  end;
  if Length(FalseBoolStrs) = 0 then
  begin
    SetLength(FalseBoolStrs, 1);
    FalseBoolStrs[0] := DefaultFalseBoolStr;
  end;
end;

function BoolToStr(B: Boolean; UseBoolStrs: Boolean = False): string;
const
  cSimpleBoolStrs: array [boolean] of String = ('0', '-1');
begin
  if UseBoolStrs then
  begin
    VerifyBoolStrArray;
    if B then
      Result := TrueBoolStrs[0]
    else
      Result := FalseBoolStrs[0];
  end
  else
    Result := cSimpleBoolStrs[B];
end;
Неужели трудно написать так:?
Код:
Function  SRV_BoolToStr(B : Boolean) : Char;
 Begin
  If B Then
   Result := '1'
  Else
   Result := '0';
 End;
А Вы сталкивались с непонятным усложнением в стандартными функциями?
SQUARY PROJECT - НАБОР БЕСПЛАТНЫХ ПРОГРАММ ДЛЯ РАБОЧЕГО СТОЛА.
МОЙ БЛОГ
GRAY FUR FRAMEWORK - УДОБНАЯ И БЫСТРАЯ РАЗРАБОТКА WINAPI ПРИЛОЖЕНИЙ

Последний раз редактировалось Alex Cones; 11.12.2009 в 19:59.
Alex Cones вне форума Ответить с цитированием
Старый 11.12.2009, 20:44   #2
Levsha100
Заблокирован
Старожил
 
Регистрация: 20.07.2008
Сообщений: 4,032
По умолчанию

Цитата:
А Вы сталкивались с непонятным усложнением в стандартными функциями?
Где то на торрентах видел исходники винды...
Цитата:
Ссылку в студию.
http://veselchak.net/prikol/win98.html
А если серьезно, то торрент уже прикрыли Там 2000-чная была, может еще где-то осталась.

Последний раз редактировалось Levsha100; 11.12.2009 в 22:38.
Levsha100 вне форума Ответить с цитированием
Старый 11.12.2009, 22:11   #3
ROD
Linux C++ Qt ARM
Старожил
 
Аватар для ROD
 
Регистрация: 30.11.2008
Сообщений: 3,030
По умолчанию

Цитата:
Сообщение от Levsha100 Посмотреть сообщение
Где то на торрентах видел исходники винды...
0_0 Ссылку в студию.
Дилетант широкого профиля.

"Слова ничего не стоят - покажите мне код!" © Линус Торвальдс
ROD вне форума Ответить с цитированием
Старый 11.12.2009, 22:45   #4
SnX
Форумчанин
 
Регистрация: 30.10.2009
Сообщений: 114
По умолчанию

Цитата:
Где то на торрентах видел исходники винды...
И что с того, хочешь сказать, что это пример неграмотного кода?
SnX вне форума Ответить с цитированием
Старый 11.12.2009, 23:00   #5
Levsha100
Заблокирован
Старожил
 
Регистрация: 20.07.2008
Сообщений: 4,032
По умолчанию

Ну, не мне судить, но после этого : ...
Код:
copy.c:
// see if this file is loaded by kernel, thus something we don't
// want to fuck with.

util.cpp:
// the fucking alpha cpp compiler seems to fuck up the goddam type "LPITEMIDLIST", so to work
// around the fucking peice of shit compiler we pass the last param as an void *instead of a LPITEMIDLIST

webapp.cpp:
      // HighContrast mode is turned on. This totally fucks our style sheet as most of it will
      // get ignored. The best we can do is to resize our window so the gigantic fonts will
      // show correctly.

map.c:
    default:
        //
        // !!!this is fucked if a map goes to multiple physical devices
        // we return the *last* dResult, this is
        // totally random for some messages (like MODM_GETVOLUME).

windbgrm.c:
          // The user fucked up
http://www.fact-archive.com/quotes/Computers
И это только цветочки, ягодки в грубой политике мелкомягких.

Последний раз редактировалось Levsha100; 11.12.2009 в 23:04.
Levsha100 вне форума Ответить с цитированием
Старый 11.12.2009, 23:03   #6
Juffin
Форумчянин
Форумчанин
 
Аватар для Juffin
 
Регистрация: 05.04.2009
Сообщений: 446
По умолчанию

Цитата:
И что с того, хочешь сказать, что это пример неграмотного кода?
вообще-то винда искусственно тормозится и делается глючной, чтобы народ новые компы покупал
Nobody expects Spanish Inquisition!
Juffin вне форума Ответить с цитированием
Старый 11.12.2009, 23:11   #7
ArtInt
Форумчанин
 
Аватар для ArtInt
 
Регистрация: 06.03.2009
Сообщений: 583
По умолчанию

Цитата:
Сообщение от Levsha100 Посмотреть сообщение
Ну, не мне судить, но после этого : ...
Код:
copy.c:
// see if this file is loaded by kernel, thus something we don't
// want to fuck with.

util.cpp:
// the fucking alpha cpp compiler seems to fuck up the goddam type "LPITEMIDLIST", so to work
// around the fucking peice of shit compiler we pass the last param as an void *instead of a LPITEMIDLIST

webapp.cpp:
      // HighContrast mode is turned on. This totally fucks our style sheet as most of it will
      // get ignored. The best we can do is to resize our window so the gigantic fonts will
      // show correctly.

map.c:
    default:
        //
        // !!!this is fucked if a map goes to multiple physical devices
        // we return the *last* dResult, this is
        // totally random for some messages (like MODM_GETVOLUME).

windbgrm.c:
          // The user fucked up
http://www.fact-archive.com/quotes/Computers
Это шуточные комментарии или настоящие?
Кстати даже поискал перевод fuck up, но что другого смысла кроме одного не обнаружил.
Не стыдно чего-то не знать, стыдно не стремиться к знаниям.
ArtInt вне форума Ответить с цитированием
Старый 11.12.2009, 23:20   #8
SnX
Форумчанин
 
Регистрация: 30.10.2009
Сообщений: 114
По умолчанию

Цитата:
Ну, не мне судить, но после этого :
Не вижу ничего странного, во время разработки больших проектов и не таких комментов начитаешься, надо же как-то поддерживать боевой дух при разработке. =)
Конкретно, что тебя не устраевает в коде?
Цитата:
http://www.fact-archive.com/quotes/Computers
И это только цветочки, ягодки в грубой политике мелкомягких.
Не вкурил... Где ягодки, где цветочки. Разъясни-ка.

Последний раз редактировалось mihali4; 12.12.2009 в 00:58.
SnX вне форума Ответить с цитированием
Старый 12.12.2009, 00:16   #9
ROD
Linux C++ Qt ARM
Старожил
 
Аватар для ROD
 
Регистрация: 30.11.2008
Сообщений: 3,030
По умолчанию

Цитата:
http://www.fact-archive.com/quotes/Computers
И это только цветочки, ягодки в грубой политике мелкомягких.
Вот эта цитатка понравилась.

Цитата:
"In a world without walls and fences, who needs Windows and Gates?" ~ Dino Esposito
Дилетант широкого профиля.

"Слова ничего не стоят - покажите мне код!" © Линус Торвальдс
ROD вне форума Ответить с цитированием
Старый 12.12.2009, 01:21   #10
mutabor
Телепат с дипломом
Старожил
 
Аватар для mutabor
 
Регистрация: 10.06.2007
Сообщений: 4,929
По умолчанию

Цитата:
Вот эта цитатка понравилась.
Точно подмечено.

Да у них все наворочено так в Майкрософте, мало не покажется. Недавно читал про их бинарные офисные форматы. Автор так и пишет, не надейтесь за пару дней встроить нативную поддержку, вам понадобится тысячи человеко-лет работы. И спецификации не помогут.

А про Дельфи функции, какая тебе разница? Вызывай их если нужны, да и все, не все ли равно как они там организованы? Критических ошибок не вызывает, ну и ладно
The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen)
Проверь себя! Онлайн тестирование | Мой блог

Последний раз редактировалось mutabor; 12.12.2009 в 01:24.
mutabor вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
А зачем так фальшивить ? HellMercenariess Свободное общение 9 06.10.2009 20:47
посмотрите что не так(((( доходит до 37 строки - функции и все sunnysunny Помощь студентам 15 29.05.2009 00:20
Как исправить процедуры 2 и 3, так чтобы все заработало наконец...! Татяна Паскаль, Turbo Pascal, PascalABC.NET 2 27.05.2009 19:44
А зачем вы почти все делаете ваши сайты с помощью Ucoz? Reaction Свободное общение 9 10.04.2008 21:35