Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Coloboración Paypal con ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 25-01-2018
farute farute is offline
Miembro
 
Registrado: feb 2010
Posts: 84
Poder: 15
farute Va por buen camino
Cargar datos separados por comas en un Tchart

Pues eso, como podría hacer para cargar por ejemplo esta fuente de datos en un Tchart
que en la X me salga el primer campo Time y en la Y el segundo campo TemperatureC
https://www.wunderground.com/weather...n=day&format=1


muchas gracias
Responder Con Cita
  #2  
Antiguo 26-01-2018
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

Por lo que entiendo deseas que aparezca la fecha/hora sobre el eje de las absisas y la temperatura en el eje de las ordenadas. Si es así, podes hacer:
Código Delphi [-]
...
implementation

procedure TForm1.FormCreate(Sender: TObject);
var
  stFile, stComa : TStrings;
  aux : Char;
  i : Integer;
begin
  Chart1.BottomAxis.LabelsAngle := 90; // vertical;
  stFile := TStringList.Create;
  aux    := DecimalSeparator;
  DecimalSeparator := '.';
  try
    stFile.LoadFromFile('WUNDERGROUND.TXT'); //(Archivo copia fiel de los datos de tu enlace)
    for i := 1 to stFile.Count - 1 do
    begin
      stComa := TStringList.Create;
      try
        ExtractStrings([','], [], PChar(stFile[i]), stComa);
        Chart1.Series[0].Add(StrToFloatDef(stComa[1],0), stComa[0]);
      finally
        stComa.Free;
      end;
    end;
  finally
    stFile.Free;
    DecimalSeparator := aux;
  end;
end;
...

Salida:


Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 26-01-2018 a las 00:27:00.
Responder Con Cita
  #3  
Antiguo 26-01-2018
farute farute is offline
Miembro
 
Registrado: feb 2010
Posts: 84
Poder: 15
farute Va por buen camino
Muchas gracias, funciona perfecto.

por cierto lo de decimalseparator he quitado esas líneas porque en los ultimos delphis no lo reconoce,
como se pone para que vaya?
Responder Con Cita
  #4  
Antiguo 26-01-2018
farute farute is offline
Miembro
 
Registrado: feb 2010
Posts: 84
Poder: 15
farute Va por buen camino
ahora me surge otro problema si yo copio el texto que sale aquí en un fichero de texto lo pilla sin problemas
https://www.wunderground.com/weather...n=day&format=1

pero si yo descargo ese fichero con IdHTTP

con

Código Delphi [-]
uses IdHTTP;

var S: string;
begin
  IdHTTP: TIdHTTP;

  IdHTTP := TIdHTTP.Create(nil);
  try
     S :=  IdHTTP.Get('https://espanol.wunderground.com/weatherstation/WXDailyHistory.asp?ID=IVILLAQU3&day=25&month=1&year=2018&graphspan=day&format=1');
  finally
    IdHTTP.Free;
  end;
end;

el fichero resultante me sale con saltos de linea y <br> y no lo pilla
Responder Con Cita
  #5  
Antiguo 26-01-2018
farute farute is offline
Miembro
 
Registrado: feb 2010
Posts: 84
Poder: 15
farute Va por buen camino
vale con esto ya he consegido quitar los saltos de linea
Código PHP:
s:= s.Replace(#10+'<br>',''); 
Responder Con Cita
Respuesta



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
Leer un fichero csv con campos separados por puntos y comas. pablo73 Varios 5 19-03-2020 10:47:51
Problema para representar datos en tchart soymoe Varios 4 07-08-2014 22:46:07
Formas y Codigo separados luchin001 Varios 2 19-11-2008 20:13:38
Crear base de datos y cargar datos desde delphi Albano MySQL 4 17-05-2007 21:01:18
Importar datos a access desde un archivo delimitado por comas luis juarez Conexión con bases de datos 1 10-05-2006 23:46:13


La franja horaria es GMT +2. Ahora son las 01:27:17.


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