System Variable

rbuser

Greetings,

With D2005 and RB 9.01 I can put a system variable in the footer (in the
report designer) and it by default displays the date. However if I change
the VarType property I get an error and the variable continues to display
the date. In the report preview it displays the correct VarType (page, time
etc.). It also prints correctly from a printer. Is this a bug or do I have
another problem?

Thanks,
Tommy Dillard

nicocizik

Hi Tommy,

We have heard about this issue from a few of our other customers however we
have yet to reproduce it here on our machines. Please give my your complete
system and setup information along with any other information you can think
of that might help me recreate this behavior on my machine.

--
Regards,

Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com

rbuser

Thanks Nico,

I use RB 9.01 with Delphi 7 and the system variable works as expected. It
only happens with RB 9.01 and Delphi 2005. At any rate my system is as
follows:

HP Notebook zd7000
17 Inch Screen (1440 x 900)
80 GB Hard Drive
3.2 Ghz processor (Intel)
1 GB RAM
128 MB Video Ram (nVidia)
Win XP Professional (SP2)
Delphi Studio Enterprise (Update 1)
Docked Delphi Designer with Embedded Form Designer
RB 9.01
Member of Admin Group

I have two custom RB components that I have written and use extensively. In
the past, with Delphi 7, I have had no problems or errors with my
components. Since updating to RB 9.01 and converting them to work with it
there have been some consistent errors that occur. In Delphi 7 and Delphi
2005 if I compile the Design Time Package, with my component installed, and
then open up a project that uses RB and open up the RB designer and then
right click on my component to bring up the popup menu I get an access
violation. I have to close Delphi and restart. When I do so I can open up
the project, the RB designer and right click on my component and all works
OK.

Any time I use Delphi 7 and close it I get an error in rtl70.bpl. I can use
and close Delphi 2005 without any errors. This happens, of course, when my
custom RB components are installed. It appears to be tied to the popup menu.
I have looked at the source files and I believe that my implementation of
the popup menu is correct.

What I should do and haven't done is uninstall my components and then check
to see if the errors go away, including the one with the ppSystemVariable. I
will do so and report back. If there is anything else that you would like to
know please advise.

Regards,
Tommy Dillard

rbuser

Greetings,

In Delphi 7 with my custom RB components unloaded I get no error on exit.
With them loaded (d7) sometimes I get an error but not always. This is what
is shown in the error message:

"Access violation at address 40005CE0 in module 'rtl70.bpl.' Read address of
05FE8D54."

In Delphi 2005 (with my custom RB components unloaded) below is the
following error I receive when I try to set the system variable to another
VarType:

"Access violation at address 40005C4B in module 'rtl90.bpl.' Read address of
89B0E987."

In the same error box this is what shows:

[40005C4B]{rtl90.bpl } System.TObject.ClassInfo (Line 8916, "system.pas" +
0) + $3
[40005F5B]{rtl90.bpl } System.@HandleAnyException (Line 9625, "system.pas"
+ 13) + $0
[7C903786]{ntdll.dll } RtlConvertUlongToLargeInteger + $41
[7C90EAF5]{ntdll.dll } KiUserExceptionDispatcher + $9
[10108379]{rbRCL99.bpl } Pprtti.TraRTTI.IsValidPropName + $1D
[102F8862]{rbIDE99.bpl } Ppundo.TppUndoableClassFactory.CreateInstance + $BE
[102F9139]{rbIDE99.bpl } Ppundo.TppUndoManager.BeginOperation + $3D
[102F90CE]{rbIDE99.bpl } Ppundo.TppUndoManager.AddOperation + $2A
[1030B5E5]{rbIDE99.bpl } Ppdsgner.TppDesignerWindow.iBeforePropertyChange +
$39
[1010A7DD]{rbRCL99.bpl } Ppcomm.TppCommunicator.BeforePropertyChange + $41
[10137B9D]{rbRCL99.bpl } Ppprnabl.TppPrintable.SetCaption + $59
[101737C1]{rbRCL99.bpl } Ppctrls.TppCustomText.SetCaption + $25
[101821F2]{rbRCL99.bpl } Ppvar.TppSystemVariable.SetVarType + $7E
[40027526]{rtl90.bpl } TypInfo.SetOrdProp (Line 1322, "TypInfo.pas" + 31)
+ $0
[0033BA66]{designide90.bpl} DesignEditors.TEnumProperty.SetValue (Line 1332,
"DesignEditors.pas" + 5) + $6
[00A3D5F0]{vclide90.bpl} IDEInspListBox.TInspListBox.SetPropValue (Line
1144, "ideinsplistbox.pas" + 40) + $24
[00A3EBC0]{vclide90.bpl} IDEInspListBox.TInspListBox.ListAccept (Line 1635,
"ideinsplistbox.pas" + 6) + $7
[00A36F82]{vclide90.bpl} IDEListBtns.TListButton.CloseUp (Line 752,
"IDEListBtns.pas" + 14) + $12
[0053CDAE]{vcl90.bpl } Controls.TWinControl.WndProc (Line 6673,
"Controls.pas" + 51) + $4
[4003EEE0]{rtl90.bpl } Classes.StdWndProc (Line 11457, "classes.pas" + 8)
+ $0
[77D48706]{user32.dll } GetDC + $6F
[77D487E6]{user32.dll } GetDC + $14F
[77D489A0]{user32.dll } GetWindowLongW + $122
[77D489E3]{user32.dll } DispatchMessageW + $A

Thanks for your consideration.

Regards,
Tommy Dillard

nicocizik

Hi Tommy,

Thanks for the information. I found that the reason I was unable to
recreate the behavior you were seeing was that I was using our latest source
to test. This issue was fixed inadvertently, however we were unable to
create a patch and still keep it interface compatible. This issue will be
fixed in the next maintenance release.

--
Regards,

Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com