Problema: Centrar en todo lo ancho un par de textos, es ke se centra pero en referencia al eje x
Y pues hice una grafica pero ahora kiero saber como puedo centrar unos textos ke le agrege de tal manera ke sea la mitad de la imagen, es decir si mi imagen mide 600x500 entonces el texto se debe centrar por ahi de los 200 o algo asi, no se si me explike pero bueno eso es lo ke kiero hacer arriba de mi grafica y debajo de ella
aki tengo la imagen de komo lo tengo
Alguien ke me ayude se lo agredecere y aki una parte del codigo ke muestra de komo lo hice
Código:
Digo chance y estoy haciendo mal uso del control, pero porfavor ke alguien me explike 'Titulo de la grafica Dim sTit As String sTit = sNomArea & vbCrLf sTit += "Avance por área respecto a programación anual" & vbCrLf sTit += "Metas PRDI" & vbCrLf sTit += sPerText & " " & iAno.ToString() Chart1.TitleBox.Label = New dotnetCHARTING.Label(sTit, New Font("Arial", 18), Color.Black) Chart1.TitleBox.Position = TitleBoxPosition.FullWithLegend Chart1.TitleBox.CornerTopLeft = BoxCorner.Round Chart1.TitleBox.CornerTopRight = BoxCorner.Round Chart1.TitleBox.Label.Color = Color.White Chart1.TitleBox.Background.Color = Color.FromArgb(191, 194, 141) 'Chart1.TitleBox.ClearColors() Chart1.Title = sTit 'Chart1.Background = New Background("Img/jajajajaja.jpg") 'Pie de pagina de la grafica Dim lecPie As LegendEntryCollection = New LegendEntryCollection Dim lbPie As LegendBox = New LegendBox Dim lePie As LegendEntry = New LegendEntry lePie.Name = "Metas programadas en " & iAno & ": " & dt.Rows(0)("MetAno") lePie.Name += vbCrLf & "Metas cumplidas hasta " & iAno - 1 & ": " & dt.Rows(0)("MetCumAnt") lePie.Value = "" lePie.LabelStyle.Color = Color.Black lePie.LabelStyle.Font = New Font("Arial", 14) lecPie.Add(lePie) lbPie.ExtraEntries.Add(lecPie) Chart1.ExtraLegendBoxes.Add(lbPie) 'Chart1.ExtraLegendBoxes(0).Orientation = Orientation.Bottom Chart1.ExtraLegendBoxes(0).Position = New Point(150, 400) 'Chart1.ExtraLegendBoxes(0).ClearColors() 'Establecemos los parametros de la iconografia Chart1.LegendBox.Visible = True Chart1.LegendBox.ClearColors() Chart1.LegendBox.Orientation = Orientation.Bottom