![]() |
Genesis, псевдонимы |
Ответить ![]() |
Страница <12 |
Автор | |
![]() Участник ![]() ![]() Присоединился: 02 Декабрь 2010 Online Status: Offline Публикации: 68 |
![]() ![]() ![]() ![]() Опубликовано: 01 Сентябрь 2011 09:11 |
Доброе утро! Я думаю что вашу задачу возможно реализовать двумя способами: 1. попробуйте сделать это на внутреннем скрипте genesis, примерно это выглядит так подключится через ODBC к вашей базе данных и затем в цикле в какую-нибудь переменную (которая привязана к тренду) поочередна читать ваши данные из базы данных (SQL запросами). 2.написать на С++ программу конвертор которая подключается к обеим базам данных, т.е. читала из вашей базы и записывала в базу genesis. |
|
![]() |
|
![]() Новичок ![]() Присоединился: 21 Июль 2011 Online Status: Offline Публикации: 11 |
![]() ![]() ![]() ![]() |
есть скрипт для создания любого пера:
Option Explicit Dim Values(1 To 480) Dim TDates(1 To 480) Dim MSecs(1 To 480) Dim Qual(1 To 480) Dim I As Long Dim bmyTrend As Boolean Dim strOneName As String Dim PenValues As Variant Dim PenTDates As Variant Dim PenMSecs As Variant Dim PenQuality As Variant Public Sub qwe() Randomize strOneName = "NewPen" TWXViewer1.AddCustomPen (strOneName) Dim mypen As Object Set mypen = TWXViewer1.GetPen(strOneName, "custom") mypen.PenVisible = True mypen.PenColor = 5 mypen.PenWidth = 1 Set mypen = Nothing End Sub Public Sub asd() For I = UBound(Values) To LBound(Values) + 1 Step -1 Values(I) = Values(I - 1) TDates(I) = TDates(I - 1) MSecs(I) = MSecs(I - 1) Qual(I) = Qual(I - 1) Next I Values(LBound(Values)) = 100.5 * Rnd TDates(LBound(Values)) = Now MSecs(LBound(Values)) = 0 Qual(LBound(Values)) = 192 PenValues = Values PenTDates = TDates PenMSecs = MSecs PenQuality = Qual bmyTrend = TWXViewer1.SetPenValues(strOneName, PenValues, PenTDates, _ PenMSecs, PenQuality) End Sub в ней как бы ключевыми являются Values(LBound(Values)) = 100.5 * Rnd TDates(LBound(Values)) = Now А как можно таблицу добавить??? |
|
![]() |
Ответить ![]() |
Страница <12 |
Переход на форум | Права доступа на форуме ![]() Вы не можете публиковать новые темы в этом форуме Вы не можете отвечать на сообщения в этом форуме Вы не можете удалять Ваши сообщения на этом форуме Вы не можете редактировать Ваши сообщения на этом форуме Вы не можете создавать голосования на этом форуме Вы не можете выражать своё мнение в голосованиях на этом форуме |