Unit Xyfile

copyright © Grahame Grieve refer to xyGraph.pas, xyGraph.hlp for more information

Classes

Functions

AxisInitLogTicks -
incmonth -
Pt - add i months to date xx/m/y
ReadAppFromStream - you might want to disable PrintLineStyle ??
ReadAxsFromStream - remember: the next 2 must come last! don't change the numbers, just put them in before these
ReadDimFromStream -
ReadLegFromStream - TLegendStyle
ReadSerFromStream - TLegendStatus
WriteAppToStream -
WriteAxsToStream -
WriteDimToStream -
WriteLegToStream -
WriteSerToStream -

Types

Constants

chour
cminute1
cminute30
cminute5
LogE

Variables


Functions


procedure AxisInitLogTicks(var FLogTickInfo:TLogTickInfo);


procedure incmonth(var y,m:word; i:word);


function Pt(AX, AY: Integer): TPoint;

add i months to date xx/m/y

procedure ReadAppFromStream(r:TxyReader; App:TAppearance);

you might want to disable PrintLineStyle ??

procedure ReadAxsFromStream(r:TxyReader; axs:TAxis);

remember: the next 2 must come last! don't change the numbers, just put them in before these

procedure ReadDimFromStream(r:TxyReader; Dim:TDimensions);


procedure ReadLegFromStream(r:TxyReader; leg:TLegend);

TLegendStyle

procedure ReadSerFromStream(r:TxyReader; ser:Tseries);

TLegendStatus

procedure WriteAppToStream(w:TxyWriter; App:TAppearance);


procedure WriteAxsToStream(w:TxyWriter; axs:TAxis);


procedure WriteDimToStream(w:TxyWriter; Dim:TDimensions);


procedure WriteLegToStream(w:TxyWriter; leg:TLegend);


procedure WriteSerToStream(w:TxyWriter; ser:Tseries; savedata:boolean);


Types


Constants

chour = (1/24)

cminute1 = 1/(24 * 60)

time constants: Alert users will note that here and elsewhere where date/time values are used, small errors creep in due to assumptions implicit in the way TDateTime works. These have been tolerated in the interests of speed. Month and year are more variable: the only place where the length of these is approximated is for the guestimation of the number of ticks; I will be interested to hear if anybody has problems with this assumption

cminute30 = 30/(24 * 60)

cminute5 = 5/(24 * 60)

LogE = 0.4342944818


Variables