Привет! Как вивести по Y время.. а по X дату?
с датой разобрался но не до конца
| Код |
var
l,i : Integer;
Value : array of TValue;
d : Double;
begin
// cht1.Series[0].ValueFormat := 'dd.mm.yyyy';
cht1.Series[0].XValues.DateTime := True;
l := High( TestInfList );
SetLength(Value, l);
for I := 0 to High( TestInfList ) do
with TestInfList[ i ] do
begin
// Value[i].DateTime := UnixToDateTime(Date);
Value[i].DateTime := Now + i;
Value[i].Value := 123 + i;
end;
for i := 0 to Length(Value)-1 do
cht1.Series[0].AddXY(Value[i].DateTime, Value[i].Value);
|
Now- виводет как нада а мой формат 'dd.mm.yyyy' не правильно! |