Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 03.06.2012, 00:32
gamezeldol gamezeldol вне форума
Прохожий
 
Регистрация: 21.02.2012
Сообщения: 16
Репутация: 10
По умолчанию TrackBar и Масштабирование графика

Помогите реализовать? Пишу дипломную работу и преподу преспичило чтобы было именно так:
После всех совершенный действий в моей программе рисуется график
PHP код:
Код:
form5.image1.Canvas.pen.Color:=clRed; 
 form5.image1.Canvas.pen.width:=1; 
 x:=strtofloat(stringgrid1.cells[1,1])+x0; 
 y:=-strtofloat(stringgrid1.cells[2,1])+y0; 
form5.image1.canvas.MoveTo(trunc(x),trunc(y)); 
for i:=2 to StringGrid1.RowCount-1 do 
begin 
   x:=strtofloat(stringgrid1.cells[1,i])+x0; 
   y:=-strtofloat(stringgrid1.cells[2,i])+y0; 
form5.image1.canvas.lineto(trunc(x),trunc(y)); 
end;  
мне нужно чтобы этот график в поле canvas масштабировался с использованием TrackBar.
Ответить с цитированием
  #2  
Старый 03.06.2012, 01:01
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Умножение отменили?
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием
Этот пользователь сказал Спасибо angvelem за это полезное сообщение:
gamezeldol (03.06.2012)
  #3  
Старый 03.06.2012, 08:35
PS11011010 PS11011010 вне форума
Новичок
 
Регистрация: 30.03.2012
Сообщения: 98
Репутация: 282
По умолчанию

k - значение TrackBar.
Получаешь координату x а в график выводишь x/k
Через НЕИЗМЕНЕННЫЙ x получаешь y и точно так же делишь.
P.S.
Цитата:
Сообщение от angvelem
Умножение отменили?
Коллега категорически прав. С таким же успехом можно и умножать.
Ответить с цитированием
Этот пользователь сказал Спасибо PS11011010 за это полезное сообщение:
gamezeldol (03.06.2012)
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 15:21.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025