* Clear possible settings from a prior project before setting properties of the new project

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2649 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
loesje_ 2013-02-03 11:33:45 +00:00
parent 240a03937a
commit df178ee0be

View File

@ -343,6 +343,8 @@ begin
GiOSAppDelegateWindowFileDesc.DefaultResourceName:='AppDelegate_iPhone';
LazarusIDE.DoNewEditorFile(GiOSAppDelegateWindowFileDesc,'appdelegate_iphoneu.pas','',[nfIsPartOfProject,nfOpenInEditor,nfCreateDefaultSrc]);
result := mrOK;
ProjOptions.Reset;
ProjOptions.isIPhoneApp:=true;
ProjOptions.MainNib:='appdelegate_iphoneu';
ProjOptions.Save;