Показать сообщение отдельно
Старый 19.07.2018, 18:43   #68
bbb i ko
VIP
 
Регистрация: 04.07.2012
Сообщений: 1,969
Сказал(а) спасибо: 4,010
Поблагодарили 3,559 раз(а) в 1,176 сообщениях
Вес репутации: 1054
bbb i ko репутация неоспоримаbbb i ko репутация неоспоримаbbb i ko репутация неоспоримаbbb i ko репутация неоспоримаbbb i ko репутация неоспоримаbbb i ko репутация неоспоримаbbb i ko репутация неоспоримаbbb i ko репутация неоспоримаbbb i ko репутация неоспоримаbbb i ko репутация неоспоримаbbb i ko репутация неоспорима
По умолчанию

Цитата:
Сообщение от Ovsyanicov Посмотреть сообщение
Не пробовал, но есть определенные сомнения.

вот такое работает:
Contor_Panel = Panel.Contour;
div = 10;
end = Contor_Panel.Max;
c = 0;
x = 0;
while (x < end.x) {
Rect = Contor_Panel.IsPointInside(x, 0);
if (c > 50 || !Rect) break;
Rect = Contor_Panel.IsPointInside(x, end.y - 0.0001);
if (c > 50 || !Rect) break;
x = x + (end.x - 0.0001) / div;
c++
}
y = 0;
c = 0;
if (Rect) {
while (y <= end.y) {
Rect = Contor_Panel.IsPointInside(end.x - 0.0001, y);
if (c > 50 || !Rect) break;
Rect = Contor_Panel.IsPointInside(0, y);
if (c > 50 || !Rect) break;
y = y + (end.y - 0.0001) / div;
c++
}
}
if (Rect) {
Result=0
}
else {
Result=1
}
__________________
Автоматизация автоматизаций на АСУ, ТП и тд и тп..
Комплексное решение
bbb i ko вне форума   Ответить с цитированием Вверх
2 пользователя(ей) сказали cпасибо:
LeoAN (19.07.2018), Ovsyanicov (19.07.2018)