Strange problem, just started happening
Just started seeing this problem all of the sudden. Never happened before,
haven't upgraded RB, just all of the sudden started happening. Haven't
changed the code or anything. Works on both of my other programmers machines
w/ same setup & code & version. Any help would be appreciated.
When my user hits button to go 'my report expoloer' contained in a panel on
a form....
begin
if not Assigned(ppExplorer.Form) then
ppExplorer.Execute;
nbReports.ActivePage := 'pgReportExplorer';
end;
Then of course I have
procedure TfrmReportExplorer.Initialize;
begin
LoadFromIniFile;
if frmMain.ActiveMDIChild = frmReports then begin
Parent := frmReports.pnlReportExplorer;
Align := alClient;
end;
UpdateTreeView;
SelectFolder(FListView.FolderId);
end; {procedure, Initialize}
and....
initialization
ppRegisterForm(TppCustomReportExplorer, TfrmReportExplorer);
finalization
ppUnRegisterForm(TppCustomReportExplorer);
but....when I hit the button that calls the code at the top, I get a for
that I cannot close, it is a 'New Report' dialog screen, full screen...it
can be minimized, but then it stops my program because it is shown modally
and cannot be closed.
Any suggestions...this same code seems to work on all of our other
development machines w/ the same version of RB v. 6.03, D5. Just not working
on mine. I've even followed procedures for removing a corrupt install and
re-installed RB6.
Anything would be helpful
Thanks,
Stacey
haven't upgraded RB, just all of the sudden started happening. Haven't
changed the code or anything. Works on both of my other programmers machines
w/ same setup & code & version. Any help would be appreciated.
When my user hits button to go 'my report expoloer' contained in a panel on
a form....
begin
if not Assigned(ppExplorer.Form) then
ppExplorer.Execute;
nbReports.ActivePage := 'pgReportExplorer';
end;
Then of course I have
procedure TfrmReportExplorer.Initialize;
begin
LoadFromIniFile;
if frmMain.ActiveMDIChild = frmReports then begin
Parent := frmReports.pnlReportExplorer;
Align := alClient;
end;
UpdateTreeView;
SelectFolder(FListView.FolderId);
end; {procedure, Initialize}
and....
initialization
ppRegisterForm(TppCustomReportExplorer, TfrmReportExplorer);
finalization
ppUnRegisterForm(TppCustomReportExplorer);
but....when I hit the button that calls the code at the top, I get a for
that I cannot close, it is a 'New Report' dialog screen, full screen...it
can be minimized, but then it stops my program because it is shown modally
and cannot be closed.
Any suggestions...this same code seems to work on all of our other
development machines w/ the same version of RB v. 6.03, D5. Just not working
on mine. I've even followed procedures for removing a corrupt install and
re-installed RB6.
Anything would be helpful
Thanks,
Stacey
This discussion has been closed.
Comments
tip:
http://www.digital-metaphors.com/tips/ReportExplorerAsMDIChild.zip
Both are working fine in tests here.
Cheers,
Jim Bennett
Digital Metaphors
http://www.digital-metaphors.com
info@digital-metaphors.com
rbuilder.ini file...as follows
sorry for long post :
[Designer Position]
WindowState=2
Left=-4
Top=-4
Width=1032
Height=776
[StandardComponents]
Rev=2
Visible=1
DockedTo=dckDesignTop
DockRow=0
DockPos=0
FloatLeft=0
FloatTop=0
FloatRightX=0
[DataComponents]
Rev=2
Visible=1
DockedTo=dckDesignTop
DockRow=0
DockPos=272
FloatLeft=0
FloatTop=0
FloatRightX=0
[AdvancedComponents]
Rev=2
Visible=1
DockedTo=dckDesignTop
DockRow=0
DockPos=446
FloatLeft=0
FloatTop=0
FloatRightX=0
[ReportOutline]
Rev=2
Visible=0
DockedTo=+
DockRow=2
DockPos=0
FloatLeft=3
FloatTop=107
ClientWidth=172
ClientHeight=281
TitleBarVisible=1
[DataTree]
Rev=2
Visible=0
DockedTo=+
DockRow=2
DockPos=0
FloatLeft=3
FloatTop=107
ClientWidth=172
ClientHeight=281
On my machine...even if I delete the rbuilder.ini...I get the following ini
file everytime...this is using the same exact exe on each macine.
Notice right at the top...ShowData and all the additional stuff at the
bottow. What would cause this? This must definitely be the problem, but why
is the ini file being created differently only on this machine?
[Designer Preferences]
ShowData=1
[Designer Position]
WindowState=2
Left=-4
Top=-4
Width=1032
Height=776
[StandardComponents]
Rev=2
Visible=1
DockedTo=dckDesignTop
DockRow=0
DockPos=0
FloatLeft=0
FloatTop=0
FloatRightX=0
[DataComponents]
Rev=2
Visible=1
DockedTo=dckDesignTop
DockRow=0
DockPos=272
FloatLeft=0
FloatTop=0
FloatRightX=0
[AdvancedComponents]
Rev=2
Visible=1
DockedTo=dckDesignTop
DockRow=0
DockPos=446
FloatLeft=0
FloatTop=0
FloatRightX=0
[ReportOutline]
Rev=2
Visible=0
DockedTo=+
DockRow=2
DockPos=0
FloatLeft=3
FloatTop=107
ClientWidth=172
ClientHeight=281
TitleBarVisible=1
[DataTree]
Rev=2
Visible=0
DockedTo=+
DockRow=2
DockPos=0
FloatLeft=3
FloatTop=107
ClientWidth=172
ClientHeight=281
[Standard]
Rev=2
Visible=0
DockedTo=dckDesignTop
DockRow=2
DockPos=0
FloatLeft=0
FloatTop=0
FloatRightX=0
[Format]
Rev=2
Visible=1
DockedTo=dckDesignTop
DockRow=1
DockPos=213
FloatLeft=0
FloatTop=0
FloatRightX=0
FontColor=-2147483640
FontIsClear=0
HighlightColor=16777215
HighlightIsClear=1
[Edit]
Rev=2
Visible=1
DockedTo=dckDesignTop
DockRow=1
DockPos=0
FloatLeft=0
FloatTop=0
FloatRightX=0
[Draw]
Rev=2
Visible=0
DockedTo=dckDesignTop
DockRow=2
DockPos=0
FloatLeft=0
FloatTop=0
FloatRightX=0
LineColor=-2147483640
LineIsClear=0
FillColor=16777215
FillIsClear=1
[Align]
Rev=2
Visible=0
DockedTo=dckDesignTop
DockRow=2
DockPos=0
FloatLeft=0
FloatTop=0
FloatRightX=0
[Size]
Rev=2
Visible=0
DockedTo=dckDesignTop
DockRow=2
DockPos=0
FloatLeft=0
FloatTop=0
FloatRightX=0
[Nudge]
Rev=2
Visible=0
DockedTo=dckDesignTop
DockRow=2
DockPos=0
FloatLeft=0
FloatTop=0
FloatRightX=0
[AutoLayout]
LabelFontName=Arial
LabelFontSize=12
LabelFontColor=-2147483640
LabelFontCharset=1
LabelFontBold=0
LabelFontItalic=0
LabelFontUnderline=0
LabelFontStrikeOut=0
FieldFontName=Arial
FieldFontSize=12
FieldFontColor=-2147483640
FieldFontCharset=1
FieldFontBold=0
FieldFontItalic=0
FieldFontUnderline=0
FieldFontStrikeOut=0
LayoutType=0
CreateLabels=1
CreateFields=1
LabelGrid=0
FieldGrid=0
[Explorer Form Position]
WindowState=0
Left=2
Top=2
Width=746
Height=446
[Explorer Form State]
ViewList=1
ViewToolbar=1
ViewStatusBar=1
SortMode=1
ListViewColumn1Width=250
ListViewColumn2Width=120
ListViewColumn3Width=100
ListViewColumn4Width=140
Selected Folder=0
Selected Item=
[Grid Options]
SnapToGrid=0
DisplayGrid=0
XGridSpace=8
YGridSpace=8
[Last Reports Accessed]
Max=5
state of the forms that you have configured when you compiled your
application. The ShowData means that the data will show in the data aware
controls in the runtime designer in the design tab. Make sure that all
RBuilder.ini files are deleted when you install the application on the
problematic machine. Can you reproduce the problem in our MDIReportExplorer
demo and send it to support@digital-metaphors.com?
Cheers,
Jim Bennett
Digital Metaphors
http://www.digital-metaphors.com
info@digital-metaphors.com
I cannot replicate this in your demo. Strange thing is, I can only replicate
it in my app, on my machine. I can take the exact code and compile on
another machine and it works fine, I can compile on my machine and use the
exe on another machine and it works fine. I can take the exe compiled on
another machine and it will work incorrectly on my machine. Can't figure it
out! It's like there is something in my registry that is only screwing up my
app on my machine, but we store the settings in rbuilder.ini. I've searched
my registry for rbuilder...nothing out of the ordinary.
Anything else you can think of?
child form, I load my own report explorer into a panel on a tab sheet. That
has worked for years now. All of the sudden, when I press that button, a
blank report comes up, modal, full screen...I can minimize it, but I can't
close it. The explorer comes up just fine, I can see it in the panel when I
minimize the report screen. Other than that, I have to reset the program in
Delphi to get out of it.
That's it.
assigned to the explorer comes up, maximized & modal, without me requesting
to edit or create a report.
OnCreate...it never seemed to matter before, but all of the sudden, it
started causing a problem...I moved it to OnShow and all is well. Still
strange that it only happens on my machine whether in the ide or not?
ppDesigner.WindowState := wsMaximized;