Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.08.07;
Скачать: CL | DM;

Вниз

Вот как узнать когда...   Найти похожие ветки 

 
Cmenil   (2003-07-20 16:42) [0]

Хай люди! У меня такая проблемма =))
Значит пишу я прогу, у меня в ней что-то типа: когда 1ый имейдж соприкосаеться со 2ым имейджом, тогда ... запускаеться процедура. У меня вопрос в следующим, как определить что у меня имейджи соприкоснулись? Желательно в полный сурс код =))) Заранее благодарю.
ЗЫ. Я обрыл весь форум, ничего похожего не нашёл =((


 
DVM ©   (2003-07-20 16:55) [1]

IntersectRect + GetWindowRect/GetClientRect + подумать


 
Cmenil   (2003-07-20 17:34) [2]

Сорри, я несовсем понял, что ты написал =(( можно немного подробнее =,(


 
DVM ©   (2003-07-20 17:42) [3]

А что тут непонятного. Имиджи - прямоугольники. Прямоугольник, ограничивающий имидж можно получить. Эти прямоугольники двигаются, я так понял? При движении надо проверять их пересечение с помощью IntersectRect. Ее результат - тоже прямоугольник, и если он ненулевых размеров (ширина или/и длина больше нуля), то имиджи пересеклись (соприкоснулись).


 
Cmenil   (2003-07-20 17:59) [4]

просто я новичок =(((
И незнаю что за процедура GetWindowRect =(((
Можно на примере с сурс кодом?


 
Cmenil   (2003-07-20 19:08) [5]

Нуже люди помагите =))))


 
Palladin ©   (2003-07-20 19:19) [6]


> Cmenil (20.07.03 19:08)

images они обычно прямоугольные, ну а если ты не можешь придумать условие когда же прямоугольники пересекаются, то помоему тебя в шестом классе из школы выгнали


 
Cmenil   (2003-07-20 19:36) [7]

В шестом классе мы проходили бейсик. А вот трудно подсказать человеку?


 
tlwlite ©   (2003-07-20 19:39) [8]



var
ResRect, Img1, Img2: TRect;
begin

InterSectRect(RecRect, Img1, Img2);
if ResRect.TopLeft <> ResRect.BottomRight then пересекаются...


где Img1, Img2 прямоугольники ограничивающие соответственно первый и второй image


 
iXuSs   (2003-07-20 19:43) [9]

2 tlwlite:

Хотя мне этот вопрос и не нужен, но большое спасибо тебе за то, что ты сделал.


 
Palladin ©   (2003-07-20 19:48) [10]

хреново вы бэйсик проходили
а вот я проходил бэйсик только в 10 классе...
только вот к сожалению это условие мог придумать уже в 6 классе... :)


 
Cmenil   (2003-07-20 20:01) [11]

tlwlite огромное спасибо!!!


 
Fenik ©   (2003-07-20 20:15) [12]

Куда мы катимся?..



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

Текущий архив: 2003.08.07;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.012 c
1-20579
andrey__
2003-07-16 13:41
2003.08.07
ServiceApplicetion вызывающая приложение (не видна форма)


3-20430
sergg
2003-07-17 10:55
2003.08.07
Поиск через LIKE независимо от регистра символов шаблона


3-20422
RomanRom2
2003-07-15 16:26
2003.08.07
Скопировать таблицу


14-20714
Vlad Oshin
2003-07-23 16:13
2003.08.07
Безобразно используется своп :(


14-20745
Vetall
2003-07-19 00:18
2003.08.07
RXLIB под Delphi6