Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
14.10.2005, 19:13:17
|
|||
|---|---|---|---|
|
|||
Графика в Visual Basic |
|||
|
#18+
Такая тема: нужно написать прогу, в которой по заданной функции будет построен график (в 2D плоскости). Есть кусок кода: Option Explicit Public x, y As Long Private Sub Form_Load() Me.ScaleTop = (-(Me.Height) / 2) For x = 0 To Form1.Width Step 0.1 y = Sin(x) PSet (x, y), RGB(200, 0, 200) Next x End Sub Такая вот проблема: y=sin(x) , а он рисует прямую линию. Что с этим можно сделать? Как получить из всего этого синусоиду?!! Помогите, пожалуйста!!! С нетерпением жду! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
14.10.2005, 22:02:05
|
|||
|---|---|---|---|
Графика в Visual Basic |
|||
|
#18+
Очень просто: в функции y=sin(x) при изменении X от 0 до Form1.Width - значение Y будет изменяться от только 1 до -1. в то время, как размеры экрана - несколько сотен пикселов. Таким образом изменение Y будет практически незаметно для глаза. Выход прост: умножать Y на некий коэффициент или использовать собственную систему координат (свойства ScaleLeft\ScaleTop, если память не изменяет). Проще, конечно, с коэффициентом... но правильнее - с пользовательской системой координат. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
15.10.2005, 19:39:51
|
|||
|---|---|---|---|
|
|||
Графика в Visual Basic |
|||
|
#18+
Ничего не выходит!! Пробовал домножать у на 10 - получается толстая линия, на 100 - три линии. При увеличении коэффициента увеличивается расстояние между линиями. Может, я что-то не так делаю?.. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
15.10.2005, 20:09:56
|
|||
|---|---|---|---|
Графика в Visual Basic |
|||
|
#18+
LaYzeRRНичего не выходит!! Пробовал домножать у на 10 - получается толстая линия, на 100 - три линии. При увеличении коэффициента увеличивается расстояние между линиями. Может, я что-то не так делаю?.. Красивая плавная линия получается при изменении X от -пи до пи с шагом пи/360. У Вас же идет изменение от 0 до 600 - за это время кривая делает столько скачков, что кажется, будто бы линий три штуки. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
15.10.2005, 20:32:47
|
|||
|---|---|---|---|
|
|||
Графика в Visual Basic |
|||
|
#18+
nibblesКрасивая плавная линия получается при изменении X от -пи до пи с шагом пи/360.У Вас же идет изменение от 0 до 600 - за это время кривая делает столько скачков, что кажется, будто бы линий три штуки. Спасибо ОГРОМНОЕ, попробую теперь так сделать! ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
19.01.2006, 16:49:50
|
|||
|---|---|---|---|
|
|||
Графика в Visual Basic |
|||
|
#18+
Лучше поздно, чем никогда... Вот еще один вопрос к более опытным (т. е. ко всем) участникам форума есть! Как лучше сделать координатную плоскость? Рисовать ее линиями, или вставить картинку, или еще как-нибудь? Если линиями, то всякие там единичные отрезки и все такое неудобно ставить, если картинкой, то как график к ней привязывать (чтобы он туда, куда нужно попал)? ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=60&mobile=1&tid=2166543]: |
0ms |
get settings: |
9ms |
get forum list: |
11ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
190ms |
get topic data: |
9ms |
get forum data: |
2ms |
get page messages: |
31ms |
get tp. blocked users: |
1ms |
| others: | 207ms |
| total: | 466ms |
| 0 / 0 |
