<< Clique para Mostrar o Sumário >>
HorScaleEnd |
Determina o valor final aplicado na escala horizontal principal da grade. Este valor pode ser numérico para E3Charts XY, ou Data para E3Charts com escala de tempo fixa. Para E3Charts de tempo real, esta propriedade não é aplicada, sendo então utilizada a propriedade TimeSpan. Exemplo:
Sub ComboBox1_Change()
' Define qual consulta deseja mostrar
current_query_index = ListIndex
Set E3Chart1 = Screen.Item("E3Chart1")
i = 0
For Each query In E3Chart1.Queries
If i = current_query_index Then
query.FieldFilter(0) = "" ' Traz tudo
Set current_query = query
Else
query.FieldFilter(0) = "<0" ' Não traz nada para
' não ficar lento
End If
i = i + 1
Next
' Só mostra as penas que usam a consulta atual
For Each pen In E3Chart1.Pens
pen.Visible = (pen.QueryName = current_query.Name)
Next
' Atualiza as consultas
E3Chart1.Queries.UpdateData()
Screen.Item("E3Chart1").HorScaleBegin = Now - 0.001
Screen.Item("E3Chart1").HorScaleEnd = Now
End Sub