: Two simple questions regarding MDI.

: 1. Is it possible to set the color of the MDI form to something other than
:  white? If so, how?

I haven't found a way to do this. It may be possible via the API, though.
(You'd probably be changing all windows' color schemes).

: 2. Is it possible to open a child MDI form at a specific location on the
:  MDI form? It seems that each succeeding Load <form> is shown in a cascading
:  arrangement. Any workaround to this?

I've done this by setting the Child's Top and Left properties. They're based
on the container's dimensions, i.e., the top-left corner of the Parent form's
workspace is (0,0) for the Child. This info can be used to center the child
within the Parent or to keep the child displaying in the upper-left corner.
Hope this helps!

: Thanks.

--
==============================================================================
Steve B. Raulerson                       || "The reason why worry kills more
Systems Analyst                          ||  people than work is that more
Cincinnati Bell Information Systems Inc  ||  people worry than work."

==============================================================================

        <Note: I haven't looked at this stuff in quite a while>

        Should we assume you've tried setting the .fillstyle and
.backcolor properties for the MDI form. Are there such properties?

--------
"E=mb^2" - One of Einsteins lesser known blunders....don't drink and derive!

=============================================================================

Room 50                    The Flamingo Hotel                   L\A L\A Land
-----------------------------------------------------------------------------

------------------------------------------------------------------------
Chuck Stuart
Mesquite TX USA
Contract Programmer.
Author of VBTrace, runtime VB Trace/Profile/XRef utility.
------------------------------------------------------------------------

'declare functions for changing system colors
Declare Function GetSysColor Lib "User" (ByVal nIndex%) As Long
Declare Sub SetSysColors Lib "User" (ByVal nChanges%, lpSysColor%, lpColorValues&)
Global SavedColors(18) As Long

' ** Save current system colors.
' perhaps stick this in MDIForm_Load
  For i = 0 To 18
    SavedColors(i) = GetSysColor(i)
  Next i
  ReDim NewColors(18) As Long
  ReDim IndexArray(18) As Integer
  'set mdi background to lime green
  NewColors(0) =  &HFF00& 'lime green
  IndexArray(0) = 12 'COLOR_APPWORKSPACE
  SetSysColors 1, IndexArray(0), NewColors(0)

' ** Restore system colors when you leave app.
' perhaps stick this in your MDIFORM_Unload
  ReDim IndexArray(18) As Integer
  For i = 0 To 18
     IndexArray(i) = i
  Next i
  SetSysColors 19, IndexArray(0), SavedColors(0)

-
"I think therefore I am,
 Well I'm pink, therefore I'm Spam!"
                        - Monty python

Seriously guys, with a little imagination here we can easily
bypass the old 'Henry Ford' colour scheme.

Cheers

Bryan

******************************************************************
* Bell Farm, Sandy Lane  * * A Gentleman is  someone who         *  
* Chippenham, Wiltshire  * * never drinks gin before six         *
* UK, +44, 0380 850261   * * and alway takes his hat off         *
*                        * * before hitting a lady - W Churchill *          
******************************************************************