Height

int dy = 0 // Dimensione Grafico
// 
dy := Grafico.Height

// **************************************************************************
// Evento notificato dopo il salvataggio sul database di una riga modificata.
// **************************************************************************
event GraficoEditabile.Edit.AfterUpdate()
{
  // Se l'altezza è minore di zero impostiamo un'altezza fissa
  if Edit.HeightImpostazione = Null Number OR Edit.HeightImpostazione <= ZERO
  {
    Graph.Height := C400
  }
  else  // 
  {
    Graph.Height := Edit.HeightImpostazione
  }
  // 
  // Se la larghezza è minore di zero impostiamo una larghezza fissa
  if Edit.WidthImpostazione = Null Number OR Edit.WidthImpostazione <= ZERO
  {
    Graph.Width := C400
  }
  else  // 
  {
    Graph.Width := Edit.WidthImpostazione
  }
  // 
  // Configurazione Caption e Titolo
  Graph.Title := NullValue(Edit.TitleImpostazione, Grafico)
  Graph.Caption := NullValue(Edit.CaptionImpostazione, Grafico)
  // 
  Graph.Active := Edit.ActiveImpostazione
  // 
  Graph.SetLegendPosition(Edit.LegendPosition)
  // 
  Graph.SetDirection(Edit.DirectionImpostazione)
  // 
  Graph.SetImageFormat(Edit.FormatImpostazione)
  // 
  Graph.SetValuesLabelsVisible(Edit.LabelValori)
  // 
  // Configurazione asse X
  Graph.ShowXAxis := Edit.ShowXAxis
  Graph.XAxisLabel := Edit.LabelXAxisImpostazione
  Graph.ShowXAxisGrid := Edit.ShowXAxisGridImpostazione
  // 
  // Configurazione asse Y
  Graph.ShowYAxis := Edit.ShowYAxis
  Graph.YAxisLabel := Edit.LabelYAxisImpostazione
  Graph.ShowYAxisGrid := Edit.ShowYAxisGridImpostazione
  // 
  // Configurazione del nome della serie
  Graph.SetSerieName(ONE, Edit.NomePrimaSerie)
  // 
  // Se sono variate Height, Width o Caption forzo l'aggiornamento del grafico,
  // per le altre proprietà non è necessario
  if this.OldHeight <> Edit.HeightImpostazione 
  OR this.OldWidth <> Edit.WidthImpostazione    
  OR this.OldCaption <> Edit.CaptionImpostazione
  {
    // 
    Graph.UpdateGraph()
  }
}