Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2005.02.20;
Скачать: [xml.tar.bz2];

Вниз

Я на грани самоубийства!!!   Найти похожие ветки 

 
Kerk ©   (2005-01-24 10:56) [0]

Не могу больше разбирать подобный код!!!
TPole(TNapravl(TPch(TDorog(PointerDor.Objects[AfoDor]).PointerPCH.Objects[AfoPch]).PointerNapr.Objects[AfoN]).Poin terPut.Objects[AfoPut]).KolKm:=0;
TPole(TNapravl(TPch(TDorog(PointerDor.Objects[AfoDor]).PointerPCH.Objects[AfoPch]).PointerNapr.Objects[AfoN]).PointerPut .Objects[AfoPut]).KolPKm:=0;
for i:=0 to TPole(TNapravl(TPch(TDorog(PointerDor.Objects[AfoDor]).PointerPCH.Objects[AfoPch]).PointerNapr.Objects[AfoN]).PointerPut .Objects[AfoPut]).PropKiloms.Count-2 do
 begin
  if (TPropKm(TPole(TNapravl(TPch(TDorog(PointerDor.Objects[AfoDor]).PointerPCH.Objects[AfoPch]).PointerNapr.Objects[AfoN]).P ointerPut.Objects[AfoPut]).PropKiloms.Objects[i]).Prop) or
     (TPropKm(TPole(TNapravl(TPch(TDorog(PointerDor.Objects[AfoDor]).PointerPCH.Objects[AfoPch]).PointerNapr.Objects[AfoN]).P ointerPut.Objects[AfoPut]).PropKiloms.Objects[i]).Nest) then
   begin
    TPole(TNapravl(TPch(TDorog(PointerDor.Objects[AfoDor]).PointerPCH.Objects[AfoPch]).PointerNapr.Objects[AfoN]).PointerPut .Objects[AfoPut]).KolPKm:=
     TPole(TNapravl(TPch(TDorog(PointerDor.Objects[AfoDor]).PointerPCH.Objects[AfoPch]).PointerNapr.Objects[AfoN]).PointerPut .Objects[AfoPut]).KolPKm+1;
    j:=j+1;
   end
  else
   TPole(TNapravl(TPch(TDorog(PointerDor.Objects[AfoDor]).PointerPCH.Objects[AfoPch]).PointerNapr.Objects[AfoN]).PointerPut .Objects[AfoPut]).KolKm:=
    TPole(TNapravl(TPch(TDorog(PointerDor.Objects[AfoDor]).PointerPCH.Objects[AfoPch]).PointerNapr.Objects[AfoN]).PointerPut .Objects[AfoPut]).KolKm+1;
  TPropKm(TPole(TNapravl(TPch(TDorog(PointerDor.Objects[AfoDor]).PointerPCH.Objects[AfoPch]).PointerNapr.Objects[AfoN]).Po interPut.Objects[AfoPut]).PropKiloms.Objects[i]).Nom:=j;
 end;
TPropKm(TPole(TNapravl(TPch(TDorog(PointerDor.Objects[AfoDor]).PointerPCH.Objects[AfoPch]).PointerNapr.Objects[AfoN]).Po interPut.Objects[AfoPut]).PropKiloms.Objects[
    TPole(TNapravl(TPch(TDorog(PointerDor.Objects[AfoDor]).PointerPCH.Objects[AfoPch]).PointerNapr.Objects[AfoN]).PointerPut .Objects[AfoPut]).PropKiloms.Count-1]).Nom:=
  TPropKm(TPole(TNapravl(TPch(TDorog(PointerDor.Objects[AfoDor]).PointerPCH.Objects[AfoPch]).PointerNapr.Objects[AfoN]).Po interPut.Objects[AfoPut]).PropKiloms.Objects[
      TPole(TNapravl(TPch(TDorog(PointerDor.Objects[AfoDor]).PointerPCH.Objects[AfoPch]).PointerNapr.Objects[AfoN]).PointerPut .Objects[AfoPut]).PropKiloms.Count-2]).Nom;
TPole(TNapravl(TPch(TDorog(PointerDor.Objects[AfoDor]).PointerPCH.Objects[AfoPch]).PointerNapr.Objects[AfoN]).PointerPut .Objects[AfoPut]).KolKm:=
 TPole(TNapravl(TPch(TDorog(PointerDor.Objects[AfoDor]).PointerPCH.Objects[AfoPch]).PointerNapr.Objects[AfoN]).PointerPut .Objects[AfoPut]).KolKm*10;


Скажите что-нибудь приятное.. чтоб жить захотелось!!!


 
Думкин ©   (2005-01-24 10:57) [1]

Автор писал из дурки. Стало легче? :))


 
Kerk ©   (2005-01-24 10:58) [2]

Думкин ©   (24.01.05 10:57) [1]
Автор писал из дурки. Стало легче? :))


Не очень. Боюсь я сам скоро там окажусь. :)


 
REA   (2005-01-24 10:59) [3]

Многие тсзть "программисты" так пишут. Не дай бог в этом разбираться! Легче заново написать.


 
REA   (2005-01-24 11:00) [4]

Чтобы стало легче: замени всю эту предысторию на With - полегчает.


 
Думкин ©   (2005-01-24 11:00) [5]

Это тот самый код что ты говорил? Как он вообще выжил?


 
REA   (2005-01-24 11:01) [6]

Чтобы стало легче: замени всю эту предысторию на With - полегчает.


 
Kerk ©   (2005-01-24 11:01) [7]

Думкин ©   (24.01.05 11:00) [5]

да. именно он. :(


 
REA   (2005-01-24 11:02) [8]

Это кажется refucktoring называется...


 
NeyroSpace ©   (2005-01-24 11:02) [9]

Это не код, это книга времен! Ее между строк читать надо:-)


 
jack128 ©   (2005-01-24 11:07) [10]

мда... copy/paste рулит безбожно :-)


 
Игорь Шевченко ©   (2005-01-24 11:09) [11]

Чему удивляться - оплата построчная.


 
Kerk ©   (2005-01-24 11:11) [12]

Игорь Шевченко ©   (24.01.05 11:09) [11]
Чему удивляться - оплата построчная.


А такое бывает? И если построчная, почему комментарием совсем нет?


 
Гаврила ©   (2005-01-24 11:13) [13]

Думаю, такой код в процессе разбора нужно постепенно переписывать, приводя к нормальному виду


 
какой-то дядька   (2005-01-24 11:14) [14]

Вот к чему приводит отсутствие макросов и шаблонов. Люди стреляться хотят.


 
Kerk ©   (2005-01-24 11:15) [15]

какой-то дядька   (24.01.05 11:14) [14]
Вот к чему приводит отсутствие макросов и шаблонов.


К этому приводит не отстутствие макросов и шаблонов, а отстутсвие мозгов, Андрей.


 
TUser ©   (2005-01-24 11:15) [16]

Автошемой его, Автошемой


 
TUser ©   (2005-01-24 11:16) [17]

Напомнило такую ссылку (тут кто-то давал)
http://www.rsdn.ru/forum/Message.aspx?mid=858629&only=1


 
basken   (2005-01-24 11:23) [18]

гггг... Вот это изврат :))), Перепеши все заново - будет намного быстрее... или можешь попробовать что то в этом роде... Мое имхо - такие вещи надо переписывать
...
var
...
myPole: TPole;
...
begin
 ...
 myPole := TPole(TNapravl(TPch(TDorog(PointerDor.Objects[AfoDor]).PointerPCH.Objects[AfoPch]).PointerNapr.Objects[AfoN]).Poin terPut.Objects[AfoPut]);
 ....


 
Kerk ©   (2005-01-24 11:25) [19]

basken   (24.01.05 11:23) [18]
Перепеши все заново - будет намного быстрее...


Дык куда ж я денусь? Я уже неделю такой вот код переделываю!!!


 
basken   (2005-01-24 11:32) [20]

По рукам надо за такие вещи(код) давать... С одной стороны смешно немного, а с другой – кому то разгребать все эти "писули"...


 
Babay ©   (2005-01-24 11:48) [21]

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

ОЧЕНЬ СОЧУСТВУЮ !!!!

Иди бери ящик пива, а лучше водки....

---
Мои соболезнования.


 
Бугага ©   (2005-01-24 12:33) [22]

Да уж... Керк, мои соболезнования... :(

А кто вообще это писал?


 
какой-то дядька   (2005-01-24 13:02) [23]

>К этому приводит не отстутствие макросов и шаблонов, а отстутсвие мозгов
Макросы + шаблоны + мозги + вкус + чувство эстетики = красиво оформленный код, который нестыдно показать. Мне правда, до этого далеко.


 
DSKalugin ©   (2005-01-24 13:07) [24]

гагагагага. На мыло таких писателей кода


 
SergP.   (2005-01-24 13:08) [25]


> Игорь Шевченко ©   (24.01.05 11:09) [11]
> Чему удивляться - оплата построчная.


Скорее не построчная а посимвольная...


 
kirasukii   (2005-01-24 13:09) [26]

На это: sorm@fsb.ru?


 
VMcL ©   (2005-01-24 13:09) [27]

>>TUser ©  (24.01.05 11:16) [17]

>Напомнило такую ссылку (тут кто-то давал)
http://www.rsdn.ru/forum/Message.aspx?mid=858629&only=1


Хммм... и я такую траву хочу покурить :D


 
kaif ©   (2005-01-24 13:42) [28]

Сразу чувствуется, профи писал. Я такой текст даже придумать не смогу.


 
KilkennyCat ©   (2005-01-24 13:45) [29]


> j:=j+1;
>    


Вот! увидел в этом коде! оазис, просто... :)


 
stud ©   (2005-01-24 13:52) [30]

это защита авторских прав! чтобы враг не смог разобраться в исходниках! надо взять на вооружение)))


 
Kerk ©   (2005-01-24 14:19) [31]

Бугага ©   (24.01.05 12:33) [22]
А кто вообще это писал?


Мой предшественник.. несколько лет назад.
Его координат в исходнике нет. Видимо он был скромным и пожелал остаться неизвестым (и живым).


 
Иксик2   (2005-01-24 14:38) [32]

Мне дурно!
Боже, итак голова болела, теперь совсем...


 
NailMan ©   (2005-01-24 14:57) [33]

CTRL+C/CTRL+V рулят неподеццки...

---
P.L.U.R. and WBR, NailMan aka 2:5020/3337.13


 
Беспечный_Ангел ©   (2005-01-24 14:57) [34]

Ох ну ни фига себе... Это что же он принимал-то?


 
Бугага ©   (2005-01-24 19:42) [35]


> Его координат в исходнике нет. Видимо он был скромным и
> пожелал остаться неизвестым (и живым).

Я бы тоже не дал своих координат :)
А вообще, мне кажется, он напакостить хотел... чтобы последующие за ним поломали голову...


 
Marser ©   (2005-01-24 19:50) [36]

По себе очень ранних времен знаю - замучено специально ради осознания собственной крутости :-)


 
Kerk ©   (2005-01-24 19:56) [37]

Marser ©   (24.01.05 19:50) [36]

Я так думаю, что тут программер не очень ранних времен был. Видимо клинический случай.


 
MacroDenS ©   (2005-01-24 20:02) [38]

Держись, Kerk. Мы все тебе сочуствуем.
// Ты б у начальства навел справки про предыдущего прогера, что б весь пыл на него направить, а то суицид - енто не круто.


 
kirasukii   (2005-01-24 20:55) [39]

суицид - это круто!!!


 
Околокомпьютерный   (2005-01-25 13:13) [40]

а компилитор тебе еще сочувствовать не начал???



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

Форум: "Потрепаться";
Текущий архив: 2005.02.20;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.54 MB
Время: 0.04 c
1-1107330913
Игорь нтк
2005-02-02 10:55
2005.02.20
День недели


4-1105022351
N0th!ng
2005-01-06 17:39
2005.02.20
Прозрачное окно


6-1102328286
DelphiN!
2004-12-06 13:18
2005.02.20
Получение исход. вход. трафика из компонента TidMappedPortTCP


1-1107767150
Fostr
2005-02-07 12:05
2005.02.20
Размер текста в RichEdit


9-1100888096
FRick
2004-11-19 21:14
2005.02.20
Зеркала в GLScene!





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский