a dialog into a Tpanel

[Silvio]

Can I insert a dialog into TPanel ?

sample
Function test()
Local oDlg,oFld ,oSplit
DEFINE DIALOG oDlg TITLE "test " SIZE 450,500
oPanel:=Tpanel(0,0,145,100,oDlg )
oPanel:SetColor(0,RGB(143,175,230))

@ 148, 0 FOLDER oFld PROMPT "T&race Operations" ;
OF oDlg PIXEL SIZE 250, 50

@146,0 SPLITTER oSplit ;
HORIZONTAL ;
PREVIOUS CONTROLS oPanel ;
HINDS CONTROLS oFld ;
TOP MARGIN 150 ;
BOTTOM MARGIN 50 ;
SIZE 500, 2 PIXEL ;
OF oDlg ;
_3DLOOK


ACTIVATE DIALOG oDlg center ;
ON PAINT Show_dialog(oPanel)
retu nil

Function Show_dialog()
Local oDlgFtp

DEFINE DIALOG oDlgFtp
TRANSPARENT SIZE oPanel:nwidth,oPanel:nHeight PIXEL OF oPanel ;
STYLE nOr(WS_POPUP,WS_BORDER)


//here all controls

oDlgFtp:bStart := { ||msginfo("test")}

activate dialog oDlgFtp


retu nil