Forum: Datenbanken
Delphi
by marabu,
13. Dez 2006
Hallo Holger,
procedure TDemoForm.ChartGetAxisLabel(Sender: TChartAxis;
Series: TChartSeries; ValueIndex: Integer; var LabelText: String);
var
iMonth: Integer;
begin
if TryStrToInt(LabelText, iMonth)
and (iMonth in )
Forum: Datenbanken
Delphi
by marabu,
13. Dez 2006
Das hier funktioniert bei mir:
procedure TDemoForm.ChartGetAxisLabel(Sender: TChartAxis;
Series: TChartSeries; ValueIndex: Integer; var LabelText: String);
begin
if (ValueIndex in ) and (Sender = Sender.ParentChart.BottomAxis) then
LabelText := ShortMonthNames)];
end;
Forum: Datenbanken
Delphi
by marabu,
13. Dez 2006
Sorry für den Dreher. Wenn deine Monatswerte alle im Ergebnis vorkommen, dann geht es auch einfacher:
LabelText := ShortMonthNames;
Gruß
Forum: Datenbanken
Delphi
by marabu,
13. Dez 2006
Eigentlich müsste doch das hier genügen:
procedure TDemoForm.ChartGetAxisLabel(Sender: TChartAxis;
Series: TChartSeries; ValueIndex: Integer; var LabelText: String);
begin
LabelText := ShortMonthNames)];
end;
Freundliche Grüße