How to embed dialog onto another dialog

I'm facing a problem to embed dialog into another dialog.
Reason to do is i have a bunch of dialog to show but i don't want user to see it as dialog.

I have created a Main dialogbox and want to embed the dialog into this main dialog.
Can someone tell me how?

I have search the internet. Actually if i able to set the "screentoclient()" i think the problem should able to solve.
But when i search the "screentoclient", the solution that i found was use to capture the mouse position.
I want the set the screen to client screen.
How can i do it?

Hope someone can help me.
Thanks.

I can't really tell what you are asking. What do you mean by embded a dialog in a dialog? You can show another dialog box from your dialog box, you can change the dialog within the dialog box you can not physically embed another dialog form within a dialog form and even if you could I can see no use for such a thing.

Yes, you have to be more specific and detailed to explain what you want.
What is the dialogbox you have created? Is it a Form? You can create another dialog at any time form the first form, like it was embedded. If the second dialog is a form too, you would show it like
formDialog2.Show vbModal, Me (showing it from Form1 for instance, where the Me makes the form from where you show the dialog the owner form.

Dear DataMiser and WoF,

Sorry that i did not explain my problem clearly.
Attached is the structure of what i'm try to do.
Hope that with my drawing, it able to express what i'm try to say.

I know that there are few steps needed.
That is to get the "screentoclient" and move the dialog to the CRect position.

I not able to "screentoclient" my form so i not able to proceed with my project.
Hope you guys can help.
Thanks.

You still have not told us what you are doing. The only way you can put a form inside a form is if the parent is a MDI Parent form and the one you want to put inside is a MID Child but then you can not use a MDI child as a modal dialog form.

You can show a form on top of a form and center it over the form which calls it. If you also set it modal then it will stay on top of the other form until the modal condition is released. You can also use frames on your form instead of forms and toggle the visible property of each form as needed which is the closest thing you will find to a form in a form.

All of that said you have not even told us if you are working on a pc app or a web based app and you have shown no code. And your "screentoclient" really has no meaning you'll have to better define what you are doing and/or what you are trying to do before we could be of much help to you.

Dear DataMiser,

I developing a dialog base application.
one Main dialog and few child dialog.
I'm not creating a MDI application.

Code:

---

Private Sub Form_Load()
    frmInfo.Show vbModaless, Me
 
    Call MoveWindow(frmInfo.hwnd, Frame1.Left, Frame1.Top, frmInfo.Width, frmInfo.Height, False)
       
End Sub

---

i'm tyring to put a frameless dialog to show on top of my main dialog.
The problem is the frmInfo cannot show at the position that i want.
thanks

What position are you trying to attain?
What result are you getting?

Edit to add:
If you are simply trying to position the top left corner of the new form over the top left corner of the frame on your existing form then you could do it easy with a little math.
No need to call the move window function though that would work with the right parameters. You can use the form properties to get what you want.

Code:

---

Form2.Show
Form2.Top = Frame1.Top + Form1.Top + Form1.Height - Form1.ScaleHeight
Form2.Left = Frame1.Left + Form1.Left + Form1.Width - Form1.ScaleWidth

---

If you want the form centered in the frame then you need a little more math in there but that will set the top left

keep in mind that if you are showing this non modal that the user will be able to click on the initial form and your form will dissappear behind it. In general not a good idea for dialogs.

Dear DataMiser,

I have try the calculation but the form2 position is follow the monitor screen coordinate.
Is not following the Form1 coordinate.

Thanks

yes. i know about it that is why i try to embed the dialog at the Form1.
I know in VC++, we can do like this but i don't know how to do in VB.
Thanks

Dear DataMiser,

the calculation work. Thanks.
but there another problem. when i drag the from1 dialog, the form2 dialog will not move together.

Of course not, they are not joined together. You would have to write code that moves it if that is what you want to do. I still do not understand what you are doing though. Seems to me that using frames on Form1 which toggle on/off would be better suited for dialogs. Or even just one form with or without any frames which is coded to display different messages and if needed buttons do different actions depending on which dialog is shown.

Trying to make a form over a form and trying to make them move together as one doesn't make a lot of sense especially so if the smaller form is non modal as the moment you try to move the form behind would make the smaller form dissappear behind it and no longer have access to it. I can see a user doing this by accident very easy and often.

Seems like a very poor design to me, perhaps you should rethink this approach.

That's right and good arguments they are.

Nevertheless, to move the forms together with the main form you simply have to put the positioning code into the Form_Resise() event of Form1.
And to make the subform stay on top of Form1 you'd have to make use of the SetWindowPos() API.

Unfortunately if you use that set window API then the form stays on top not only of your app but all other apps as well. I would be uninstalling the software right away :)

Well, the SetWindowPos() API allows the passing of a hWnd on top of which the secondary form should be placed.
Using the HWND_TOPMOST constant will put it on top af all other windows.
Passing the Form.hWnd instead will put it on top of that one, only.

Interesting, I did not know that.

Put a picturebox on form 1, then in the load event of form1, put this code :

Code:

---

Option Explicit
Private Declare Function SetParent Lib "user32" (ByVal hWndChild As Long, ByVal hWndNewParent As Long) As Long

Private Sub Form_Load()
    Dim frmForm As Form2

    Set frmForm = New Form2
    SetParent frmForm.hwnd, Picture1.hwnd
    frmForm.Show

End Sub

---

Just remember. You'll have to Unload all forms properly, ie:

Code:

---

Private Sub Form_Unload(Cancel As Integer)
Static bUnloading As Boolean

Dim intI As Integer

    If bUnloading Then Exit Sub

    bUnloading = True
    For intI = Forms.Count - 1 To 0 Step -1
        Unload Forms(intI)
    Next intI
End Sub

---

Else you will find that form 2 will still be in memory

I hope this helps :)

This will show Form2 inside the picturebox on Form1

That's a really good one, Hannes.
I played with this and found you could also use Form2 directly without creating a new instance of it.

Code:

---

  SetParent Form2.hWnd, Picture1.hWnd

---

and we could also omit the picturebox and cling Form2 directly to Form1:

Code:

---

SetParent Form2.hwnd, Form1.hwnd

---

And a last hint for the op to implement this:
After the Form2.Show (or frmForm.Show) do a Form2.Move 0, 0 or give it a distinct position within the new parent.
When I tried this first I wondered why the Form2 did not show, when I came upon the fact that the initial .Top and .Left of the form put it out of the visible range.

@DataMiser: In the SetWindowPos description it says
· parameter hWndInsertAfter
Identifies the window to precede the positioned window in the Z order. This parameter must be a window handle or one of the following values:
HWND_BOTTOM, HWND_NOTOPMOST, HWND_TOP, HWND_TOPMOST
which are -4, -3, -2 and -1 respectively