Последнее время я не программирую, а рaзгpебаю зaвалы которые оставили до меня покoления программистов. Чтобы внести минимальное декоративное изменение требуется исправить несколько модулей и потратить несопоставимую по сложности работу по выискиванию всех мест, в которые надо внести изменения.
Дело в том, что тем методы, которые допустимы в примерах, олимпиадах и лабах по программированию, совершенно неприемлемы при создании крупных и долгоживущих прикладных программ.
Предлагаю в этой теме публиковать примеры, как не надо программировать на Delphi, что бы потом не было мучительно больно от встречи с теми, кто исправлял твой код.
Всего в теме 421 сообщение
Добавить свое сообщение
Отслеживать это обсуждение 
№ 331 11-04-2009 04:36 |  |
Ответ на »сообщение 329« (Cepгей Poщин)
___________________________
Это случайно не из темы А если ОС написать на Паскале?
Это с другого форума, хотя может автор вопроса и на королевство его запостил, не знаю.
№ 330 10-04-2009 21:36 |  |
Ответ на »сообщение 327« (Антон Григорьев)
___________________________
Ещё один пример того, как можно, но не нужно программировать на Delphi: http://www.delphimaster.ru/cgi-bin/forum.pl?id=1234167180&n=18
Там с самого начала весело, но сообщение [22], в котором автор топика делится своим поразительным открытием, просто выносит мозг :)))))))))
Ну, перепутал человек виртуальные методы и events :) Хотя, я тоже не разу понял, что, собственно, его возмущает7 То что компилятор сам не пишет программу? по-моему последние версии IDE максимально близки к этому.
№ 329 10-04-2009 14:02 |  |
Ответ на »сообщение 328« (Torbins)
___________________________
Встретил сегодня на просторах интернета вот такой пост Это случайно не из темы А если ОС написать на Паскале?
№ 328 10-04-2009 13:47 |  |
Встретил сегодня на просторах интернета вот такой пост:
Здрасте, вообщем такая проблемка:
У меня Unit10.pas занимает 13378 КБ (13.0 МБ)
И при работе в коде 10 формы после 5-10 изменений делфи начинает виснуть на 5-20 сек. (приходится вырезать весь текс кроме нужной процедуры и т.д, вставлять в блокнот, писать процедуру и затем обратно вставлять в делфи вырезанный текст из блокнота).
И компелируется тож долговато.
Всего 59988 строк.
На строчке 400-500 знаков (эт только там где условие, но часть условия(для удобства) переходит на 2 строчку (если все вместить, то будет примерно 35000 строк))
____________________________________
Постараюсь нормально сформулировать что хочу сделать.
Есть часть условия:
if (Edit40.Text<>t1) and (Edit38.Text<>t1) and (Edit36.Text<>t1) and (Edit34.Text<>t1) and (Edit32.Text<>t1) and (Edit30.Text<>t1) and (Edit28.Text<>t1) and (Edit26.Text<>t1) and (Edit24.Text<>t1) and (Edit22.Text<>t1) and (Edit20.Text<>t1) and (Edit18.Text<>t1) and (Edit16.Text<>t1) and (Edit14.Text<>t1) and (Edit12.Text<>t1) and (Edit10.Text<>t1) and (Edit8.Text<>t1) and (Edit6.Text<>t1) and (Edit4.Text<>t1) and (edit2.Text<>t1)
____________________________________
Оно повторяется если быть точным 4200 раз.
Изменяются только "номера\имена" эдитов (только четные от 2 до 240) и "t1" (t2, t3, t4, .. ,t35).
Хотелось бы задать переменную (Например "Z") и присвоить ей это условие, но так чтобы переменные "t1, t2, t3, .. ,t35)" и "имена\номера" эдитов задавались в каждой процедуре (всего 6 процедур), где находится оставшееся часть условия.
Можите подсказать как мне это реализовать?
Зарание спс.
Не мог не поделится, надеюсь автор меня простит за копирование без спросу :)
№ 327 10-02-2009 03:22 |  |
№ 326 13-08-2008 01:11 |  |
Ответ на »сообщение 324« (Jack Of Shadows)
___________________________
>>> А не лучше ли приобретать вещи когда они вам нужны ? :))
Именно так. Поэтому я и сказал про "или каждую четвертую... или каждую шестнадцатую" ;-)
>>> Я вот до сих пор на седьмых дельфях сижу
Я тоже. Правда, я не зарабатываю себе на жизнь программированием.
Кстати, в случае с Delphi имело смысл покупать нечетный версии. Как-то так получилось, что потребность в новой версии возникла у меня тогда, когда вышла шестерка. Ох и материл я ее. И жалел, что не подождпл чуть-чуть пока выйдет семерка ;-)
№ 325 12-08-2008 12:56 |  |
Ответ на »сообщение 324« (Jack Of Shadows)
___________________________
Я вот до сих пор на седьмых дельфях сижу.
Не вы одни... И все задачи (в основном по работе) без проблем решаются.
№ 324 12-08-2008 11:15 |  |
Ответ на »сообщение 323« (Geo)
___________________________
Во! Именно это я и говорю. И именно поэтому призываю приобретать версии через одну. Точнее, через четное количество (типа, какждую вторую, или каждую четвертую... или каждую шестнадцатую :D)
А не лучше ли приобретать вещи когда они вам нужны ? :))
Я вот до сих пор на седьмых дельфях сижу.
№ 323 12-08-2008 05:47 |  |
Ответ на »сообщение 319« (Александр Алексеев)
___________________________
>>> нечётный релиз - обкатка, чётный - вылизывание
Во! Именно это я и говорю. И именно поэтому призываю приобретать версии через одну. Точнее, через четное количество (типа, какждую вторую, или каждую четвертую... или каждую шестнадцатую :D)
Кстати о птичках, в случае с Микрософтом, похоже надо все же брать через две. Потому что когда они наконец-то ухитряются исправить все баги в сырой версии, то из это зачастую нолучается столь сильно отличающаяся подверсия, что тянет на самостоятельную версию. А уж потом только Микрософт выпускает новую версию с учетом всех исправленных ошибок. Так Win98 будет все же получше, чем OSR2, а Win XP будет получше, чем Win2000.
№ 322 12-08-2008 05:41 |  |
Ответ на »сообщение 317« (Александр Алексеев)
___________________________
Во-первых, я говорил про рафинированную позицию конечного пользователя и только конечного пользователя.
Во-вторых, средней паршивости программа на турбопаскале занимала порядка 50K, такого класса программа на Delphi занимает полтора=два мегабайта. Разница всего на порядок (при кривых руках -- на два). При этом имеет графический интерфейс, что до некоторой степени опрадывает увеличение размера.
Будем сравнивать размеры Excel 4 и Excel 2003, а также преимущества второго перед первым? ;-)
>>> Он этом и говорил Спольски.
Спольски говорил не об этом. Вернее, он и об этом говорил, но возражаю я по поводу другого. А именно против следующей конструкции:
В 1993 году, считая в ценах того времени, место на жёстком диске, которое занимал Microsoft Excel 5.0, стоило примерно 36 долларов.
В 2000 году, считая по ценам 2000-го года, Microsoft Excel 2000 занимал места на один доллар и три цента.
<...>
На самом деле, похоже на то, что Excel становится меньше!
А также против оболванивающих тезисов типа " миф о "раздутости" современного программного обеспечения" ;-) Не миф это, а реальность. И не надо мерить удавов в попугаях :D
Добавить свое сообщение
Отслеживать это обсуждение 
Дополнительная навигация: |
|