dialog style ws_child
Posted: Fri Jan 06, 2006 4:43 pm
I have this source :
How I can set the dialog WS_child ?
Regards
Code: Select all
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))
Regards