Построение графика в компоненте Image

@Foxing · Регистрация: 31.05.2014

Author24 — интернет-сервис помощи студентам

Построение графика в компоненте Image, графиком является парабола построенная по формуле Y=AX^2+BX+C, где A(edit1), B(edit2) и C(edit 3) задается пользователем.
Вот часть кода где я накосячил, подскажите что не так сделал, при b=0 все строится правильно, так же все правильно если смещать график относительно оси Оу(С)...а вот если смещать относительно оси Ох(В) то все ломается

Delphi    
        
            
                
                
                
                
            
        
    Скопировано
1
2
3
4
5
6
7
8
9
10
11
12
13
image1.Canvas.moveTo(225+25*StrToInt(edit2.Text),225-25*StrToInt(edit3.Text));
for x:=StrToInt(edit2.Text)+1 to scrollbar2.Position do
begin
y:=StrToInt(edit1.Text)*sqr(x)+StrToInt(edit2.Text)*x+StrToInt(edit3.Text);
image1.Canvas.LineTo(225+x*25,225-y*25);
end;
 
image1.Canvas.moveTo(225+25*StrToInt(edit2.Text),225-25*StrToInt(edit3.Text));  //переход на центр Image
for x:=StrToInt(edit2.Text)-1 downto scrollbar1.Position do                     //судя по тому, что правая половина
begin                                                                          //строится нормально, косяк в этой
y:=StrToInt(edit1.Text)*sqr(x)+StrToInt(edit2.Text)*x+StrToInt(edit3.Text);   //части кода
image1.Canvas.LineTo(225+x*25,225-y*25);
end;

@Foxing · 16.01.2015, 15:34 **[ТС]**

блин закосячил, там ещё Scrollbar должны быть, забыл про, это вот и скрыл, они задают область в которой график рисуется

@FIL · 16.01.2015, 16:14

Delphi    
        
            
                
                
                
                
            
        
    Скопировано
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
var
  OffSetX, OffSetY,
  a, b, c, x, y: Integer;
begin
  OffSetX := Image1.Width div 2;
  OffSetY := Image1.Height div 2;
  Image1.Picture.Bitmap.Width := Image1.Width;
  Image1.Picture.Bitmap.Height := Image1.Height;
 
  a := 1;
  b := 10;
  c := -100;
 
  for x := -100 to 100 do
  begin
    y := a * sqr(x) + b*x + c;
    Image1.Canvas.LineTo(x * 10 + OffSetX, OffSetY - y);
  end;
end;

@Foxing · 16.01.2015, 16:49 **[ТС]**

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

Добавлено через 6 минут
аа, походу все, разобрался, спасибо

Новые блоги и статьи Все статьи Все блоги /
Архитектурные паттерны микросервисов: ТОП-10 шаблонов ArchitectMsa 22.03.2025 Популярность микросервисной архитектуры объясняется множеством важных преимуществ. К примеру, она позволяет командам разработчиков работать независимо друг от друга, используя различные технологии и. . .	Оптимизация рендеринга в Unity: Сортировка миллиона спрайтов GameUnited 22.03.2025 Помните, когда наличие сотни спрайтов в игре приводило к существенному падению производительности? Время таких ограничений уходит в прошлое. Сегодня геймдев сталкивается с задачами совершенно иного. . .	Образование и практика Igor3D 21.03.2025 Добрый день А вот каково качество/ эффективность ВУЗовского образования? Аналитическая геометрия изучается в первом семестре и считается довольно легким курсом, что вполне справедливо. Ну хорошо,. . .	Lazarus. Таблица с объединением ячеек. Massaraksh7 21.03.2025 Понадобилась представление на экране таблицы с объединёнными ячейками. И не одной, а штук триста, и все разные. На Delphi я использовал для этих целей TStringGrid, и то, кривовато получалось. А в. . .	Async/await в Swift: Асинхронное программирование в iOS mobDevWorks 20.03.2025 Асинхронное программирование долго было одной из самых сложных задач для разработчиков iOS. В течение многих лет мы сражались с замыканиями, диспетчеризацией очередей и обратными вызовами, чтобы. . .
Колмогоровская сложность: Приёмы упрощения кода ArchitectMsa 20.03.2025 Наверное, каждый программист хотя бы раз сталкивался с кодом, который напоминает запутанный лабиринт — чем дальше в него погружаешься, тем сложнее найти выход. И когда мы говорим о сложности кода, мы. . .	PostgreSQL в Kubernetes: Подготовка кластера и настройка Mr. Docker 20.03.2025 Когда доходит до контейнеризации баз данных и особенно таких требовательных к ресурсам системах как PostgreSQL, многие команды до сих пор колеблются, прежде чем перенести их в контейнерную. . .	C++26: Индексирование пакетов и метапрограммирование bytestream 20.03.2025 Эволюция C++ продолжается стремительными темпами – каждый новый стандарт приносит функциональность, о которой мы мечтали годами. Звучит слишком громко? Если вы когда-либо боролись с вариадическими. . .	Состояние гонки в C#: подводные камни многопоточного программирования UnmanagedCoder 20.03.2025 Что такое состояние гонки? Это ситуация, когда результат программы непредсказуемо меняется в зависимости от порядка выполнения потоков. Проще говоря, два или более потока пытаются одновременно. . .	Next.js для разработки React: преимущества серверного рендеринга Reangularity 20.03.2025 Next. js решает классическую проблему React-приложений: медленную первоначальную загрузку и плохую индексацию поисковиками. Вместо того чтобы заставлять браузер пользователя выполнять всю работу по. . .

@Foxing 0 / 0 / 0 Регистрация: 31.05.2014 Сообщений: 4
	16.01.2015, 15:34 [ТС]
	блин закосячил, там ещё Scrollbar должны быть, забыл про, это вот и скрыл, они задают область в которой график рисуется Миниатюры 0

@Foxing 0 / 0 / 0 Регистрация: 31.05.2014 Сообщений: 4
	16.01.2015, 16:49 [ТС]
	Извини на я такое даже объяснить не смогу, да и если в код встроить, лучше подскажи как исправить мои 5 строк Добавлено через 6 минут аа, походу все, разобрался, спасибо 0