IPB

Здравствуйте, гость ( Вход | Регистрация )

 
Ответить в эту темуОткрыть новую тему
> Построить график в Delphi7
lexx007
сообщение 7.12.2008, 9:33
Сообщение #1


Студент
**

Группа: Продвинутые
Сообщений: 136
Регистрация: 30.3.2008
Город: Оренбург
Учебное заведение: ОГУ
Вы: студент



Здравствуйте, подскажите пожалуйста . Нужно построить график в Delphi7. Ч тоб построить график я вставил на пустую панель объект Chart. Появляется область, а как вывести на эту область график данной функции.? Подскажите пожалуйста.
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
lexx007
сообщение 7.12.2008, 10:04
Сообщение #2


Студент
**

Группа: Продвинутые
Сообщений: 136
Регистрация: 30.3.2008
Город: Оренбург
Учебное заведение: ОГУ
Вы: студент



Вот в этой процедуре что нужно прописать к примеру для функции у=х*х.
procedure TForm1.Series1Click(Sender: TChartSeries; ValueIndex: Integer;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);

begin

end;

end.
Или может вообще не тут.
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
creer
сообщение 7.12.2008, 17:25
Сообщение #3


Студент
**

Группа: Продвинутые
Сообщений: 121
Регистрация: 28.10.2007
Город: Екатеринбург
Учебное заведение: УГТУ-УПИ
Вы: студент



lexx007
Попробуйте вначале посмотреть, например, здесь.
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения
lexx007
сообщение 8.12.2008, 13:07
Сообщение #4


Студент
**

Группа: Продвинутые
Сообщений: 136
Регистрация: 30.3.2008
Город: Оренбург
Учебное заведение: ОГУ
Вы: студент



Спасибо за это . я понял. Осталось только разобраться в моей функции.

y=(0.15x*a)/ln(a^2 -x^2).
вот:procedure TForm1.Button1Click(Sender: TObject);
var
x: Integer;
y: Double;
begin
// х изменяется в пределах от 0 до 100
For x := 0 To 10 Do
begin
// Вычисляем очередное значение функции
y:=(0,15*x-a)/ln(a*a-x*x);
// Добавляем его на график
Chart1.Series[0].AddXY(x, y)
end



x я задаю интервал, а причем тут "а", может её надо гдето задавать отдельно
Пользователь в офлайнеКарточка пользователяОтправить личное сообщение
Вернуться в начало страницы
+Ответить с цитированием данного сообщения

Ответить в эту темуОткрыть новую тему
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 



- Текстовая версия Сейчас: 2.5.2024, 8:07

Книжки в помощь: "Сборник заданий по высшей математике" Кузнецов Л.А., "Сборник заданий по высшей математике" Чудесенко В.Ф., "Индивидуальные задания по высшей математике" Рябушко А.П., и другие.




Зеркало сайта Решебник.Ру - reshebnik.org.ru