SUB CreateDialog_frmWelcome(BYVAL hParent&)
    LOCAL Style&, ExStyle&, AddX&, AddY&
    LOCAL hDlg AS DWORD
    LOCAL nHeight AS LONG
    LOCAL nWidth AS LONG 'Variablen für die größe des RightCorner Images
 
    Style& = %DS_MODALFRAME OR %WS_CAPTION OR %DS_CENTER OR %WS_SYSMENU
    ExStyle& = 0
 
    'DIALOG FONT "Tahoma",8
    DIALOG NEW hParent&, "Setup", , ,420,275, Style&, ExStyle&, TO hfrmWelcome&
 
    nHeight = VAL(ExtractTextFromExecutable(ReturnPath(),"RightCornerHeight"))
    nWidth = VAL(ExtractTextFromExecutable(ReturnPath(),"RightCornerWidth"))
 
    CONTROL ADD _
      "syslistview32",hfrmWelcome&,%FRMWELCOME_BACKGROUND,"",0,0,530,360, _
      %WS_CHILD OR %WS_VISIBLE 'ListView erzeugen
    CONTROL ADD _
    "syslistview32",hfrmWelcome&,%FRMWELCOME_RIGHTCORNER,"",330,5,nWidth,nHeigh_
    t,%WS_CHILD OR  %WS_VISIBLE
 
    CONTROL ADD BUTTON, hfrmWelcome&, %FRMWELCOME_CMDNEXT, "Weiter", 250, _
      255,50,15, 0
    CONTROL ADD BUTTON, hfrmWelcome&, %FRMWELCOME_CMDBACK, "Zurück", 190, _
    255,50,15, 0
    CONTROL ADD BUTTON, hfrmWelcome&, 111111, "Zurück", 120, 255,50,15, 0
 
    SetWindowPos GetDlgItem(hfrmWelcome&, %FRMWELCOME_BACKGROUND), _
      %HWND_BOTTOM, 25, 0,700,450, %SWP_NOMOVE
    'SetWindowPos GetDlgItem(hfrmWelcome&, %FRMWELCOME_CMDNEXT), %HWND_TOP, 0, 
    ' 0, 75, 25, %SWP_NOMOVE
 
 
 
 
    SetParent %FRMWELCOME_CMDNEXT,%FRMWELCOME_BACKGROUND
    SetParent %FRMWELCOME_CMDBACK,%FRMWELCOME_BACKGROUND
 
    CONTROL ADD LABEL, hfrmWelcome&,  %FRMWELCOME_LBLHEADER,  "Bitte haben Sie" & _
      "einen Moment Geduld...", 10, 3, 200, 16, _
        %WS_CHILD OR %WS_VISIBLE OR %SS_CENTER, 0
 
 
    Configure_frmWelcome
 
END SUB

Manchmal verliert man, manchmal gewinnen die Anderen...