This is the sequence of commands that I use to create my CDFs.
testCDF:=DynamiModule[... some nice code]
nb=CreateDocument[{testCDF}
,Visible -> False
,WindowTitle->"Export Test"
,WindowMargins->Automatic
,WindowSize->Automatic
,WindowElements->{"VerticalScrollBar","HorizontalScrollBar"}
,ShowCellBracket->False
,Deployed->True
];
(*options to remove wolfram toolbar*)
SetOptions[nb, PrivateNotebookOptions -> {"PluginToolbarEnabled" -> False}];
CDFDeploy[NotebookDirectory[]<>"ExportTests2.cdf",nb,"Method"->"Standalone","Target"->"PlayerPro"];
NotebookClose[nb];
The command to remove Wolfram bar is commented.