Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Логин:
Пароль:
Регистрация | Забыли пароль?

Delphi.int.ru Expert

Другие разделы портала

Переход к вопросу:

#   

Статистика за сегодня:  


Лучшие эксперты

Подробнее »



Вопрос # 4 261

/ вопрос открыт /

Здравствуйте, уважаемые эксперты!
Прекрасно понимаю, что приложенный исходник вас очень удивит от объема))
но хочу чтобы вы помогли мне =)
при перемещении иконки "компьютер" нижние иконки исправно перемещаются. при перемещении нижней иконки "привод" на иконки, лежащие сверху, не хотят перемещаться... т.е. следующие иконки зависают на месте...
помогите пожалуйста разобраться! заранее спасибо)

К вопросу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки вопроса)

Hi-tek Вопрос ожидает решения (принимаются ответы, доступен мини-форум)

Вопрос задал: Hi-tek (статус: 1-ый класс)
Вопрос отправлен: 1 июня 2010, 18:41
Состояние вопроса: открыт, ответов: 0.


Мини-форум вопроса

Всего сообщений: 28; последнее сообщение — 3 июня 2010, 07:37; участников в обсуждении: 6.

Страницы: [1] [2] [Следующая »]

min@y™

min@y™ (статус: Доктор наук), 1 июня 2010, 18:45 [#1]:

Посмотрел исходник... Всё, пипец, теперь по ночам будут сниться кошмары! АААААААААААААААА!!!!1111

З.Ы. Пошёл в магазин за водкой...
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
Hi-tek

Hi-tek (статус: 1-ый класс), 1 июня 2010, 18:46 [#2]:

я знаю что это ужжжжжаааасссс.... но работает)) почти работает как надо ))) :DDD
min@y™

min@y™ (статус: Доктор наук), 1 июня 2010, 18:49 [#3]:

ЕХЕ-шник запускать боюсь. Нуевонахрен...
В чём суть программы-то?
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
Hi-tek

Hi-tek (статус: 1-ый класс), 1 июня 2010, 18:49 [#4]:

мастер оптимизации из меня получится наверное только в следующей жизни))
а если серьезно, то переработать бы всё это..
Hi-tek

Hi-tek (статус: 1-ый класс), 1 июня 2010, 18:51 [#5]:

я игру уже давно делаюю... Win Life =) может помните))
совершенствую интерфейс... фишку хочу эту прикрутить, чтобы гонять иконки по экрану))
min@y™

min@y™ (статус: Доктор наук), 1 июня 2010, 18:53 [#6]:

Выкинь срочно этот садомазобрейнфакинг!
Я не буду участвовать в этом маразме: боюсь, что это заразно...
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
Hi-tek

Hi-tek (статус: 1-ый класс), 1 июня 2010, 18:55 [#7]:

ЕХЕшник можете не запускать, просто скомпилируйте исходник)))
неужели так страшно?))
min@y™

min@y™ (статус: Доктор наук), 1 июня 2010, 19:04 [#8]:

Цитата (Hi-tek):

неужели так страшно?))

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

Хорошо, что ты не вывалил этот исходник тут в открытую, а всё-таки догадался прицепить его в виде файла. И на том спасибо.
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
min@y™

min@y™ (статус: Доктор наук), 1 июня 2010, 19:05 [#9]:

Неужели ты надеешься, что реально кто-то будет ЭТО анализировать? Такого оптимизьма я в жизни ещё не встречал!
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
bugmenot

bugmenot (статус: 3-ий класс), 1 июня 2010, 19:08 [#10]:

У него там исполняемый файл же, скопипастить не получится %)

PS: для оптимизации приведенного индусского кода следует выполнить команду
erase Unit2.pas
виконання програми розпочинається з того самого мiсця, де призупинилося.

Hi-tek

Hi-tek (статус: 1-ый класс), 1 июня 2010, 19:09 [#11]:

это моя так называемая TImage'шная физика...
Hi-tek

Hi-tek (статус: 1-ый класс), 1 июня 2010, 19:18 [#12]:

только судя по вашей реакции.... херовая физика)))
Hi-tek

Hi-tek (статус: 1-ый класс), 1 июня 2010, 19:26 [#13]:

я конечно же попробую доработать свой же гигантский алгоритм.... я помню весь день сидел с этим))) вот решил доделать..... а иначе никак... только при этих условиях можно заставить изображения уходить))
Hi-tek

Hi-tek (статус: 1-ый класс), 1 июня 2010, 19:30 [#14]:

я думаю что я выиграл конкурс на самый громоздкий алгоритм :D
min@y™

min@y™ (статус: Доктор наук), 1 июня 2010, 19:36 [#15]:

Цитата (Hi-tek):

я думаю что я выиграл конкурс на самый громоздкий алгоритм :D

Поставил тебе 5 баллов. Тебе бы ужасники снимать в голливуде!
Делаю лабы и курсачи по Delphi и Turbo Pascal. За ПИВО! Пишите в личку, а лучше в аську. А ещё лучше - звоните в скайп!
Hi-tek

Hi-tek (статус: 1-ый класс), 1 июня 2010, 19:45 [#16]:

просто самое интересное, что альтернативы этому алгоритму не найти я думаю.... единомышленников мне не найти)))
Hi-tek

Hi-tek (статус: 1-ый класс), 1 июня 2010, 19:48 [#17]:

Мне интересно услышать мнение других уважаемых экспертов)) пожалуйста, не молчите, мне важно ваше мнение!
bugmenot

bugmenot (статус: 3-ий класс), 1 июня 2010, 19:55 [#18]:

Это не алгоритм, это - <a href="http://govnokod.ru/delphi">говнокод</a>
виконання програми розпочинається з того самого мiсця, де призупинилося.

Hi-tek

Hi-tek (статус: 1-ый класс), 1 июня 2010, 20:05 [#19]:

bugmenot: а вы можете предложить решение этого вопроса?
Кириченко Сергей

Кириченко Сергей (статус: 1-ый класс), 1 июня 2010, 20:16 [#20]:

У меня все работает.
разбей процедуру MovingBred на процедуры поменьше ( я так понимаю разделить части // COMP N WORK и.т.д).
и попробуй заменить эти операторы :
if MainForm.ImageComp.Left < MainForm.ImageWork.Left+70 then
if MainForm.ImageComp.Left+70 > MainForm.ImageWork.Left then
if MainForm.ImageComp.Top < MainForm.ImageWork.Top+70 then
if MainForm.ImageComp.Top+70 > MainForm.ImageWork.Top then
одним используя бинарную логику (and, or, not,).
Используй оператор With.

Страницы: [1] [2] [Следующая »]

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.

Версия движка: 2.6+ (26.01.2011)
Текущее время: 22 февраля 2025, 11:53
Выполнено за 0.02 сек.