Discussion :

[Delphi-ne]

Je suis en train de réaliser sous VB2008 un logiciel d'espace de travail. Les écrans appelés par cet espace de travail sont situés dans des DLL.
Jusque là pas de problème.

Par contre j'ai besoin pour des questions de compatibilité ascendante de lancer aussi des EXE créés par VB6 et je veux que l'EXE soit lié à un des Frame de mon espace de travail.

Sous VB6 j'écrivais le code suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Private Sub BUR_Lien(PC_Ecran As String)
Dim HW As Long
Dim hWnd As Long
Dim LC_FenetreEnfant As String
 
    LC_FenetreEnfant = "Nom.exe"
    HW = Shell(App.Path + "\" & PC_Ecran & " " & LC_FenetreEnfant, , vbMinimizedNoFocus)
 
    hWnd = FindWindow(vbNullString, "SousEcran1")
    Call SetParent(fr_Application.hWnd, hWnd)
 End Sub

Par contre je déclare bien mes API mais je n'arrive pas à le faire sous VB2008.

[Delphi-ne]

Je reformule ma question
Si on lance un EXE via Shell comment peut on le rattacher à un Frame de l'application appelante sous VB 2008 ?