Реферат Створення менеджера конфігурації Celestia

n="justify">}

}

/ / Директорія скріншотовn; (int i=0; i Count; i + +) ((Main-> Strings [i]. Pos («ScriptScreenshotDirectory»)> 0 ) && (Main-> Strings [i] [1]!=«#»))

{[4]=«»;=Main-> Strings [i];// « »(EditScreenDir-> Text.Length ()> 0) [4]=StringReplace (EditScreenDir-> Text,« " ," /" , TReplaceFlags () << rfReplaceAll); ( (n=Main-> Strings [i]. Pos (»« »))> 0)

{= sl.SubString (1, n); (S [4]. Length ()) sl=sl + S [4];=sl + «" »;> Strings [i]=sl;;

}

}

/ / Параметр ScriptSystemAccessPolicy (int i=0; i Count; i + +)

{(Main-> Strings [i]. Pos («ScriptSystemAccessPolicy»))

{(ComboBox1-> ItemIndex == 0)> Strings [i]=« ScriptSystemAccessPolicy " ask " »; (ComboBox1-> ItemIndex == 1)> Strings [i] =« ScriptSystemAccessPolicy " allow " »; (ComboBox1-> ItemIndex == 2)> Strings [i] =« ScriptSystemAccessPolicy " deny " »;

}

}

/ / Стартовий сценарій (int i=0; i Count; i + +) ((Main-> Strings [i]. Pos («InitScript»)> 0) && (Main-> Strings [i] [1]!=«#»))

{[5]=«»;=Main-> Strings [i];// « »(EditStartScript-> Text.Length () &gt;0)[5]=StringReplace(EditStartScript-&gt;Text,&laquo;&laquo;,&raquo;/&raquo;,TReplaceFlags()&lt;&lt; rfReplaceAll);

{> MessageBox (MessegesLocale [4]. c_str (), Application-> Title.c_str (), MB_OK | MB_ICONERROR);;

} ((n=Main-> Strings [i]. Pos («"" ))> 0)

{= sl.SubString (1, n); (S [5]. Length ()) sl=sl + S [5];=sl + «" »;> Strings [i]=sl;;

}

}

/ / Demo сценарій (int i=0; i Count; i + +) ((Main-> Strings [i]. Pos («DemoScript»)> 0) && (Main-> Strings [i] [1]!=«#»))

{[6]=«»;=Main-> Strings [i];// « »(EditDemoScript-> Text.Length () &gt;0)[6]=StringReplace(EditDemoScript-&gt;Text,&laquo;&laquo;,&raquo;/&raquo;,TReplaceFlags()&lt;&lt; rfReplaceAll);

{> MessageBox (MessegesLocale [5]. c_str (), Application-> Title.c_str (), MB_OK | MB_ICONERROR);;

} ((n=Main-> Strings [i]. Pos («"" ))> 0)

{= sl.SubString (1, n); (S [6]. Length ()) sl=sl + S [6];=sl + «" »;> Strings [i]=sl;;

}

}

/ / Швидкість обертання (Edit5-> Text!=«» && StrToInt (Edit5-> Text)>=5 && StrToInt (Edit5-> Text) <= 400)

{(int i=0; i Count; i + +)

{(Main-> Strings [i]. Pos («RotateAcceleration»))> Strings [i]=« RotateAcceleration »+ Edit5-> Text +« .0 »;

}

}

{> MessageBox (MessegesLocale [2]. c_str (), Application-> Title.c_str (), MB_OK | MB_ICONERROR); -> Color=clRed; -> Font-> ; Color=clWhite;;

}

/ / Чутливість миші.DecimalSeparator=«.»; (int i=0; i Count; i + +)

{(Main-> Strings [i]. Pos («MouseRotationSensitivity»))> Strings [i]=« Mou...