Critical Update!
По причине огромного количества ошибок и глюков версию контрола от 29.07.2003 считать НЕДЕЙСТВИТЕЛЬНОЙ!
Все (?) МНОЮ обнаруженные баги (или фичи?) устранены в последней версии от 05.08.2003!

Олегу:
О каких координатах и каких точек идет речь?

Про отрицательные величины: проблема, кажется, решена. Грузите зипы со странички!
Про горизонтальный скроллинг: вся проблема в том, что реально прокручивается клиентская область пикчебокса, а уж затем сдвинутое изображение копируется в контекст устройства, совместимый с пичкебоксом, для последующего "вколачивания" изображения обратно в пикчебокс... Если во время этой операции что-либо закрывает клиентскую область пикчебокса, то оно и будет тово... этово... К сожалению применяемая функция ScrollWindowEx скроллит только окна, но не контексты устройств... Надо делать так: создать "теневой" и совместимый контекст устройства (он все равно создается в методе .ScrollData) и в нем каждый раз рисовать средствами API новый вид области графика с самой кривой, а уж потом результат вбивать в пикчебокс! И тут начинается: надо держать буфер из N-последних переданных данных, длина которого равна ширине пикчебокса деленного на шаг промотки, сдвигать эти данные при получении нового значения, отрисовывать все в контексте и копировать в пикчебокс! Если каждый рас рисовать прямо в пикчебоксе, а не в теневом контексте, то будет тормознее... Мерцать будет... Хотите попробовать реализовать? (А со ScrollWindowEx было так красиво! Э-эх...)

Уважаемый Товарищ Автор!
Думаю не только мне, но идруги будет интересно, как программно получить координаты точек. Вот уже полчаса тыкаюсь, и не могу найти как енто делается.

С уважением, Олег

Как я уже писал автору, контрол хорош, но дает ошибку при построении графика с только отрицательными величинами.
А жаль, т.к. тогда нельзя его использовать.
Мне кажется, что при желании автор это может исправить и тогда контрол будет работать правильно!
Разве не так?!

Почему EbExecuteLine работает только из IDE???

U menia ta ze problema chto i u Владимир Ершов
>И даже, кажется знаю, как победить... А что, очень >надо?
Nado otchen.
Hotia by ideu.

Zaranee blagodaren,
Vladimir
P.S.
Proshu izvinit' za volapuk-net russkoj klaviatury.

Да, есть такая проблема со ScrollData...
И даже, кажется знаю, как победить... А что, очень надо?

ScrollData
1.Если в момент сдвига на окно контрола попадает что-нибудь постороннее, то оно захватывается и двигается пока не исчезнет за левой границей. Не критично при быстром скроле, но совершенно неприемлимо при медленной (неск.минут) развертке.
2. Невозможно работать с нессиметричными maxY и minY.
Если выставить maxY<>-minY, график рисуется неизвестно где.
3. Можно-ли нарисовать в ScrollData несколько кривых?
Заранее спасибо

Роман!
Я понимаю, что связь контрола с базой данных для многих очень нужная и важная функциональность, но...
Но лично мне это пока/уже не нужно; у меня нет опыта, ибо я этого еще не делал (не велика беда, так-ить?); чтобы начать сие реализовывать необходима некая эмпирика, типа "как это должно быть и чем неудобно то, что уже реализовано другими"
А пущего контроля над MSChart я никогда не пускал его в свободное плавание, но формировал массивы для отображения, и лишь после этого напускал на них уважаемый MSChart... Если хочешь мне помочь, то составь вразумительное и реалистичное "тех.задание" для связи контрола с базой данных. Какие доп.настройки потребуются, какие новые свойства-методы должны быть добавлены, чтобы пользователю было приятно и удобно... А то и сам что-нибудь сделай... Так, глядишь, и доделаем контрол для "шароварного" рынка и деньгу зашибать начнем! ;o)))

Привет Александр!
Подскажи пожалуйста, можно ли твоим контролом строить график по точкам из базы данных.
Если нет, то возможно ты знаешь как зделать следующее:
как работать с MS Chart, подключая его к базе данных?
По всем полям базы он строит кривые автоматом, принимая первое, третее, пятое и т.д. поля как значения по X, а парные поля – значения по Y.
Мне же нужно чтобы каждая кривая брала координату X ТОльКО из первой колонки, а координату Y – из одной из следующих колонок.
Как ЭТО сделать.
С уважением Роман (Dz).

Ответ Денису:
Есть функция EbExecuteLine в vba6.dll (или vba5.dll), которая ИНТЕРПРЕТИРУЕТ строку, как vb-код... Возможности у нее, как у панели "Immediate" в среде VB.
При помощи ее ты и сможешь сделать то, что задумал...
Могу выслать пример. Сообщи свой мэйл на мой мэйл...

Уважаемый Александр, очень хотца узнать как можно реализовать такую задачку: Необходино сделать так,чтобы пользователь вводил функцию самостоятельно,а то у меня только програмно получается.

Ответ Петру:
Проблема в

Dim M(999,1) as Single

Поставь вместо 999 - 10, или заполни масив M()полностью до 999-го елемента и все пойдет!
Т.е если в масиве есть "лишние" елементы то по ним график тоже строится, принимая их равными 0.
Не делай в масиве лишних мест!

Автору: большое спасибо за отличный контрол.

С уважением Роман(Dz)!

Контрол отличный и очень полезный !
Но, если несложно прокомментируйте:
Следующий код строит кривую, замечательно.Но почему она получается замкнутой. Последняя Line явно лишняя.
И как от этого избавиться ?
Dim M(999, 1) As Single
Dim i As Integer
For i = 0 To 10
List1.AddItem (i)
List2.AddItem (i * i)
Next i

For i = 0 To 10
M(i, 0) = List1.List(i)
M(i, 1) = List2.List(i)
Next i

ctlChart1.AutoScaleX = True
ctlChart1.AutoScaleY = True
ctlChart1.DrawXY M()