Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Ошибка при масштабировании графики 
:(
    Опции темы
seraffim
Дата 6.12.2012, 15:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 6.12.2012

Репутация: нет
Всего: нет
Здравствуйте ,написал программу для вывода точек в builder ,но допустил ошибку и 2 день её вылавливаю , был бы рад ,если бы указали на неё .
На форме есть GroupBox , по высоте он равен форме .
Пытаюсь вывести на свободное пространство точки и оси X,Y , предварительно отмаштабировав ,но большинство точек выходят за пределы видимой области формы.

maxx,minx,maxy,максимальные и минимальные координаты по х и у,
m - массив координат .

 
Код

k1=(Form1->Width - Form1->GroupBox1->Width)*1.0/(maxx-minx);// коэффициент преобразования по Х 
  k2=(Form1->Height)*1.0/(maxy-miny); //коэффициент преобразования по Y 
  x0=abs(minx*k1);  //положение начала координат по х
  y0=abs(maxy*k2); // и по у
  // вывод осей
  Form1->Canvas->MoveTo(0,int(y0));
  Form1->Canvas->LineTo(Form1->Width-Form1->GroupBox1->Width,int(y0));
  Form1->Canvas->MoveTo(int(x0),0);
  Form1->Canvas->LineTo(int(x0),Form1->Height);
 //вывод точек
   for (int i=0;i<n;i++)
 Form1->Canvas->Ellipse(int(m[i].x*k1+x0-4),int(y0-m[i].y*k2-4),int(m[i].x*k1+x0+4),int(y0-m[i].y*k2+4));


Добавление : После многократного разбора ошибка вроде бы была найдена (к1 и к2 нужно брать по модулю),но всё-равно ,иногда точки уходят за форму и при большой разнице между максимумом и минимумом по X или Y (порядка 300) всё точки кучкуются на осях, в чём же дело ?


Это сообщение отредактировал(а) seraffim - 6.12.2012, 18:55
PM MAIL   Вверх
artsb
Дата 6.12.2012, 21:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2280
Регистрация: 17.7.2007
Где: центр Вселенной

Репутация: 39
Всего: 64
Ничего не понятно. Вы можете привести скрины, как "должно быть" и как "получается".


--------------------
Чем отличается умный человек от мудрого?
Умный - выпутается из любой ситуации.
Мудрый - просто в неё не попадёт.
PM MAIL   Вверх
seraffim
Дата 6.12.2012, 22:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 6.12.2012

Репутация: нет
Всего: нет
Должно быть как-то вот так http://s53.radikal.ru/i139/1212/33/558c1b3d1898.jpg, а частенько выходит так  -     http://s018.radikal.ru/i520/1212/ba/06c50e5d2448.jpg.
PM MAIL   Вверх
artsb
Дата 6.12.2012, 22:21 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2280
Регистрация: 17.7.2007
Где: центр Вселенной

Репутация: 39
Всего: 64
Ясно.
А что за переменные maxx,minx,maxy,miny? Как они рассчитываются?

Добавлено через 4 минуты и 26 секунд
По-моему, x0 и y0 проще рассчитать так:
Код

x0 = (this->ClientWindth - GroupBox1->Width) / 2;
y0 = this->ClientHeight / 2;



--------------------
Чем отличается умный человек от мудрого?
Умный - выпутается из любой ситуации.
Мудрый - просто в неё не попадёт.
PM MAIL   Вверх
seraffim
Дата 6.12.2012, 22:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 6.12.2012

Репутация: нет
Всего: нет
Максимальные  и минимальные значения по X  и Y : 
Код

int t,i;
for(i=0;i<n;i++)
{
m[i].x=StrToInt(Form1->StringGrid1->Cells[1][i+1]);
m[i].y=StrToInt(Form1->StringGrid1->Cells[2][i+1]);
}
  t=StrToInt(Form1->StringGrid1->Cells[1][1]);
 minx=t;maxx=t;
  t=StrToInt(Form1->StringGrid1->Cells[2][1]);
  miny=t;maxy=t;
 for (i=2;i<=n;i++)
  {
  t=m[i].x;
  if (t>maxx) maxx=t;
  if (t<minx) minx=t;
  t=m[i].y;
  if (t>maxy) maxy=t;
  if (t<miny) miny=t;
  }
  
PM MAIL   Вверх
artsb
Дата 7.12.2012, 08:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2280
Регистрация: 17.7.2007
Где: центр Вселенной

Репутация: 39
Всего: 64
user posted image
Оно?
Код

    const int n = 3;
    const int PointR = 4;
    const int FieldSize = 5;
    int t, i;
    double k1, k2;
    int maxx, minx, maxy, miny;
    int x0, y0;

    TPoint m[n];

//    m[0].x = 27; m[0].y = 2;
//    m[1].x = 29; m[1].y = 31;
//    m[2].x = -29; m[2].y = -28;

    m[0].x = 10; m[0].y = -40;
    m[1].x = 27; m[1].y = 15;
    m[2].x = 7; m[2].y = 1;

    t = m[0].x;
    minx = t; maxx = t;
    t = m[0].y;
    miny = t; maxy = t;

    for(i = 1; i < n; i++)
    {
        if(m[i].x > maxx) maxx = m[i].x;
        else if(m[i].x < minx) minx = m[i].x;

        if(m[i].y > maxy) maxy = m[i].y;
        else if(m[i].y < miny) miny = m[i].y;
    }

    k1 = ((double)(this->ClientWidth - GroupBox1->Width) - (FieldSize * 2)) / abs(maxx - minx);
    k2 = ((double)this->ClientHeight - (FieldSize * 2)) / abs(maxy - miny);

    x0 = ((minx * k1) * -1) + FieldSize;
    y0 = (maxy * k2) + FieldSize;
    // вывод осей
    this->Canvas->MoveTo(0, y0);
    this->Canvas->LineTo(this->ClientWidth - GroupBox1->Width, y0);
    this->Canvas->MoveTo(x0, 0);
    this->Canvas->LineTo(x0, this->ClientHeight);
    // вывод линий
    for(i = 0; i < n; i++)
    {
        this->Canvas->MoveTo(
            m[i].x * k1 + x0,
            y0 - m[i].y * k2);

        if(i < (n - 1))
        {
            this->Canvas->LineTo(
                m[i + 1].x * k1 + x0,
                y0 - m[i + 1].y * k2);
        }
        else
        {
            this->Canvas->LineTo(
                m[0].x * k1 + x0,
                y0 - m[0].y * k2);
        }
    }
    // вывод точек
    for(i = 0; i < n; i++)
    {
        this->Canvas->Ellipse(
            int(m[i].x * k1) + x0 - PointR,
            y0 - int(m[i].y * k2) - PointR,
            int(m[i].x * k1) + x0 + PointR,
            y0 - int(m[i].y * k2) + PointR);
    }



--------------------
Чем отличается умный человек от мудрого?
Умный - выпутается из любой ситуации.
Мудрый - просто в неё не попадёт.
PM MAIL   Вверх
seraffim
Дата 7.12.2012, 19:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 6.12.2012

Репутация: нет
Всего: нет
Код

x0 = ((minx * k1) * -1) + FieldSize; 

Уножение на -1  ??

Это сообщение отредактировал(а) seraffim - 7.12.2012, 20:50
PM MAIL   Вверх
artsb
Дата 7.12.2012, 21:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2280
Регистрация: 17.7.2007
Где: центр Вселенной

Репутация: 39
Всего: 64
Цитата(seraffim @  7.12.2012,  19:30 Найти цитируемый пост)
Уножение на -1  ??

Да. Чтобы правильно выставить ось Y.
Я так понял, что фигура должна занимать всё свободное место.


--------------------
Чем отличается умный человек от мудрого?
Умный - выпутается из любой ситуации.
Мудрый - просто в неё не попадёт.
PM MAIL   Вверх
seraffim
Дата 7.12.2012, 21:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 6.12.2012

Репутация: нет
Всего: нет
Да ,всё  свободное место. 
Если я правильно понял основную мысль будет так :
Код

k1=abs((Form1->GroupBox1->Left-20)*1.0/(maxx-minx));
  k2=abs((Form1->Height-50)*1.0/(maxy-miny));
  if (minx<0)
  x0=abs(minx*k1)+10;
  else
  x0=Form1->GroupBox1->Left-maxx*k1-10;
  if (maxy>0)
  y0=maxy*k2+10; 
  else
  y0=Form1->Height-10+miny*k2;

Используем Heigh вместо  ClientHeight из-за того,что этот кусок будет использоваться в функции перирисовки .

Это сообщение отредактировал(а) seraffim - 7.12.2012, 21:58
PM MAIL   Вверх
artsb
Дата 7.12.2012, 22:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2280
Регистрация: 17.7.2007
Где: центр Вселенной

Репутация: 39
Всего: 64
Цитата(seraffim @  7.12.2012,  21:50 Найти цитируемый пост)
Если я правильно понял основную мысль будет так :

А я ничего не понял из того, что вы написали smile Я же написал рабочий код.

Цитата(seraffim @  7.12.2012,  21:50 Найти цитируемый пост)
Используем Heigh вместо  ClientHeight из-за того,что этот кусок будет использоваться в функции перирисовки .

Нужно использовать именно ClientHeight, чтобы исключить из расчётов шапку и бордюры.


--------------------
Чем отличается умный человек от мудрого?
Умный - выпутается из любой ситуации.
Мудрый - просто в неё не попадёт.
PM MAIL   Вверх
seraffim
Дата 7.12.2012, 22:38 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 6.12.2012

Репутация: нет
Всего: нет
Цитата(artsb @  7.12.2012,  22:13 Найти цитируемый пост)
А я ничего не понял из того, что вы написали smile Я же написал рабочий код.

Тоже самое почти , но мне так понятнее  smile .
При  использовании ClientHeight  нельзя будет использовать для перерисовки эту же функцию.
PM MAIL   Вверх
artsb
Дата 7.12.2012, 22:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2280
Регистрация: 17.7.2007
Где: центр Вселенной

Репутация: 39
Всего: 64
Цитата(seraffim @  7.12.2012,  22:38 Найти цитируемый пост)
но мне так понятнее

Но так как я написал - работает smile Может я просто каменты напишу?

Цитата(seraffim @  7.12.2012,  22:38 Найти цитируемый пост)
При  использовании ClientHeight  нельзя будет использовать для перерисовки эту же функцию.

С чего вы взяли? Я использовал. Всё работало.


--------------------
Чем отличается умный человек от мудрого?
Умный - выпутается из любой ситуации.
Мудрый - просто в неё не попадёт.
PM MAIL   Вверх
seraffim
Дата 7.12.2012, 23:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 7
Регистрация: 6.12.2012

Репутация: нет
Всего: нет
Ну ClientHeight ,как я помню , размер доступной пользователю формы по Y ,а ,если ,например , форму опистить вниз до упора,то ClientHeight   ->0 и из рисунка получится невесть что.
Результаты эксперимента : до - http://s49.radikal.ru/i125/1212/57/d10872261e40.jpg , после выхода за пределы рабочего стола -  http://s017.radikal.ru/i417/1212/5b/bba20fcfb2d3.jpg   .

Это сообщение отредактировал(а) seraffim - 7.12.2012, 23:11
PM MAIL   Вверх
artsb
Дата 7.12.2012, 23:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Завсегдатай
Сообщений: 2280
Регистрация: 17.7.2007
Где: центр Вселенной

Репутация: 39
Всего: 64
Цитата(seraffim @  7.12.2012,  23:04 Найти цитируемый пост)
Ну ClientHeight ,как я помню , размер доступной пользователю формы по Y ,а ,если ,например , форму опистить вниз до упора,то ClientHeight   ->0 и из рисунка получится невесть что.

Значит вы что-то не так делаете. Потому что, у меня всё чётко рисуется.

И кстати, разберитесь с осями. Почему они у вас всё время прыгают? Они должны либо находиться чётко по центру, либо так как у меня на скриншоте выше. А у вас то так, то сяк smile


--------------------
Чем отличается умный человек от мудрого?
Умный - выпутается из любой ситуации.
Мудрый - просто в неё не попадёт.
PM MAIL   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "С++ Builder"
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по С++ Builder обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Настоятельно рекомендуем заглянуть в DRKB (Delphi Russian Knowledge Base) - крупнейший в рунете сборник материалов по Дельфи

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Rrader.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | C++ Builder | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0527 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.