TeeChart SeriesCount
Hi,
I?m using Valdir?s code and, when trying to acess the SeriesCount property
(that I defined with the code that follows), I?m getting an Acess Violation.
I can?t find a reason.
The weird thing is that when SeriesCount <> 0 I get the AV, and when
SeriesCount = 0 it?s ok.
Thanx
Filipe Bortolini
TPlanDBChartRTTI = class(TraTppCustomTeeChartRTTI)
class function TPlanDBChartRTTI.GetPropRec(aClass: TClass; const aPropName:
string; var aPropRec: TraPropRec): Boolean;
begin
Result := True;
if ppEqual(aPropName, 'SeriesCount') then
PropToRec(aPropName, daInteger, True, aPropRec)
else
Result := inherited GetPropRec(aClass, aPropName, aPropRec);
end; { class function, GetPropRec }
class function TPlanDBChartRTTI.GetPropValue(aObject: TObject; const
aPropName: string; var aValue): Boolean;
begin
Result := True;
if ppEqual(aPropName, 'SeriesCount') then
longInt(aValue) := TCustomChart(aObject).SeriesCount
else
Result := inherited GetPropValue(aObject, aPropName, aValue);
end; { class function, GetPropValue }
class function TPlanDBChartRTTI.RefClass: TClass;
begin
Result := TppDPTeeChart;
end; { class function RefClass() }
--
Filipe Bortolini
Planejar Brasil
----- Original Message -----
From: "Valdir Stiebe Junior"
Newsgroups: digital-metaphors.public.reportbuilder.general
Sent: Friday, September 06, 2002 11:43 AM
Subject: Creating runtime chartSeries
(it
I?m using Valdir?s code and, when trying to acess the SeriesCount property
(that I defined with the code that follows), I?m getting an Acess Violation.
I can?t find a reason.
The weird thing is that when SeriesCount <> 0 I get the AV, and when
SeriesCount = 0 it?s ok.
Thanx
Filipe Bortolini
TPlanDBChartRTTI = class(TraTppCustomTeeChartRTTI)
class function TPlanDBChartRTTI.GetPropRec(aClass: TClass; const aPropName:
string; var aPropRec: TraPropRec): Boolean;
begin
Result := True;
if ppEqual(aPropName, 'SeriesCount') then
PropToRec(aPropName, daInteger, True, aPropRec)
else
Result := inherited GetPropRec(aClass, aPropName, aPropRec);
end; { class function, GetPropRec }
class function TPlanDBChartRTTI.GetPropValue(aObject: TObject; const
aPropName: string; var aValue): Boolean;
begin
Result := True;
if ppEqual(aPropName, 'SeriesCount') then
longInt(aValue) := TCustomChart(aObject).SeriesCount
else
Result := inherited GetPropValue(aObject, aPropName, aValue);
end; { class function, GetPropValue }
class function TPlanDBChartRTTI.RefClass: TClass;
begin
Result := TppDPTeeChart;
end; { class function RefClass() }
--
Filipe Bortolini
Planejar Brasil
----- Original Message -----
From: "Valdir Stiebe Junior"
Newsgroups: digital-metaphors.public.reportbuilder.general
Sent: Friday, September 06, 2002 11:43 AM
Subject: Creating runtime chartSeries
(it
This discussion has been closed.
Comments
Hi !
I change-over some bmp in .res-files. It was successfully. But where is
bmp-resource for ToolButton 'AutoSearch' (in window Report Preview) .In
other places I replace it successfully. In earlier versions it was in
ppPrvDlg.dfm/pas. Where is it now (in 6.03) ?
Thanks.
Valery Vilisov
sci@comail.ru
After correct some dfm/pas of RBuilder 6.03 I recompil all packeges and
reinstall theirs in D5 IDE. But my Applications (with raIDE packege) dont
compiles with massage 'Unit raClcDlg was compiled with a different version
of ppDesgner.TppDesignerWindow'. Without raIDE compile OK, but without Tab
'Calculate' - this is not interestin for me ... What I can do for normal
compilat my Applications with RAP and with my some corrects dfm/pas in
RBuilder 6.03 ?
Best regards
Valery Vilisov
sci@comail.ru
RAP dcus. If you change any forms you won't be able to use the RAP dcus
either. What you should do is to register your own forms. All TppForm
descendents in RB are replaceable. The designer is not a form which can be
replaced.
Cheers,
Jim Bennett
Digital Metaphors
http://www.digital-metaphors.com
info@digital-metaphors.com