dialog style ws_child

[Silvio]

I have this source :

Code: Select all  Expand view  RUN

oBrush := TBrush():New("NULL",,,)

   oDlg := TDialog():New()
   oWnd:CoorsUpdate()
   aDlgCoor := DlgCoors(oWnd)
   oDlg:nTop     := aDlgCoor[4]
   oDlg:nLeft    := aDlgCoor[5]
   oDlg:nBottom  := aDlgCoor[6]
   oDlg:nRight   := aDlgCoor[7]
   oDlg:cCaption := "Anagrafica Reparti"
   oDlg:SetColor( GetSysColor(13), GetSysColor(1))

How I can set the dialog WS_child ?
Regards

[James Bott]

Try:

oDlg:nStyle:= nor( WS_CHILD )

James