1. Наш канал codeby в telegram. Пишем об информационной безопасности, методах защиты информации, о программирован. Не пропускай новости с кодебай, будь в тренде ! Подробнее ...

    Скрыть объявление
  2. Чат codeby в telegram перезагрузка. Обсуждаем вопросы информационной безопасности и методы защиты информации, программирование. Задавайте свои вопросы и комментируйте чужие. Подробнее ...

    Скрыть объявление

Прошу помочь ,Я заплачу

Тема в разделе "Delphi - программирование", создана пользователем globax, 11 фев 2006.

Статус темы:
Закрыта.
  1. globax

    globax Гость

    Репутация:
    0
    добрый день уважаемые знатоки круглого стола , прошу вашей помощи , дело в том что мне очень надо
    написать программу , которая решит буду ли я учиться в универе дальше или меня выгонят да я программер начинающий , но я стремлюсь к большему, моя мечта стать спецом,но что то не очень получается, задача такая
    ==дана картинка сосканированая
    с листа в формате *.jpg. Нужно, чтоб в блоке программы человек мог выбрать
    нужную картинку и задал ленейный размер. Программа посчитала количество
    точек заключённых в чёрных линниях либо линиях любого другого цвета и
    пересчитала с помощью линейного размера эти точки в реальную площадь площадь.===
    прошу вас помогите , как это реализовать , и если можно в делфи , мне нужен наглядный код данного приложения , посути это нужно посчитать количество пикселей в некоей замкнутой области (так я понял), а уж пиксели перевести в квадратные см,м,км Самое простое - разбитие фигуры на элементарные треугольники с проверкой на выпуклость фигуры и подсчет их площадей
    Но как это сделать не знаю, Я знаю бесплатно помощи я не получу ,если так я готов заплатить. пишите satdog@mail.ru
     
  2. Gisma

    Gisma Гость

    Репутация:
    0
    mailto: gis2002@inbox.ru
    высылате ТЗ у меня есть желание и возможности:ph34r:
     
  3. 62316e

    62316e Гость

    Репутация:
    0
    Поставь задачу более конкретней и тебе помогут.
     
  4. Fabricija

    Fabricija Гость

    Репутация:
    0
    У меня почти такая же проблема. Мне нужно подсчитать количество пикселей в замкнутой фигуре. Помогите пожалуйста.
     
  5. niello

    niello Гость

    Репутация:
    0
    Код:
    function GetS(Polygon : Array of TPoint):Real;
    var
    i : integer;
    sq,s : Real;
    res : Real;
    size : integer;
    begin
    res:=0;
    Size:=High(Polygon)+1;
    for i:=0 to Size-1do begin
    if i=0 then
    begin
    s:=Polygon[i].X*(Polygon[Size-1].Y-Polygon[i+1].Y);
    res:=res+s;
    end
    else
    begin
    if i = Size-1 then
    begin
    s:=Polygon[i].X*(Polygon[i-1].Y-Polygon[0].Y);
    res:=res+s;
    end
    else
    begin
    s:=Polygon[i].X*(Polygon[i-1].Y-Polygon[i+1].Y);
    res:=res+s;
    end;
    end;
    end;
    sq:=ABS(res/2);
    Result:=sq;
    end;
    Результат надобно округлить). Ну а вот получение полигона — выбирай либо вручную, либо как-то автоматически окунтуривать и т.д.
    Upd: Полигон всмысле Polygon — точки с кординатами Х и У.
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей