Necesito ayuda con Tchar

[bogdanioanliviu]

Hola

Nececito ayuda con Tchart .
Lo que quiero es que el y tenga valores fijos (a,b,c,d) y x valores tomados de un campo de una tabla .

No lo consigo hacer .
Por favor pasarme alguna ideea , documentacion , codigo , etc .

Gracias.

[Neftali [Germán.Estévez]]

Añade manualmente los valores a la serie.
Primero los 4 valores fijos y luego haz un recorrido por la tabla y añádelos de forma manual.

Código Delphi [-]
  // Limpiar la serie // inicializar
  dbchtPerfil.Series[0].Clear;

  // puntos manuales
  ...

  // Preparar el DataSet
  FormData.cdsPoints.First;
  while not (FormData.cdsPoints.Eof) do begin
    // Dato
    Str := FormData.cdsPointsele.AsString;
    d := StrToFloat(Str);
    // Añadir el punto
    dbchtPerfil.Series[0].Add(d, '');
    // siguiente
    FormData.cdsPoints.Next;
  end;

Donde pone "// puntos manuales" puedes añadir los puntos fijos en la forma en que se añaden los del DataSet.

[bogdanioanliviu]

Algo he entendido
Lo que no he entendido es como añadir manualmente los labels en la parte equierda del tchart.
a -|-
b--|---|
c--|---|-|
x y z

algo asi donde yo asigno a b c xyz a mano y como strings.

[Neftali [Germán.Estévez]]

Ahora no te he entendido.
Antes hablabas de valores y ahora de Labels. ¿De qué se trata?

[bogdanioanliviu]

Empezado por Neftali

Ahora no te he entendido.
Antes hablabas de valores y ahora de Labels. ¿De qué se trata?

de los labels .
Lo que no soy capaz es de poner en el x unos labels string con valores que yo pongo y en el y otros labels con otros valores que yo pongo, a mano o por codigo .
despues de eso puedo construir el grafico .
El final de todo eso es construir un grafico dinamico , que coja parametros de unos combobox edit etc.
Pero no soy capaz de poner los labels de x y y de tipo string a mano .
Ya se que tengo que utilizar series. Pero los labels me matan , me rompo la cabeza con esto de 4 dias.
Gracias por la alluda.

[Neftali [Germán.Estévez]]

Para añadir los Labels a mano para una serie debes configurarlos como tipo texto y luego añadirlos a los labels de la serie:

Código Delphi [-]
  // Con esto defines los label del EXE inferior como de tipo texto
  dbchtPerfil.Axes.Bottom.LabelStyle := talText;
  // Con esto añades 3 Labels al eje
  dbchtPerfil.Series[0].Labels.Labels[0] := 'Hola';
  dbchtPerfil.Series[0].Labels.Labels[j DIV 2] := 'pepito';
  dbchtPerfil.Series[0].Labels.Labels[j - 1] := 'Juanito';

j es el valor de elementos de la serie, por lo tanto añades un Label al principio (j = 0) otro a mitad del eje (j DIV 2) y otro al final en el valor (j-1) qu es el último de la serie.

[bogdanioanliviu]

Empezado por Neftali

Para añadir los Labels a mano para una serie debes configurarlos como tipo texto y luego añadirlos a los labels de la serie:

Código Delphi [-]
  // Con esto defines los label del EXE inferior como de tipo texto
  dbchtPerfil.Axes.Bottom.LabelStyle := talText;
  // Con esto añades 3 Labels al eje
  dbchtPerfil.Series[0].Labels.Labels[0] := 'Hola';
  dbchtPerfil.Series[0].Labels.Labels[j DIV 2] := 'pepito';
  dbchtPerfil.Series[0].Labels.Labels[j - 1] := 'Juanito';

j es el valor de elementos de la serie, por lo tanto añades un Label al principio (j = 0) otro a mitad del eje (j DIV 2) y otro al final en el valor (j-1) qu es el último de la serie.

Bueno hasta aqui bien , no me esta poniendo los labels en el eje de abajo , pero yo los necesito en el de la esquerda.
Series[0].labels.labels[0].... esto yo no lo tengo
lo tengo asi :

Código Delphi [-]
dbchart1.Series[0].Clear;
   dbchart1.Axes.Bottom.LabelStyle:= talText;
   dbchart1.Series[0].xLabel[0]:='ceva';
  dbchart1.Series[0].YValue[0]:=2;