Code: Alles auswählen
<TBUILTINLISTCHARTSOURCE> = {
<TLISTCHARTSOURCE> = {
<TCUSTOMSORTEDCHARTSOURCE> = {
<TCUSTOMCHARTSOURCE> = {
<TBASICCHARTSOURCE> = {
<TCOMPONENT> = {
<TPERSISTENT> = {
<TOBJECT> = {
_vptr$TOBJECT = $b9c278},
FOBSERVERS = $0},
FOWNER = $7ffff5c2a200,
FNAME = 'Builtin',
FTAG = 0,
FCOMPONENTS = $0,
FFREENOTIFIES = $0,
FDESIGNINFO = 0,
FVCLCOMOBJECT = $0,
FCOMPONENTSTATE = [],
FCOMPONENTSTYLE = [CSINHERITABLE],
COMPONENTSTATE = [],
COMPONENTSTYLE = [CSINHERITABLE],
DESIGNINFO = 0,
OWNER = $7ffff5c2a200,
VCLCOMOBJECT = $0,
NAME = 'Builtin',
TAG = 0},
FBROADCASTER = $7ffff7fb1200,
FUPDATECOUNT = 0,
BROADCASTER = $7ffff7fb1200},
FERRORBARDATA = {
0x7ffff7fbc3c0,
0x7ffff7fbc420},
FBASICEXTENT = {
A = {
X = inf,
Y = inf},
B = {
X = -inf,
Y = -inf},
COORDS = {
inf,
inf,
-inf,
-inf}},
FBASICEXTENTISVALID = true,
FCUMULATIVEEXTENT = {
A = {
X = inf,
Y = inf},
B = {
X = -inf,
Y = -inf},
COORDS = {
inf,
inf,
-inf,
-inf}},
FCUMULATIVEEXTENTISVALID = true,
FXLISTEXTENT = {
A = {
X = inf,
Y = inf},
B = {
X = -inf,
Y = -inf},
COORDS = {
inf,
inf,
-inf,
-inf}},
FXLISTEXTENTISVALID = true,
FYLISTEXTENT = {
A = {
X = inf,
Y = inf},
B = {
X = -inf,
Y = -inf},
COORDS = {
inf,
inf,
-inf,
-inf}},
FYLISTEXTENTISVALID = true,
FVALUESTOTAL = 0,
FVALUESTOTALISVALID = true,
FSORTBY = SBX,
FSORTDIR = SDASCENDING,
FSORTINDEX = 0,
FXCOUNT = 1,
FYCOUNT = 1,
SORTBY = SBX,
SORTDIR = SDASCENDING,
SORTINDEX = 0,
XCOUNT = 1,
YCOUNT = 1},
FUSESORTEDAUTODETECTION = true,
FONCOMPARE = {
Proc = {
function (POINTER,
POINTER,
POINTER) : LONGINT} 0x7ffff61da1c0,
Self = $0},
FDATA = $7ffff7fb3aa0,
FSORTED = false,
FSORTEDAUTODETECTED = true,
ONCOMPARE = {
Proc = {
function (POINTER,
POINTER,
POINTER) : LONGINT} 0x7ffff61da1c0,
Self = $0},
SORTED = false,
USESORTEDAUTODETECTION = true},
FDATAPOINTS = $7ffff61c4040,
DATAPOINTS = $7ffff61c4040},
FXCOUNTMIN = 0,
FYCOUNTMIN = 1}
Diese Adresse taucht dann auch wieder als Owner in function TChartSeries.GetSource: TCustomChartSource; auf.
Wie gesagt, da läuft es ohne Probleme durch. Ich schaue jetzt mal auf dem anderen Rechner nach, aber ich denke, da ist es auch so. Es war auch so, dass der erste Durchlauf mit den gleichen Adressen daherkam und funktioniert hat. Erst dann der zweite Durchlauf brachte den Absturz. Gruß HE