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

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

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 09.12.2011, 05:34   #21
Slym
Участник клуба
 
Регистрация: 07.12.2011
Сообщений: 1,025
По умолчанию ОК

Вот полный отрефактореный проект
за 100% правильность не отвечаю мог очепятаться

function ogran(const p:TPoint):boolean; - 100% не правильный т.к. читай ворнинги пользует неинициализированные переменные

итого два модуля blockogran.pas+metod.pas - 270 строк без меток все на циклах и со структурированными переменными
Вложения
Тип файла: zip ЖБК.zip (20.8 Кб, 7 просмотров)
Не стесняемся, плюсуем!

Последний раз редактировалось Slym; 09.12.2011 в 05:38.
Slym вне форума Ответить с цитированием
Старый 11.12.2011, 11:44   #22
googl
Форумчанин
 
Регистрация: 05.06.2010
Сообщений: 154
По умолчанию 213

Спасибо большое тебе за труды. но вот фишка в чем, что всегда проходит 86 точек. Это странновато. а так, спасибо большое
googl вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Зависание окна MasterSporta Win Api 2 12.04.2011 22:51
Зависание компьютера RockForr Компьютерное железо 10 19.08.2010 11:46
зависание DeDoK Работа с сетью в Delphi 7 17.08.2010 09:56
Непонятное зависание. DIMANJ Операционные системы общие вопросы 20 18.11.2009 17:08
Зависание JRcoker Общие вопросы Delphi 8 06.08.2008 08:29