RE: [DUG]: TChart Set LeftAxis Labels

[Allan Vergara]

Signiture: procedure GetAxisLabel(Sender: TChartAxis;  Series: TChartSeries; ValueIndex: Integer; var LabelText: string);   Use: GetAxisLabel(LeftAxis, HorizBarSeries, 1, 'any old string');   See anything wrong here?   Your passing 'any old string' (which is a const) and catching it as a var.  A big no no!  A better way is to assign the string first to at String Var then pass that to the function. -----Original Message----- From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]On Behalf Of Tracey Maule Sent: Thursday, 10 July 2003 2:08 p.m. To: Multiple recipients of list delphi Subject: [DUG]: TChart Set LeftAxis Labels Hi   I have dynamically created a Chart, with 3 HorizBarSeries which are mbStacked.   What I now need to figure out is how to set the Left Axis labels to display the contents of another field returned by my query for that record.   does anyone know how to do this without affecting the data values?   The closest i have come to success so far is:   procedure GetAxisLabel(Sender: TChartAxis;         Series: TChartSeries; ValueIndex: Integer; var LabelText: string);     begin         if Sender = FChart.LeftAxis then             if ValueIndex < 1 then                 LabelText := ''             else                 LabelText := IBQuery1.FieldByName('system').AsString;     end;       WebActionWhatever; begin stuff GetAxisLabel(LeftAxis, HorizBarSeries, 1,                                            'any old string'); end;   But I keep getting a compile error : constant object cannot be passed as a var parameter.   Anyone here know how to acheive this??   Tracey Software Developer / Web Master Logis [EMAIL PROTECTED] (025) 213-1065