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

Вниз

координаты точек пересечения фигур   Найти похожие ветки 

 
ed_30   (2002-06-21 11:15) [0]

Добрый день!

Можно как-то определить координаты точек пересечения прямоугольников, зная координаты углов каждого прямоугольника?

Заранее спасибо.


 
Song ©   (2002-06-21 11:28) [1]

IntersectRect()


 
ed_30   (2002-06-21 11:53) [2]

Спасибо за ответ. А можно небольшой кусок кода, как этой функцией пользоваться?

Заранее спасибо.


 
VDen ©   (2002-06-21 14:43) [3]

var R1, R2, R3: TRect;

begin
R1:=TRect(координаты верхнего левого, нижнего правого угла);
R2:=TRect(то же);
if IntersectRect(R3,R1,R2) then
ShowMessage(IntToStr(R3.Top)+ IntTostr(R3.Bottom))


 
VDen ©   (2002-06-21 14:43) [4]

var R1, R2, R3: TRect;

begin
R1:=TRect(координаты верхнего левого, нижнего правого угла);
R2:=TRect(то же);
if IntersectRect(R3,R1,R2) then
ShowMessage(IntToStr(R3.Top)+ IntTostr(R3.Bottom));
end;



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

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

Наверх




Память: 0.47 MB
Время: 0.021 c
4-69075
Xemax
2002-09-08 20:36
2002.10.21
Обсолютное чтение запись памяти?


1-68733
Peroon
2002-10-11 11:16
2002.10.21
Ну совершенно идиотский вопрос.


1-68709
wer1
2002-10-11 03:42
2002.10.21
Мастера подскажите! Как отследить уход курсора мышки с ToolButton


14-68925
den_c
2002-09-26 07:07
2002.10.21
Что делать когда не знаешь серийный номер и Authorization Key


7-69042
baika
2002-08-05 09:57
2002.10.21
Разлетелся сидюк!!!