Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 13-02-2014
Avatar de salvica
salvica salvica is offline
Miembro
 
Registrado: mar 2004
Ubicación: Albacete (España) ... En un lugar de la Mancha ...
Posts: 304
Poder: 21
salvica Va por buen camino
Question Modificar etiquetas en TChart

Hola a tod@s.
No se si este hilo debe ir aquí o en "Gráficos" (por el componente).

Se trata de los siguiente: Tengo un TChart que lo relleno con 1440 valores minutales (24 horas).
En modo diseño me divide el Grid cada 100 elementos y los señala como 0, 100, 200, ... etc. y necesito que lo divida cada 60 elementos (una hora) y que además los etiquete con la hora correspondiente, comenzando por CERO (0, 1, 2, 3, ..., 23, 24)

He leido que tengo que poner a talText el LabelStyle de los ejes (en este caso BottomAxis y TopAxis, pero me hace una escabechina grisacea .
Código Delphi [-]
{ ajustar los ejes Y a la escala que utilice }
    Chart.LeftAxis.Maximum       := FIN_ESCALA;
    Chart.LeftAxis.Minimum       := INI_ESCALA;
    Chart.RightAxis.Maximum      := FIN_ESCALA;
    Chart.RightAxis.Minimum      := INI_ESCALA;
{ cambiar el estilo de las etiquetas de los ejes X }
    Chart.BottomAxis.LabelStyle  := talText;
    Chart.TopAxis.LabelStyle     := talText;
    Chart.Series[0].Marks.Visible:= False;
{ cambiar el grueso de la pluma }
    (Chart.SeriesList[0] as TLineSeries ).LinePen.Width := 3;
{ re-dibujar el TChart }
    Chart.Repaint;
{ rellenar el TChart con los valores minutales }
    for I:=Low(Array1Minuto) to High(Array1Minuto) do begin
      { calcular la hora y los minutos en cada posición }
        iHora    := I div 60;
        iMinuto  := I mod 60;
        Etiqueta := '';
        if( iMinuto=0 ) then Etiqueta := IntToCadena(iHora, 2);
      { escribir los valores y las etiquetas de la serie }
        Chart.Series[0].Add(ArrayPresion1Minuto[i], Etiqueta, clBlue);
    end;

¿Podeis decirme como se cambian las etiquetas de las escalas en los ejes?

Gracias adelantadas
Salvica
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
TChart y BDE roman Gráficos 3 27-07-2012 21:34:10
Modificar colores de cada barra de un Tchart cargado desde una BD richisaurio Gráficos 6 07-05-2008 17:35:51
Modificar colores de cada barra de un Tchart cargado desde una BD richisaurio Impresión 0 07-05-2008 16:49:57
modificar diagama de barras! (Tchart) creedence Gráficos 3 06-02-2008 16:25:37
Tchart marlulipe Gráficos 2 15-08-2007 01:32:04


La franja horaria es GMT +2. Ahora son las 08:46:06.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi